依據IP跳轉到用戶地點城市的完成步調。本站提示廣大學習愛好者：（依據IP跳轉到用戶地點城市的完成步調）文章只能為提供參考，不一定能成為您想要的結果。以下是依據IP跳轉到用戶地點城市的完成步調正文
先去下一個最新的純粹IP數據庫,然後按以下操作:
1.運轉純粹QQIP數據庫裡帶的ShowIP.exe，點解壓，輸出文件名，好比IP.txt，肯定，就獲得一個TXT文件。
2.翻開ACCESS，對象－自界說，敕令選項卡，把導當選項拖動到下面的對象欄。
3.建庫，建一個表，四個字段
Startip 類型:文本 (相干城市的IP段信息)
Endip 類型:文本 (相干城市的IP段信息)
Country 類型:文本 (相干城市稱號)
ReUrl 類型:文本 (你想要跳轉的城市途徑如:北京 http://bj.abc.com)
4.點導入按鈕，文件類型選文本文件，找到適才導出的IP.txt文件，導入到適才建的內外~
運算將真實IP轉換為數字,好比北京的IP段是 ： 1.1.0.0 -- 1.1.0.255
Startip: 1*256*256*256+1*256*256+0*256+0 = 16842752 (這個數字才是終究要放到數據庫裡)
Endip: 1*256*256*256+1*256*256+0*256+255 = 16843007 (這個數字才是終究要放到數據庫裡的)
可用法式批量處置,假如不會,並且沒時光(像我一樣)你就直接去下個動網的IP庫,它是曾經處置好了的,上面是法式部門:
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
將下面的法式放到你的虛擬主機默許拜訪首頁裡!或是其它的頁面裡(固然你異樣要在虛擬主機掌握面板裡設置默許起首拜訪的是這個文件) OK
