瑞鲁手机APP下载网_专注推荐好用的手机APP和游戏APP

App用户数量减少的真相

用通ASP直接获取用户真实IP地址

查看人次:0摘自:瑞鲁游戏APP

通用FUNCTION,如果不能取真实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

相关文摘:ASP技巧 windows
标题名称:《App用户数量减少的真相》
本文网址:https://www.sdruilu.cn/news/tpart-29836.html