コードコピーは次のとおりです。
<%
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として保存します