IP转城市代码 来看看
下面这个文件怎么只能转到主页帮我看看是怎么的?大概问题出在那?
<!--#include File="conn2.asp" -->
<%
user_ip = Request.ServerVariables("REMOTE_ADDR") ''取得访问者IP
userip_ary=split(user_ip,".")
tmp_userip=userip_ary(0)*256*256*256+userip_ary(1)*256*256+userip_ary(2)*256+userip_ary(3) '' 按规定转换IP为数字
'从数据库找出用户IP属于的城市
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from ip where Startip<="&tmp_userip&" and Endip>="&tmp_userip
rs.open sql,conn,1,1
if rs.eof then
response.redirect "index.asp" '如果没有该城市或是IP无法识别则转到首页,也可以指定页面
else
response.redirect rs("ReUrl") '如果有转到指定页面
end if
rs.close
set rs=nothing
%>
<%
user_ip = Request.ServerVariables("REMOTE_ADDR") ''取得访问者IP
userip_ary=split(user_ip,".")
tmp_userip=userip_ary(0)*256*256*256+userip_ary(1)*256*256+userip_ary(2)*256+userip_ary(3) '' 按规定转换IP为数字
'从数据库找出用户IP属于的城市
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from ip where Startip<="&tmp_userip&" and Endip>="&tmp_userip
rs.open sql,conn,1,1
if rs.eof then
response.redirect "index.asp" '如果没有该城市或是IP无法识别则转到首页,也可以指定页面
else
response.redirect rs("ReUrl") '如果有转到指定页面
end if
rs.close
set rs=nothing
%>
*********************************************************************************************
修改于0:20分
这样吧我是想从客服浏览器中取得访问者IP后在IP数据库中取ReUrl字段的地址
上面的代码有错.
谢谢那个帮我写一个
我以前已经有一个CONN.ASP文件了
[[it] 本帖最后由 wyjx 于 2008-6-26 00:21 编辑 [/it]]
