获取用户IP

userip=Request.ServerVariables("HTTP_X_FORWORD_FOR")

if userip="" then

    userip=Request.ServerVariables("REMOTE_ADDR")

End if