ホーム>ネットワークプログラミングチュートリアル>ASP チュートリアル

ASP実装は、IPに1回だけアクセスする方法を制限します

著者：Eve Cole 更新時間：2025-03-07 09:32:02

この記事では、主にIPアクセスを1回のASP実装に制限する方法を紹介します。

IPを1回だけアクセスするように制限すると、ASPコードを共有します。

  1. <％
  2. '/////////////////////////////////////// ////////////////// /////
  3. '////
  4. '//関数：1つのIPアドレスでは、このページに1回のみアクセスできます//
  5. '// QUOTE：<！ - ＃includefile = check_ip.asp-> //
  6. '////
  7. '/////////////////////////////////////// ////////////////// /////
  9. 'Response.Charset = 936'単純化された中国人に出力エンコードを設定します
  10. 'Response.Buffer = false'バッファを閉じます
  12. dimfso、ts、iplist、cfs
  14. 'Cookies関数を設定します
  15. functionsetcookie（）
  16. Response.Cookies（isbrow）=眉
  17. Response.Cookies（isbrow）.expires = date+365
  18. エンド機能
  20. 'IPアドレス機能を記録します
  21. functionwriteip（filename、iPaddress）
  22. setFSO = server.createObject（scripting.filesystemObject）
  23. setts = fso.opentextfile（server.mappath（filename）、8、true）
  24. Ts.WriteLineIpAddress
  25. ts.close
  26. セット=何もない
  27. setfso =何もない
  28. エンド機能
  30. 'IPアドレス関数を読む
  31. functionreadiprist（filename）
  32. setFSO = server.createObject（scripting.filesystemObject）
  33. ifnotfso.fileexists（server.mappath（filename））then
  34. createfile（iplist.txt）
  35. exitFunction
  36. endif
  38. setts = fso.opentextfile（server.mappath（filename）））
  39. iplist = ts.readall
  40. ts.close
  41. セット=何もない
  42. setfso =何もない
  43. readiplist = iplist
  44. エンド機能
  46. 'ファイル関数を作成します
  47. functionCreatefile（ファイル名）
  48. setFSO = server.createObject（scripting.filesystemObject）
  49. setcfs = fso.createTextfile（server.mappath（filename））
  50. cfs.close
  51. setcfs = Nothing
  52. setfso =何もない
  53. エンド機能
  55. '現在のIEウィンドウ関数を閉じます（注：IE6の下で渡され、他のブラウザはそれをテストしていません）
  56. functionclosewindow（）
  57. 'Response.Write <Script> Window.Location =' JavaScript：window.opener = null; window.close（）; '</scrip>
  58. Response.redirectthttp：//www.baidu.com
  59. エンド機能
  61. ip = request.servervariables（remote_addr） '視聴者のIPアドレスを取得します
  63. cookie = request.cookies（isbrow） '現在のCookieを取得します
  64. 'Response.WriteCookie
  66. ifrequest.servervariables（http_x_forwarded_for）<> then
  67. Response.Writeこのサイトでは、プロキシアクセスを許可しません
  68. Response.End（）
  69. それ以外
  70. ifcookie = browthen
  71. closewindow（）
  72. それ以外
  73. ifinstr（readiplist（iplist.txt）、ip）<> 0then
  74. closewindow（）
  75. それ以外
  76. writeipiplist.txt、ip
  77. endif
  78. setCookie（）
  79. endif
  80. endif
  81. ％>

上記は、あなたと共有されるASP実装コードです。それがあなたの学習に役立つことを願っています。

関連記事