216.73.216.223是您的ip
ip位置是:
延安生活里面的ip。mdb。。。。:http://1z88.com/延安生活/ip_script.asp
测试ok的asp代码,在底部.asp
来访时间:<%=now()%>
本页网址是:
服务器IP<%=Request.ServerVariables("LOCAL_ADDR")%>
浏览器IP<%=Request.ServerVariables("REMOTE_ADDR")%>
代理服务器真实IP<%Request.ServerVariables("HTTP_X_FORWARDED_FOR")%>
真实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)
%>