Dim navigator_client
navigator_client = Request.ServerVariables("HTTP_USER_AGENT")

Dim url_client
url_client = Request.servervariables("HTTP_REFERER")

Dim ip_client
'El visitante puede acceder por proxy, entonces tomamos la IP que está utilizando
ip_client = request.servervariables("HTTP_X_FORWARDED_FOR")
'Si no venía de un proxy, tomamos la ip del visitante
if ip_client = "" then
   ip_client = Request.servervariables("REMOTE_ADDR")
end if