请问如何在ASP.NET中获得客户端IP 并判断是否是内网IP,从而给其不同的浏览权限?
解决方案 »
- Cookie中文乱码
- ASP.NET中什么控件可以嵌入单独的html文件?
- 比较一下VS2005与VS2008,SQL2005与SQL2008
- 上传带数据库的网站该如何配置?
- 为什么我的ajaxToolkit系列控件都不能用呢?
- menu控件如何在点击后变换背景图`(不是背景色)`谢谢
- 2003转到2005的问题
- 问一个根据查询字符串变化flash的问题
- Web页面中TreeView控件中选中属性节点Text内容的显示问题,指点一下
- ASP.NET初學,各位師兄能否推荐基本好的書和一些好的網站?多謝!!!
- 在局域网中,别人的机子如何才能访问到我机子上的.net开发的网站?
- 心情好 散分了~~~
......
userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR")
......即:如果客户端通过代理服务器,则取 HTTP_X_FORWARDED_FOR 的值,如果没通过代理服务器,就取 REMOTE_ADDR 的值。'通用函数:如果不能取客户端真实IP,就会取客户端的代理IP
Private 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_X_FORWARDED_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
我们单位接得电信的50M宽带,
好象是通过路由器上的网,
能得到内网IP吗?