%@ LANGUAGE = VBScript %> <% Option Explicit %> <% Response.Expires= -1 %>
Application.Contents.Count = " & Application.Contents.Count & "
") response.write("" + x + " | ") response.write ("") response.write ( .Contents(x) ) response.write (" | ") response.write ("
Application.StaticObjects.Count = " & Application.StaticObjects.Count & "
") response.write("" + x + " | ") response.write ("") response.write ( .StaticObjects(x) ) response.write (" | ") response.write ("
Session.Contents.Count = " & Session.Contents.Count & "
") response.write("" + x + " | ") response.write ("") response.write ( .Contents(x) ) response.write (" | ") response.write ("
Session.StaticObjects.Count = " & Session.StaticObjects.Count & "
") response.write("" + x + " | ") response.write ("") response.write ( .StaticObjects(x) ) response.write (" | ") response.write ("
# of Cookies (Request.Cookies.Count) = " & Request.Cookies.Count & "
") response.write("" + x + " | ") response.write ("")
response.write ("# of sub keys = " & .Cookies(x).count )
if .Cookies(x).count then
response.write (" ") end if for each subkey in .Cookies(x) response.write ( subkey & " = " & .Cookies(x)(subkey) & " " ) next response.write (" | ")
response.write("
# of URL Parms (Request.QueryString.Count) = " & Request.QueryString.Count & "
") response.write("" + x + " | " + .QueryString(x) + " | ") response.write("
Note: These must be added manually by the programmer.
See code for an example. Gets the URL parm like Request.QueryString("parm name") command
# of URL Parms (Request.ServerVariables.count) = " & Request.ServerVariables.count & "
") response.write("" + x + " | " + .ServerVariables(x) + " | ") response.write("
Note: These must be added manually by the programmer.
<% ' response.write("1 = " & Session("Example") & "