1. ホーム
  2. データベース
  3. アクセス

IPに基づきユーザーの都市にジャンプする手順

2022-01-16 15:36:05
まず、最新の純IPデータベースにアクセスし、以下のようにします。
1. 純粋なQQIPデータベースに付属しているShowIP.exeを実行し、それを解凍するポイント、IP.txtなどのファイル名を入力し、OK、およびTXTファイルを取得します。
2. ACCESS」→「ツール」→「カスタマイズ」→「コマンド」タブを開き、「インポート」オプションを上のツールバーにドラッグします。
3. ライブラリを構築し、4つのフィールドを持つテーブルを構築する
Startip Type:Text(該当都市のIPセグメント情報)
Endip Type:Text(当該都市のIPセグメント情報)
国名タイプ:テキスト(該当する都市名)
ReUrl type:text (ジャンプしたい都市へのパス 例: 北京 http://bj.abc.com)
4. インポートボタンをクリックし、ファイルの種類としてテキストファイルを選択し、先ほどエクスポートしたIP.txtファイルを見つけて、先ほど作成したテーブルにインポートします〜。
計算では、実際のIPを数値に変換します。例えば、北京のIPセグメントは、1.1.0.0 -- 1.1.0.255 となります。
スタートチップ:1*256*256*256+1*256*256+0*256+0 = 16842752(この数値がデータベースに入れる最終的な数値です)
エンディップ 1*256*256*256+1*256*256+0*256+255 = 16843007 (これが最終的にデータベースに登録される番号です。)
できない、時間がない(私のように)場合は、すでに処理済みのDynamic Webの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が認識できない場合はホームページに移動します、ページを指定することもできます
その他
response.redirect rs("ReUrl") '指定したページへのリダイレクトがあった場合
終了する場合
rs.close
set rs=nothing
あなたのウェブホストのデフォルトのホームページに上記のプログラムを入れてください!または他のページ(もちろん、あなたもウェブホスティングのコントロールパネルでこのファイルへのデフォルトの最初のアクセスを設定する必要があります) OK