asp下比較全面的獲取IP地址的代碼

2024-05-04 10:57:51

字體：大中小

來源：轉載

供稿：網友

最簡單的用以下語句:

ip=request.ServerVariables("REMOTE_ADDR")
response.Write(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
ip=getIP()
response.write(ip)
%>

您可能感興趣的文章:

Android手機獲取IP地址的兩種方法Linux下Python獲取IP地址的代碼JS不能跨域借助jquery獲取IP地址的方法PowerShell腳本實現網卡DHCP自動獲取IP地址、設置靜態IP地址的方法js獲取IP地址的方法小結java獲取ip地址示例java中通過網卡名稱獲取IP地址在InstallShield中通過主機名獲取IP地址的代碼安卓獲取手機IP地址的實現代碼

上一篇：UpdatePanel觸發javascript腳本的方法附代碼

下一篇：ASP 關于動態數據顯示頁面得錨點