腾讯云网站解决方案帮您轻松应对建站成本高/网络不稳等常见问题

根据IP跳转到用户所在城市的实现步骤

0
回复
1109
查看
[复制链接]

761

主题

775

帖子

3万

积分

董事

Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72Rank: 72

积分
32840
发表于 19-4-4 14:36:26 | 显示全部楼层 |阅读模式      紫钻仅向指定用户开放  
先去下一个最新的纯真IP数据库,然后按如下操作: - X3 g5 W8 a% |, v" {2 C
1.运行纯真QQIP数据库里带的ShowIP.exe,点解压,输入文件名,比如IP.txt,确定,就得到一个TXT文件。 5 D# o4 S; O! L8 Z, J. C( o
2.打开ACCESS,工具-自定义,命令选项卡,把导入选项拖动到上面的工具栏。 8 J8 N7 w0 k7 g6 D6 c
3.建库,建一个表,四个字段
' k, [+ D2 @, n" R$ j3 ^0 ~# w- ]Startip 类型:文本 (相关城市的IP段信息)
; y; e) ?8 k) zEndip 类型:文本 (相关城市的IP段信息) - ~8 b; z# f+ i$ W+ E
Country 类型:文本 (相关城市名称)
# F3 f! L& d' T+ {9 H0 u# |! ZReUrl 类型:文本 (你想要跳转的城市路径如:北京 http://bj.abc.com) 1 d5 a- `) [: ^
4.点导入按钮,文件类型选文本文件,找到刚才导出的IP.txt文件,导入到刚才建的表里~ - J8 ]* C. C# ?7 u1 j
运算将真实IP转换为数字,比如北京的IP段是 : 1.1.0.0 -- 1.1.0.255
. y, t& h8 _  b% l% M/ DStartip: 1*256*256*256+1*256*256+0*256+0 = 16842752 (这个数字才是最终要放到数据库里)
; J2 F/ f( q- G+ y  t. KEndip: 1*256*256*256+1*256*256+0*256+255 = 16843007 (这个数字才是最终要放到数据库里的) & c5 S6 N8 ?( a2 m4 |) A$ q. [
可用程序批量处理,如果不会,而且没时间(像我一样)你就直接去下个动网的IP库,它是已经处理好了的,下面是程序部分: ) D3 H% ]" ^* \2 w9 s7 H0 E$ e
user_ip = Request.ServerVariables("REMOTE_ADDR") ''取得访问者IP : Q& x/ {# V& I( L8 L% b8 D8 f9 a
userip_ary=split(user_ip,".")
) h! |5 ]2 S0 }/ T- ]* }8 dtmp_userip=userip_ary(0)*256*256*256+userip_ary(1)*256*256+userip_ary(2)*256+userip_ary(3) '' 按规定转换IP为数字 4 }/ L, M, _; |$ V( v
‘从数据库找出用户IP属于的城市
6 `) W4 M& R( ~( |* g# i) f
  1. set rs=Server.CreateObject("ADODB.Recordset")
    # h5 S5 I; f- p+ B
  2. sql="select * from ip where Startip<="&tmp_userip&" and Endip>="&tmp_userip
    1 p3 }* h/ @( n1 o; r/ a
  3. rs.open sql,conn,1,1
    , j' i  I; e, P; g. ^% ~9 U
  4. if rs.eof then * j/ ]5 y( b0 r5 R) @
  5. response.redirect "index.asp" '如果没有该城市或是IP无法识别则转到首页,也可以指定页面
    ) ^0 Z: `" V8 V
  6. else $ ?' |" c5 Y+ F! |, V8 \4 u
  7. response.redirect rs("ReUrl") '如果有转到指定页面 5 e2 O' Y6 Y/ }  D' u
  8. end if
    0 ], a+ Z3 A1 ?4 p
  9. rs.close ( t+ r+ p, R, B) I: a
  10. set rs=nothing
复制代码

8 O/ t6 Z- A* Z! e; n- Q* ?将上面的程序放到你的虚拟主机默认访问首页里!或是其它的页面里(当然你同样要在虚拟主机控制面板里设置默认首先访问的是这个文件) OK
% [9 j8 \9 t8 H! `" o
网站简介

球球发,是一家 Discuz! 商业插件、风格模板、网站源码、 Discuz!运营维护技术等于一体的交流分享网站,全站95%的资源都是免费下载,对于资源我们是每天更新,每个亲测资源最新最全---球球发(如果我们有侵犯了您权益的资源请联系我们删除