使用纯真IP地址库,大概只有4M左右,而如果转换成动网那种,同样的数据量的话,需要占用20M左右的空间.
先下载IP.ASP~
2.Show.asp
找到<!--#include file="inc/page_Cls.asp"-->
在下面加上
<!--#include file="ip.asp"-->
找到
Temp=BBS94KK.Fun.GetSqlStr(Arr_Rs(9,i))
替换为
Temp=BBS94KK.Fun.GetSqlStr(Arr_Rs(9,i))&" 来自:"&GetIpInfoAv(Arr_Rs(9,i),0)
3.Online.asp
找到<!--#include file="inc.asp"-->
在下面加上
<!--#include file="ip.asp"-->
找到
UserIP=Temp(5)
替换为
UserIP=Temp(5)&"

来自:"&GetIpInfoAv(Temp(5),0)
欢迎光临 新丰家园 (https://xinfengbbs.com/) | Powered by Discuz! X3.2 |