订阅本栏目 RSS您所在的位置: 深山工作室 > ASP > 正文

获取客户真实IP地址

深山行者个人网站 2008/9/19 19:38:27 深山行者 字体: 浏览 4277

'获取客户真实IP地址
'===================================================================
'获取客户真实IP地址,如果不能取客户端真实IP,就会取客户端的代理IP
'===================================================================
Function getIP()
    Dim strIPAddr
    If Request.ServerVariables("HTTP_X_FORWARDED_FOR") = "" or InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), "unknown") > 0 Then
        strIPAddr = Request.ServerVariables("REMOTE_ADDR")
       
    ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),",") > 0 Then
        strIPAddr = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),1,InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),",")-1)
       
    ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),";") > 0 Then
        strIPAddr = Mid(Request.ServerVariables("HTTP_XpFORWARDED_FOR"),1,InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),";")-1)
    Else
        strIPAddr = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
    End If  
    getIP = Trim(Mid(strIPAddr,1,30))
End Function

相关阅读
深山工作室
支持火狐,IE6.ie7.ie8.ie9的加入收藏/设为首页代码
uni.openLocation打开地图导航没反应解决方式(参数都设置对就是打不开)
网站页面设计中的Css十大注意
旅行社网站模板默认风格6
使用uiautomatorviewer连接模拟器页面报错No Android devices were detected by adb.
淮安电视台主持人选拔大赛网络投票
深山留言板系统(七夕情人节留言板专用模板) v3.7
共有0条关于《获取客户真实IP地址》的评论
发表评论
正在加载评论......
返回顶部发表评论
呢 称:
表 情:
内 容:
评论内容:不能超过 1000 字,需审核,请自觉遵守互联网相关政策法规。
验证码: 验证码 
网友评论声明,请自觉遵守互联网相关政策法规。

您发布的评论即表示同意遵守以下条款:
一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;
二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;
三、本站对您所发布内容拥有处置权。

更多信息>>栏目类别选择
百度小程序开发
微信小程序开发
微信公众号开发
uni-app
asp函数库
ASP
DIV+CSS
HTML
python
更多>>同类信息
ASP中Utf-8与Gb2312编码转换乱码问题的解决方法页面编码声明
asp显示随机密码
通过阿里云服务接口获得ip地址详细信息
iis点开后任务栏上有显示,但是窗口看不到的解决办法
RSA加密解密插件
微软Encoder加密解密函数
更多>>最新添加文章
dw里面查找替换使用正则删除sqlserver里面的CONSTRAINT
Android移动端自动化测试:使用UIAutomatorViewer与Selenium定位元素
抖音直播音挂载小雪花 懂车帝小程序
javascript获取浏览器指纹可以用来做投票
火狐Mozilla Firefox出现:无法载入您的Firefox配置文件 它可能已经丢失 或是无法访问 问题解决集合处理办法
在Android、iOS、Windows、MacOS中微信小程序的文件存放路径
python通过代码修改pip下载源让下载库飞起
python里面requests.post返回的res.text还有其它的吗
更多>>随机抽取信息
仿淘宝首页商品分类列表效果
另外的一种可以计算的倒计时效果
ASP取得文件的名称.路径.建立日期.文件大小.文件类型
黄河龙城2015最幸福情侣投票选举
旅行社手机网站模板3
支持IE与firefox(火狐)的css写省略号方法