コードコピーは次のとおりです。
<％
Response.Write "<br>"
callerver_update（ "キャッシュ"）
callerver_update（ "session"）
Response.Write「<br>仮想ホストが正常に再起動しました！」
subserver_update（byvalstrt）
ifstrt = "" thenstt = request.querystring（ "delete"）
SelectCasestrt
ケース「キャッシュ」
Application.Lock
Application.Contents.Removeall
Application.UnLock
response.write "deletecachesucceed！<br>"
ケース「セッション」
session.abandon
response.write "deletesessionsucceed！<br>"
EndSelect
Endingub
％>
iisrestar.aspとして保存します