' If $System.IsCloud
'  Exit
' EndIf
' $System.Access Admin
' If $System.IsPost
'  $System.Redirect $Server?page=SystemAdmin
'  $Command.System.SetDatabaseCheck
'  Exit
' EndIf
<!--#include file="LibraryCommon.html"-->
' Call cmHtmlHead
<!--#include file="LibraryForm.html"-->
' $CaptionTitle = "データベースの定期チェックの設定"
' Call cmHead $CaptionTitle
<script language="JavaScript" type="text/javascript"><!--
function onCheck( form )
{
	var e = document.getElementById( 'SETCHECK' );
	if( e && e.style )
	{
		if( form.Check.checked == true )
		{
			e.style.display="";
		}
		else
		{
			e.style.display="none";
		}
	}
}
-->
</script>
</head>
<body>
' $System.SetParameter BackURL "$Server?page=SystemAdmin"
' Call cmHeaderView 1 $CaptionTitle $BackURL "システム設定"
' If $IsTask
<form method="post" action="$Server?">
<input type="hidden" name="CSRFTicket" value="$System.MakeCSRFKey">
<input type="hidden" name="Page" value="SystemCheckSet">
<input type="hidden" name="rw" value="mw">
<p>データベースの定期チェックスケジュールを設定します。<br>
'  Call formNote 1
</p>
<p>
<table border="0" cellspacing="0" cellpadding="4">
<tr><td nowrap>
'  If $mw.CheckTime
'   $Check = 1
'  Else
'   $Check = 0
'  EndIf
'  Call formCheckBox "Check" "データベースの定期チェックをおこなう" $Check 1 "Check" "onCheck( this.form );"
</td></tr>
</table>
<blockquote>
<table id="SETCHECK" border="0" cellspacing="0" cellpadding="4"\\
'  If ! $mw.CheckTime
 style="display:none;"\\
'  EndIf
>
<tr><td nowrap>開始時刻
'   Call formNecessaryMark
</td><td>毎日
'   Call formTime "CheckTime" "1" $mw.CheckTime 10
</td></tr>
</table>
</blockquote>
</p>
<p>
'  $escBackURL = $Command.String.JSEncode $BackURL
'  Call formCommit "設定する" "" "" "location.href='$escBackURL';"
</p>
<hr>
<font color="#ff0000">チェック実行中はメンテナンスモードとなり、メールワイズにアクセスできなくなります。</font><br>
※データベースのチェックは、通常30分以内で完了します。
</form>
' Else
<p>データベースの定期チェックをおこなうには、タスクが実行されている必要があります。<br>
<font color="#ff0000">現在、タスクが停止しています。</font></p>
' EndIf
' Call cmChildFooter $BackURL "システム設定へ"
</body>
</html>