% If CStr(Request("aff")) <> "" Then Session("aff") = CStr(Request("aff")) Session("referer") = Request.ServerVariables("HTTP_REFERER") End if 'Response.Write("") %>