虚拟主机重启代码

　　<%

　　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

　　%>