龙盟编程博客 | 无障碍搜索 | 云盘搜索神器
快速搜索
主页 > web编程 > asp编程 >

获取用户真实IP地址代码

时间:2012-12-31 22:56来源:未知 作者:admin 点击: 次
分享到：

获取用户真实IP地址代码
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 = "<span style=""color:#FF0000"">未知</span>"
  End if
  If GetIp = "::1" Then GetIp = "127.0.0.1"
 End Function

 '使用方法
 dim i
 i=1
 GetIp(1)


精彩图集
精彩文章

热门标签

渐进式 PowerEdge 表链接 定时执行任务 .net添加Cookie 控制台 卡号 流量监控 Inodes response.set 登陆 getopt 常用工具类 双冒号 地方 安全检测 mysql.sock CSSvista MYSQLI_STORE 绑定虚拟 ifelse 用户密码 promise化 bezier曲线 VC库函数 地址栏 namespace 树形结构 spring 鼠标拖动 匿名用户 振兴 switch语句 jquery基础教程 看表 图片垂直居中 SQLServer200 开机自启动 win2003+IIS 添加app SFTP 检查电子邮件 类型关键字 策略模式 邮件发送 MD5算法 图像标签 绑定类型 diff OpenSSL adb命令大全 新记录 TimerTask 删除分区表 checkbox多选 百度站点地图 获取结点 皇后 Rolling 哈弗曼算法

赞助商链接