' If ! $System.IsCloud
'  Exit
' EndIf
' $System.Access Login
' $WorkSpace.AccessManage
' If $System.IsPost
'  $Command.Mail.ChangeAutoReplyStatus $Enable
'  $System.Redirect $Server?page=$Page&wid=$WID&id=$ID
'  Exit
' EndIf
<!--#include file="LibraryCommon.html"-->
<!--#include file="LibraryForm.html"-->
' Call cmHtmlHead
' $CaptionTitle = "自動返信の設定"
' Call cmHead $CaptionTitle 1
</head>
<body>
' $System.SetParameter BackURL "$Server?page=ManageAdmin&wid=$WID&id=$ID"
' Call cmHeaderView 1 $CaptionTitle $BackURL "運用管理"
' $System.CloseDatabase "mw"
' Set $MailProfile = $Command.Mail.GetMailTop $ID
<p>受信したメールに対する、自動返信メールについて設定します。</p>
''
<form method="post" action="$Server?">
<input type="hidden" name="CSRFTicket" value="$System.MakeCSRFKey">
<input type="hidden" name="Page" value="$Page">
<input type="hidden" name="WID" value="$WID">
<input type="hidden" name="ID" value="$ID">
' If $MailProfile.AutoReply.Enable
'  $CurStatus = "有効"
'  $ChgStatus = "無効"
<input type="hidden" name="Enable" value="0">
' Else
'  $CurStatus = "無効"
'  $ChgStatus = "有効"
<input type="hidden" name="Enable" value="1">
' EndIf
<p>現在、自動返信の設定は <b>$CurStatus</b> です。\\
' Call formSubmit "Submit" "$ChgStatusにする"
</form>
</p>
''
<p>基本設定
' Call cmLink "変更する" "write20.png" "$Server?page=ManageMailAutoReplySet&wid=$WID&id=$ID"
<table border="1" cellspacing="0" cellpadding="4" bgcolor="#ffffff">
<tr>
 <td width="150" class="title" nowrap>自動返信メール</td><td width="150" nowrap>送信メールフォルダに\\
' If $MailProfile.AutoReply.SaveAutoSentMail
残す
' Else
残さない
' EndIf
 </td>
</tr>
</table>
</p>
''
<p>自動返信条件
' Call cmLink "追加する" "write20.png" "$Server?page=ManageMailAutoReplyRuleAdd&wid=$WID&id=$ID"
' $Count = $MailProfile.AutoReply.Rules.Count
' If $Count > 1
'  $NoOrder = 0
' Else
'  $NoOrder = 1
' EndIf
' Call cmLink "順番変更" "order20.png" "$Server?page=ManageMailAutoReplyRuleOrder&wid=$WID&id=$ID" $NoOrder
<table border="1" cellspacing="0" cellpadding="2" bgcolor="#ffffff">
<tr bgcolor="#cccccc"><th width="150" nowrap>条件名</th><th width="300" nowrap>条件内容</th><th width="200" nowrap>操作</th></tr>
' For Each $Rule in $MailProfile.AutoReply.Rules
<tr><td valign="top" nowrap>$Rule.Name<br></td>
<td valign="top" nowrap>
'  $First = 1
'  For Each $Cond in $Rule.Conditions
'   If $First
'    $First = 0
'   Else
'    If $Rule.OR
または、\\
'    Else
かつ、\\
'    EndIf
<br>
'   EndIf
'   If $Cond.IID = "ACID"
アカウント\\
'   Elif $Cond.IID = "Subject"
件名\\
'   Elif $Cond.IID = "From"
差出人\\
'   Elif $Cond.IID = "To"
宛先\\
'   Elif $Cond.IID = "CC"
CC\\
'   Elif $Cond.IID = "Data"
本文\\
'   EndIf
'   If $Cond.IID = "ACID"
'    $ACID = $Cond.Text
'    Set $Account = $MailProfile.Accounts.$ACID
'    $Text = $Account.Name
'   Else
'    $Text = $Cond.Text
'   EndIf
が「$Text」\\
'   If $Cond.Expr = 1
を含む。\\
'   Elif $Cond.Expr = 2
を含まない。\\
'   Elif $Cond.Expr = 3
と同じ。\\
'   Elif $Cond.Expr = 4
と異なる。\\
'   EndIf
'  Next
</td>
'  $localSubject = $Rule.Subject
'  $localData = $Rule.Data
<td valign="top" nowrap>
'  Call cmLink "変更する" "write20.png" "$Server?page=ManageMailAutoReplyRuleModify&wid=$WID&id=$ID&rid=$Rule.ID"
'  Call cmLink "削除する" "delete20.png" "$Server?page=ManageMailAutoReplyRuleDelete&wid=$WID&id=$ID&rid=$Rule.ID"
</td></tr>
' Next
</table>
</p>

※次のメールに対する自動返信は無効です。 
<ul style="margin-top:0;">
<li>CCまたはBCCで受信したメール</li>
<li>自動返信または自動転送により、繰り返し送受信されている可能性があるメール</li>
<li>差出人のメールアドレスに、次のいずれかのアカウントが使用されているメール
 <ul>
 <li>MAILER-DAEMON</li>
 <li>postmaster</li>
 <li>bounce</li>
 </ul>
</li>
</ul>
''
' Call cmChildFooter $BackURL "運用管理へ"
</body>
</html>