<!--#include file="PartsMailRule.html"-->
<script language="JavaScript" type="text/javascript"><!--
function onSubmit( form )
{
	if( ! form.Name.value )
	{
		alert( "条件名を入力してください。" );
		return;
	}
	form.submit();
}
-->
</script>
''<!------------------------------------------------------------------
''  自動分類の設定
''  構文：Call SetItemAuto <メールシステム情報> <分類項目> <条件>
''------------------------------------------------------------------->
' Sub SetItemAuto $MailProfile $Item $Rule
<input type="hidden" name="Mode" value="">
<input type="hidden" name="Remove" value="">
' If $CC
<input type="hidden" name="CC" value="$CC">
' Elif $Rule
'  Set $Conditions = $Rule.Conditions
'  $Name = $Rule.Name
'  $OR = $Rule.OR
'  $Fuzzy = $Rule.Fuzzy
'  $Value = $Rule.Value
<input type="hidden" name="CC" value="$Conditions.Count">
' Else
<input type="hidden" name="CC" value="1">
' EndIf
<table border="0" cellspacing="0" cellpadding="2">
<tr><td valign="top" nowrap>条件名
' Call formNecessaryMark
</td><td colspan="3">
' Call formText "Name" $Name 20 1
<br><font size="-1" color="#008800">条件の名前を自由に指定してください。</font>
</td></tr>
<tr><td colspan="4"><br></td></tr>
<tr><td valign="top" nowrap>条件内容</td><td colspan="3">
<!--#include file="LibrarySearchCondition.html"-->
' Call searchCondition
</td></tr>
' If $CC
'  $Num = $CC - 1
'  For $i = 0 to $Num
'   $ItemID = $System.GetParameter IID$i
'   $Text = $System.GetParameter Text$i
'   $Expr = $System.GetParameter Expr$i
'   Call RuleConditionRow $MailProfile $i $ItemID $Text $Expr $Num "ItemAuto"
'  Next
' Elif $Conditions
'  $CC = 0
'  If $Conditions.Count
'   $Num = $Conditions.Count - 1
'  Else
'   $Num = 0
'  EndIf
'  For Each $Cond in $Conditions
'   $ItemID = $Cond.IID
'   $Text = $Cond.Text
'   Call RuleConditionRow $MailProfile $CC $ItemID $Text $Cond.Expr $Num "ItemAuto"
'   Inc $CC
'  Next
' EndIf
' If ! $CC
'  Call RuleConditionRow $MailProfile 0 $ItemID $Text $Expr 0 "ItemAuto"
' EndIf
<tr><td><br></td><td colspan="3">
' Call cmButton "条件を追加する" "Mode.value='add';this.form.submit();"
</td></tr>
<tr><td colspan="4"><br></td></tr>
<tr><td valign="top" nowrap>設定値</td><td colspan="3">
<select name="value">
' Options $Value in $Item.Options
</select>
</td></tr>
</table>
' EndSub