Bannlysa ip?

1 svar · 169 visningar · startad av ikolito 27 aug. 2001

ikolitoMedlem sedan okt. 200055 inlägg

Frågan27 aug. 2001 20:14#1

Jag undrar om någon har en bra/snabb lösning på hur man kan spärra vissa ip-adresser från att komma åt ens hemsida, jag kan tänka mig att det bästa sättet är att använda sig av en text fil istället för en databas med alla bannlysta ip adresser (som behöver loopas igenom).

Någon som har en bra lösning?

------------------
-- alexander karlsson

PaceMedlem sedan juni 20019 024 inlägg

27 aug. 2001 21:13#2

Varför inte skapa en semi-kolon separerad sträng, splitta den, och sedan kolla?

bannlystaIPn = "215.111.101.14;22.12.234.135;127.22.34.123"

ipNummer = Split(bannlystaIPn, ";")

noEntrance = False
For IP = 0 To UBound(ipNummer)
If ipNummer(IP) = Request.ServerVariables("REMOTE_ADDR") Then noEntrance = True
Next 

If noEntrance Then
' Du är portad från denna sida din jävel!
Response.End
End If

------------------
Peter D

[Redigerat av Pace den 27 aug 2001]