La copia del código es la siguiente:
<%
Response.Write "<br>"
callerver_update ("caché")
callerver_update ("sesión")
Response.write "<br> ¡El host virtual se reinició con éxito!"
subserver_update (byvalstrt)
ifstrt = "" entoncesstt = request.queryString ("Eliminar")
selectCasestrt
Caso "caché"
Application.lock
Application.Contents.RemoveAll
Aplicación
Response.WRITE "DeleteCachesucCedE! <br>"
Caso "Sesión"
Session.Abandon
Response.WRITE "DELETESESSIONCECEDE! <BR>"
EndSelectar
Endsub
%>
Guardar como iisrestar.asp