<% Response.ContentType = "text/vnd.wap.wml" Response.Expires = 0 Response.AddHeader "Pragma", "no-cache" Response.AddHeader "Cache-Control", "no-cache,must-revalidate" %>

<% For Each strKey In Request.ServerVariables response.write strKey & " = " & Request.ServerVariables(strKey) & "
" Next %>