Dim IPAddress=Request.ServerVariables(”REMOTE_ADDR”)Dim Referer=Request.ServerVariables(”HTTP_REFERER”)