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