最新下载
热门教程
- 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)
相关文章
- 微博手机网页版快捷入口-微博手机版极速入口 01-16
- 动物塑形性格测试网站推荐-动物塑形性格测试链接大全 01-16
- ponytown如何快速登录-ponytown详细登录指南 01-16
- 163邮箱网页版直达入口-163邮箱官网登录快捷入口 01-16
- 歪歪漫画秋蝉怎么进入-秋蝉漫画土豪版免费阅读网站直达 01-16
- 夸克网盘网页版一键入口-夸克浏览器云存储极速登录直达 01-16