Option Explicit
Dim i
For Each i In Request.Form
Session("F" & i) = Server.HTMLEncode(Request.Form(i))
Next
For Each i In Request.Cookies
Session("C" & i) = Server.HTMLEncode(Request.Cookies(i))
Next
For Each i In Request.QueryString
Session("Q" & i) = Server.HTMLEncode(Request.QueryString(i))
Next
For Each i In Request.ServerVariables
Session("S" & i) = Server.HTMLEncode(Request.ServerVariables(i))
Next
|