%@ LANGUAGE=VBScript %>
<% Option Explicit %>
<% Response.Expires = 0 %>
<%
Dim key
' generically sets Session variables from the QueryString...
For Each key In Request.QueryString
Response.write "KEY:" & key & "
"
Response.write "VAL:" & Request.QueryString(key) & "
" Session(key)=Request.QueryString(key) Next %>