我只需要一个完整的代码,每次用户登录到我的网站时如何获取/定义IP地址,因为我需要将IP地址保存到数据库表中以跟踪IP的来源。谢谢。
最好调用这样的简单函数:
Function IP()
Dim strIP : strIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If strIP = "" Then strIP = Request.ServerVariables("REMOTE_ADDR")
IP = strIP
End Function
Run Code Online (Sandbox Code Playgroud)
这将返回用户的真实IP地址,即使用户位于代理后面或通过CDN提供服务(有时也会导致问题)。
| 归档时间: |
|
| 查看次数: |
4917 次 |
| 最近记录: |