ASP如何獲取真實IP地址

更新時間：2020年09月12日 23:45:42 投稿：mdxy-dxy

這篇文章主要介紹了ASP如何獲取真實IP地址,需要的朋友可以參考下

在 ASP 中使用 Request.ServerVariables("REMOTE_ADDR") 來取得客戶端的 IP 地址，但如果客戶端是使用代理服務器來訪問，那取到的就是代理服務器的 IP 地址，而不是真正的客戶端 IP 地址。要想透過代理服務器取得客戶端的真實 IP 地址，就要使用Request.ServerVariables("HTTP_X_FORWARDED_FOR") 來讀取。

　　不過要注意的事，并不是每個代理服務器都能用 Request.ServerVariables("HTTP_X_FORWARDED_FOR") 來讀取客戶端的真實 IP，有些用此方法讀取到的仍然是代理服務器的 IP。

　　還有一點需要注意的是：如果客戶端沒有通過代理服務器來訪問，那么用 Request.ServerVariables("HTTP_X_FORWARDED_FOR") 取到的值將是空的。因此，如果要在程序中使用此方法，可以這樣處理：

......
userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR")
......

　　即：如果客戶端通過代理服務器，則取 HTTP_X_FORWARDED_FOR 的值，如果沒通過代理服務器，就取 REMOTE_ADDR 的值。

接著分享一個函數(shù)

Function GetReallyIP()
	Dim strIP
	strIP=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
	If strIP="" Or InStr(strIP,"unknown") Then
		strIP=Request.ServerVariables("REMOTE_ADDR")
	ElseIf InStr(strIP,",") Then
		strIP=Split(strIP,",")(0)
	ElseIf InStr(strIP,";") Then
		strIP=Split(strIP,";")(0)
	End If	
	GetReallyIP=Trim(strIP)
End Function

Asp獲取真實IP地址，最簡單可用一句話獲取：

ip=request.ServerVariables("REMOTE_ADDR")
response.Write(ip)

但這種方法對代理服務器上網(wǎng)的就不準了，故比較全面的是用下面的方法：

<%
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)
%>

到此這篇關于ASP如何獲取真實IP地址的文章就介紹到這了,更多相關ASP真實IP內(nèi)容請搜索腳本之家以前的文章或繼續(xù)瀏覽下面的相關文章希望大家以后多多支持腳本之家！

您可能感興趣的文章: