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
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
関連
-
小さなアクセスデータベースの記録を構築する
-
ACCESSデータベースファイルの圧縮と修復方法[グラフィック]。
-
Accessでデータベースの内容を一括で置き換える2つの方法
-
アクセスコメントフィールドの64K制限
-
Access 2000、Access 2002、Access 2003のデータベースから削除されたテーブルを復元する方法
-
ACCESSラーニングダイアリー
-
Accessデータベースの定期メンテナンス方法(最適化)
-
Accessデータベースは、メソッドを解決するための難しさの開始以来
-
INNER JOIN構文で複数のテーブルを結合してレコードセットを作成する
-
予約語・変数名リストへのアクセス
最新
-
nginxです。[emerg] 0.0.0.0:80 への bind() に失敗しました (98: アドレスは既に使用中です)
-
htmlページでギリシャ文字を使うには
-
ピュアhtml+cssでの要素読み込み効果
-
純粋なhtml + cssで五輪を実現するサンプルコード
-
ナビゲーションバー・ドロップダウンメニューのHTML+CSSサンプルコード
-
タイピング効果を実現するピュアhtml+css
-
htmlの選択ボックスのプレースホルダー作成に関する質問
-
html css3 伸縮しない 画像表示効果
-
トップナビゲーションバーメニュー作成用HTML+CSS
-
html+css 実装 サイバーパンク風ボタン
おすすめ
-
AccessでMicrosoft JET Database Engine (0x80004005) not specifiedエラーを解決する。
-
AccessでSQL文を使ってテーブルの存在を確認するコツ
-
ACCESSデータベースは、ゼロのメソッドを共有するために自動番号のID値を変更するには
-
1つのSQL実装で2つのテーブルを更新し、対応するフィールドの値を更新します。
-
アクセス利用概要
-
ADODB接続からアクセスは80004005エラー解決法
-
AccessでSQLを実行する方法
-
ACCESSのパラメータ付きクエリ、VBSCRIPT(ASP)およびC#(ASP.NET)関数付き
-
データベースから10個のランダムなデータを取得する4つの方法
-
Accessのデータベースが「保存できない、他のユーザーによってロックされている」理由