最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
获取用户真实IP地址代码
时间:2022-07-02 22:33:29 编辑:袖梨 来源:一聚教程网
Public Function GetIp(getType)
If getType = 0 then
GetIp = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
if GetIp = "" Then getIp = Request.ServerVariables("REMOTE_ADDR")
ElseIf getType = 1 Then
GetIp = Request.ServerVariables("LOCAL_ADDR")
Else
GetIp = "未知"
End if
If GetIp = "::1" Then GetIp = "127.0.0.1"
End Function
'使用方法
dim i
i=1
GetIp(1)
相关文章
- 《奇迹暖暖》饴蜜迎春套装怎么获得方法有哪些 08-02
- 怎么驱动矿机-矿机怎么打驱动 08-02
- 《空之要塞:启航》阵容角色搭配最强推荐 08-02
- 《重返未来1999》洞悉机制有什么 08-02
- 分析师表示,全球M2货币供应量暗示比特币可能在9月前见顶 08-02
- XRP展现强劲韧性 成功从“FUD”阴影中反弹 08-02