<!-- #include virtual="/sj4web/include.asp" -->

<%
'<!--
'################################################
'	名称	：演習データ待避
'	作成日：2002/12/10
'	作成者：徳田
'	目的　：演習データ待避処理を実行する。
'	概要	：
'	<<表示>>
'	・なし
'
'################################################
'-->
%>
<%

main()

Sub main()

	ExecCmd("cmd.exe /c " & Left(Server.MapPath("/sj4web"),3) & "sj4webetc\sj4dbmake\2--教科書に必要な演習をインポート.bat")

	ExecCmd("cmd.exe /c " & Left(Server.MapPath("/sj4web"),3) & "sj4webetc\sj4dbmake\04-テストデータをインポート.bat " & SQLServer)

'	Response.Redirect("fm_kihon_view.asp?Msg=インポートを完了しました。")
End Sub

%>