Function GetIp()
Dim DulIp,ProIP
DulIp=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
ProIP=Request.ServerVariables("REMOTE_ADDR")
If DulIp="" Then
GetIp=ProIP
Else
GetIp=DulIp
End If
End Function
Dim DulIp,ProIP
DulIp=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
ProIP=Request.ServerVariables("REMOTE_ADDR")
If DulIp="" Then
GetIp=ProIP
Else
GetIp=DulIp
End If
End Function
热门信息
阅读 (201)
1 独特的随机字母阅读 (175)
2 检查和设置IIS服务器正确的权限阅读 (167)
3 asp网站伪静态化URL Rewrite中的httpd.ini伪静态化规则编写方法阅读 (166)
4 asp取access数据库里本周、本月、本季度的记录~阅读 (166)
5 ASP-对象