หน้าแรก>บทช่วยสอนการเขียนโปรแกรมเครือข่าย>กวดวิชา ASP

การใช้งาน ASP จำกัด วิธีการเข้าถึง IP เพียงครั้งเดียว

ผู้เขียน：Eve Cole เวลาอัปเดต：2025-03-07 09:32:02

บทความนี้ส่วนใหญ่แนะนำวิธีการ จำกัด การเข้าถึง IP ในการใช้งาน ASP ครั้งเดียว

การ จำกัด IP เพื่อเข้าถึงเพียงครั้งเดียวตอนนี้ฉันจะแบ่งปันรหัส ASP กับคุณ:

  1. -
  2. '/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////it ////////////////////////// //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////ff
  3. -
  4. '// ฟังก์ชั่น: ที่อยู่ IP เดียวอนุญาตให้เข้าถึงหน้านี้เพียงครั้งเดียวเท่านั้น //
  5. '// ใบเสนอราคา: <!-#includit file = check_ip.asp-> //
  6. -
  7. '/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////it ////////////////////////// //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////ff
  9. 'response.charset = 936' ตั้งค่าการเข้ารหัสเอาท์พุทเป็นภาษาจีนง่ายๆ
  10. 'response.buffer = false' ปิดบัฟเฟอร์
  12. dimfso, ts, iplist, cfs
  14. 'ตั้งค่าฟังก์ชันคุกกี้
  15. ฟังก์ชั่น FunctionSetCookie ()
  16. Response.cookies (isbrow) = brow
  17. Response.cookies (Isbrow) .expires = วันที่+365
  18. endfunction
  20. 'ฟังก์ชั่นที่อยู่ IP
  21. FunctionWiteip (ชื่อไฟล์, iPaddress)
  22. setfso = server.createObject (scripting.filesystemobject)
  23. setts = fso.opentextfile (server.mappath (ชื่อไฟล์), 8, true)
  24. ts.writelineipaddress
  25. ts.close
  26. setts = ไม่มีอะไร
  27. setfso = ไม่มีอะไร
  28. endfunction
  30. 'อ่านฟังก์ชันที่อยู่ IP
  31. functionReadIlTist (ชื่อไฟล์)
  32. setfso = server.createObject (scripting.filesystemobject)
  33. ifnotfso.fileexists (server.mappath (ชื่อไฟล์)) จากนั้น
  34. createFile (iplist.txt)
  35. exitfunction
  36. endif
  38. setts = fso.opentextfile (server.mappath (ชื่อไฟล์)))
  39. iPlist = ts.readall
  40. ts.close
  41. setts = ไม่มีอะไร
  42. setfso = ไม่มีอะไร
  43. readiplist = iplist
  44. endfunction
  46. 'สร้างฟังก์ชันไฟล์
  47. FunctionCreateFile (ชื่อไฟล์)
  48. setfso = server.createObject (scripting.filesystemobject)
  49. setcfs = fso.createtextfile (server.mappath (ชื่อไฟล์)))
  50. cfs.close
  51. setcfs = ไม่มีอะไร
  52. setfso = ไม่มีอะไร
  53. endfunction
  55. 'ปิดฟังก์ชั่นหน้าต่าง IE ปัจจุบัน (หมายเหตุ: ผ่านภายใต้ IE6 เบราว์เซอร์อื่นยังไม่ได้ทดสอบ)
  56. functionclosewindow ()
  57. 'Response.Write <Script> window.location =' JavaScript: window.opener = null; window.close (); '</script>
  58. Response.redirectthttp: //www.baidu.com
  59. endfunction
  61. ip = request.serverVariables (remote_addr) 'รับที่อยู่ IP ของผู้ชม
  63. COOKIE = Request.Cookies (ISBROW) 'รับคุกกี้ปัจจุบัน
  64. 'response.writecookie
  66. ifrequest.serverVariables (http_x_forwarded_for) <> จากนั้น
  67. Response.write เว็บไซต์นี้ไม่อนุญาตให้เข้าถึงพร็อกซี
  68. Response.end ()
  69. อื่น
  70. ifcookie = browthen
  71. closeWindow ()
  72. อื่น
  73. ifinstr (readiplist (iplist.txt), ip) <> 0 แล้ว
  74. closeWindow ()
  75. อื่น
  76. writeipiplist.txt, ip
  77. endif
  78. SetCookie ()
  79. endif
  80. endif
  81. -

ข้างต้นคือรหัสการใช้งาน ASP ที่แชร์กับคุณฉันหวังว่ามันจะเป็นประโยชน์กับการเรียนรู้ของคุณ

บทความที่เกี่ยวข้อง