' $System.Access Admin
' If $System.IsPost
'  $System.Redirect $Server?page=SystemMailAccount&wid=$WID&id=$ID
'  $Command.Mail.ModifyAccount
'  Exit
' EndIf
<!--#include file="LibraryCommon.html"-->
' Call cmHtmlHead
<!--#include file="PartsMailAccount.html"-->
' $CaptionTitle = "メールアカウントの変更"
' Call cmHead $CaptionTitle
</head>
<body>
' $System.SetParameter BackURL "$Server?page=SystemMailAccount&wid=$WID&id=$ID"
' Call cmHeaderView 1 $CaptionTitle "$Server?page=SystemAdmin&wid=$WID" "システム設定" $BackURL "メールアカウントの設定"
<form method="post" action="$Server?" onSubmit="return onSubmit( this );">
<input type="hidden" name="CSRFTicket" value="$System.MakeCSRFKey">
<input type="hidden" name="Page" value="SystemMailAccountModify">
<input type="hidden" name="rw" value="mw">
<input type="hidden" name="WID" value="$WID">
<input type="hidden" name="ID" value="$ID">
<input type="hidden" name="ACID" value="$ACID">
<p>変更するメールアカウントの情報を設定してください。
' Call cmLink "各項目の説明はこちらを参照ください。" "help20.png" "http://manual.cybozu.co.jp/mailwise/admin_app/mail/basic.html#anchor03" 0 1
<br>
' Call formNote 1
</p>
' Set $MailProfile = $Command.Mail.GetMailTop $ID
' Set $Account = $MailProfile.Accounts.$ACID
' Call mailAccount "変更する" $BackURL $Account
</form>
' Call cmChildFooter $BackURL "メールアカウントの設定へ"
</body>
</html>