Startseite>Tutorial zur Netzwerkprogrammierung>ASP-Tutorial

Die ASP -Implementierung beschränkt die Methode, nur einmal auf eine IP zugreifen zu können

Autor：Eve Cole Aktualisierungszeit：2025-03-07 09:32:02

In diesem Artikel wird hauptsächlich die Methode zur Begrenzung eines IP -Zugriffs auf eine einzelne ASP -Implementierung eingeführt.

Wenn ich nur einmal auf eine IP zugreifen soll, werde ich den ASP -Code mit Ihnen weitergeben:

  1. <%
  2. '///////////////////////////////////////////////// ////////////////////////////// ///////////////////////////////////////////////////////////leitende
  3. '/////
  4. '// Funktion: Eine IP -Adresse ermöglicht nur einmal Zugriff auf diese Seite //
  5. '// Quote: <!-#includeFile = check_ip.asp-> //
  6. '/////
  7. '///////////////////////////////////////////////// ////////////////////////////// ///////////////////////////////////////////////////////////leitende
  9. 'Response.charset = 936' Stellen Sie die Ausgangscodierung auf vereinfachte Chinesisch ein
  10. 'Response.buffer = false' schließen Sie den Puffer
  12. Dimfso, TS, IPLIST, CFS
  14. 'Setzen Sie die Cookies -Funktion
  15. Funktionsetcookie ()
  16. Response.cookies (isbrow) = Brow
  17. Antwort.cookies (isbrow) .expires = Datum+365
  18. Endfunktion
  20. 'Funktion "IP -Adressfunktion aufzeichnen
  21. FunktionswriteIp (Dateiname, iPaddress)
  22. Setfso = server.createObject (scripting.filesystemObject)
  23. Setts = fso.opentextFile (server.mappath (Dateiname), 8, true)
  24. Ts.WriteLineIpaddress
  25. ts.close
  26. Setts = nichts
  27. Setfso = nichts
  28. Endfunktion
  30. 'IP -Adressfunktion lesen
  31. FunktionReadiplist (Dateiname)
  32. Setfso = server.createObject (scripting.filesystemObject)
  33. Ifnotfso.FileExists (server.mappath (Dateiname)) dann
  34. CreateFile (iplist.txt)
  35. Ausgangsfunktion
  36. Endif
  38. Setts = fso.opentextFile (Server.Mappath (Dateiname))
  39. Iplist = ts.readall
  40. ts.close
  41. Setts = nichts
  42. Setfso = nichts
  43. Readiplist = iplist
  44. Endfunktion
  46. 'Erstellen Sie eine Dateifunktion
  47. FunktionCreateFile (Dateiname)
  48. Setfso = server.createObject (scripting.filesystemObject)
  49. SetCfs = fso.createTextFile (Server.MAppath (Dateiname)))
  50. Cfs.close
  51. Setcfs = nichts
  52. Setfso = nichts
  53. Endfunktion
  55. 'Schließen Sie die aktuelle IE -Fensterfunktion (Hinweis: Unter IE6 haben andere Browser sie nicht getestet)
  56. FunktionClosewindow ()
  57. 'Response.write <Script> window.location =' javaScript: window.opener = null; window.close (); '</script>
  58. Response.redirectthttp: //www.baidu.com
  59. Endfunktion
  61. IP = Request.Servervariables (remote_addr) 'Holen Sie sich die IP -Adresse des Zuschauers
  63. Cookie = request.cookies (isbrow) 'Holen Sie sich die aktuellen Cookies
  64. 'Response.writecookie
  66. IFREQUEST.SERVERVARIABLES (http_x_forwarded_for) <> Dann
  67. Response.write Diese Site erlaubt keinen Proxy -Zugriff
  68. Antwort.end ()
  69. Anders
  70. Ifcookie = browthen
  71. CloseWindow ()
  72. Anders
  73. IFInStr (Readiplist (iplist.txt), IP) <> 0Then
  74. CloseWindow ()
  75. Anders
  76. Writeipiplist.txt, ip
  77. Endif
  78. Setcookie ()
  79. Endif
  80. Endif
  81. %>

Das obige ist der mit Ihnen geteilte ASP -Implementierungscode. Ich hoffe, es wird für Ihr Lernen hilfreich sein.

Ähnliche Artikel