复制代码代码如下:
<%
response.write"<br>"
callserver_update("cache")
callserver_update("session")
response.write"<br>虚拟主机重启成功!"
subserver_update(byvalstrt)
ifstrt=""thenstrt=request.querystring("delete")
selectcasestrt
case"cache"
Application.Lock
application.contents.Removeall
Application.unLock
response.write"DeleteCacheSucceed!<br>"
case"session"
session.Abandon
response.write"DeleteSessionSucceed!<br>"
endselect
endsub
%>
保存为iisrestar.asp