asp 代码求救
问题:欢迎来自《广州省广州市》的朋友代码代码怎样编写啊？谢谢了
《广州省广州市》为地区变量，根据ip地址获得，比如说一访问者的ip地址为广州省广州市的，网页上就显示：欢迎来自广州省广州市的朋友！
如果说一访问者的ip地址为湖南省长沙市的，网页上就显示：欢迎来自湖南省长沙市的朋友！
请知道代码的朋友告诉我声，谢谢！！
最佳答案：
插入这段js
<script src="http://www.cz88.net/ip/ipcheck.aspx"></script>
这个是调用纯真ip库的api.
回答2: 这么烂
回答3: 你必须有一个数据库有两个字段
一个是IP地址
一个是IP所在的地方
然后根据IP查找IP所在的地方
再写地址.
回答4: <%
'获得访问者的真实IP
ip=request.servervariables("http_x_forwarded_for")
if ip="" then
ip=request.servervariables("REMOTE_HOST")
end if
'判断当前来访者所属地区的函数
function getaddress(ip)
ipstr=split(ip,".")
'计算当前来访者IP
num=int(ipstr(0))*256*256*256+int(ipstr(1))*256*256+int(ipstr(2))*256+int(ipstr(3))-1
db="ip_address.mdb"
set conn=server.createobject("adodb.connection")
conn.open "provider=microsoft.jet.oledb.4.0;data source="&server.mappath(db)
set rs=server.createobject("adodb.recordset")
rs.open "select * from ip_address where "&num&">=ip1 and "&num&"<=ip2",conn,1,1
if not rs.eof then
'输出判断结果
response.write rs("country")&rs("city")
end if
rs.close
end function
getaddress(ip)
%>
代码如上
然后你自己下一个ip_address.mdb数据库。实在不明白的用百度给我留言
回答5: TABLE :data
IP1 IP2 DZ NT
开始IP段 结束IP段 地址 线路
210.53.64.0 210.53.71.255 北京市 网通
210.53.72.0 210.53.79.255 山东省青岛市 网通
210.53.80.0 210.53.83.255 山东省烟台市 网通
210.53.128.0 210.53.191.255 北京市 网通
210.53.192.0 210.53.192.255 新疆乌鲁木齐市 网通
response.write Replace(conn.Execute("select top 1 '欢迎来自',dz,'的朋友！' FROM `data` where ip1<='210.53.128.3' and '210.53.128.3'<=ip2").GetString(,,,VbCrLf,vbNewLine) ," ","")