虚拟主机重启代码

复制代码 代码如下:

<%
response.write "<br>"
call server_update("cache")
call server_update("session")
response.write "<br>虚拟主机重启成功!"
sub server_update(byval strt)
  if strt="" then strt=request.querystring("delete")
  select case strt
  case "cache"
    Application.Lock
    application.contents.Removeall
    Application.unLock
    response.write "Delete Cache Succeed!<br>"
  case "session"
    session.Abandon
    response.write "Delete Session Succeed!<br>"
  end select
end sub
%>

保存为iisrestar.asp

内容版权声明:除非注明,否则皆为本站原创文章。

转载注明出处:http://www.heiqu.com/3303.html