%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<%
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 %>