Código fuente de 'Lista todas las variables.asp'
<html>
<head>
<title>Lista todas las variables - Códigos asp, programacion asp, descargas asp, rutinas asp</title>
</head>
<body style="font-family: Arial; font-size: 11pt">
<center><b><font face="Arial" size="3">Lista todas las variables</font></b></center><br><br>
Este código ASP te permitira todas las variables del web:<br>
Variables del servidor, variables de la aplicación, variables de sesión,
cookies y detalles del motor IIS. Muy útil para realizar comprobaciones.
<%@Language="VBScript"%>
<%
On Error Resume next
response.write("<br><br>")
Response.Write "<b>Todas las variables : " & Now() & "<HR>"
dim Header, footer
header = "<table border=""1"" align=""center"" width=""400"">"
footer = "</table>"
Response.Write("<b>Cookies" & header & "<br>")
for each item in Request.Cookies
Response.Write("<tr><td> " & item & "</td><td> " & Request.Cookies(item) & "</td>")
next
Response.Write("<br><br>" & footer & "<b>Variables de servidor" & header & "<br>")
for each item in request.servervariables
Response.Write("<tr><td> " & item & "</td><td> -- " & Request.ServerVariables(item) & "</td></tr>")
next
Response.write("<br><br>" & footer & "<b>Variables de sesión" & header & "<br>")
for each item in session.contents
Response.Write("<tr><td> " & item & "</td><td> " & session(item) & "</td></tr>")
next
Response.write("<br><br>" & footer & "<b>Contenidos de la aplicación" & header & "<br>")
for each item in application.contents
Response.Write("<tr><td> " & item & "</td></tr>")
next
%>
<table border="0">
<tr><td><b>Motor del script: </td>
<td><%= scriptengine() %></td>
<td><%= scriptenginemajorversion() %>:</td>
<td><%=scriptengineminorversion() %></td>
<td><%= scriptenginebuildversion() %></td></tr></table>
</body></html>