Toon posts:

[ASP] IP Adress blokeren van een pagina

Pagina: 1
Acties:

Verwijderd

Topicstarter
Goedemiddag,

Ik heb een vraagje.

Ik heb aan 't begin van mijn pagina dit scriptje:
code:
1
2
3
4
5
6
7
8
9
10
11
12
<%
Dim IPADRESS
IPADRESS = Request.ServerVariables("REMOTE_ADDR")

If IPADRESS = "123.456.789" Then
Response.Redirect "http://www.creepworld.com/banned.html"
Else
%>
HIERZO DE PAGINA ZELF DUS
<%
End If
%>

Je begrijpt al wat er gebeurd :) Als je IP adress er staat, moet je oprotten en wordt je ge-redirect.

Maar 't werkt niet, hoezo niet? Ik heb toch alles goed opgelost?

Verwijderd

Uhm.... 123.456.789???

Die 'else'-constructie mag je weglaten.

Verwijderd

/flauw
Is ip-adres niet 4-ranges, dus 192.168.0.1 :Z

Verwijderd

Topicstarter
Das gewoon een voorbeeld! Daar kan je desnoods je eigen IP in zien.. :)

  • Basszje
  • Registratie: Augustus 2000
  • Laatst online: 21:24

Basszje

Reisvaap!]

Wat werkt er dan precies niet :?

Beware of listening to the imposter; you are undone if you once forget that the fruits of the earth belong to us all, and the earth itself to nobody.


  • justmental
  • Registratie: April 2000
  • Niet online

justmental

my heart, the beat

Heb je de opgehaalde cgi variabele wel eens getoond?
Wat stond er dan?

Who is John Galt?


Verwijderd

Topicstarter
Nou, wat er eigenlijk moet gebeuren en dat als het IP adress overeenkomt, dat je dan ge-redirect wordt. zodat je de pagina niet te zien krijgt.

maar dat werkt dus niet, je krijgt nog steeds de pagina te zien.

Verwijderd

En als je zegt: response.write(IPADRESS). Wat zie je dan? En als je de IF weghaalt, gaat ie dan wel naar die pagina?

  • Yoda
  • Registratie: December 1999
  • Laatst online: 07-11-2025

Yoda

Can you feel it?

code:
1
2
3
4
5
6
7
8
9
10
11
12
<%
Dim IPADRESS
IPADRESS = Request.ServerVariables("REMOTE_ADDR")

If instr(IPADRESS, "123.456.789") <> 0 Then  ' ip adres is wel gevonden
  Response.Redirect "http://www.creepworld.com/banned.html"
Else  ' ip adres is niet gevonden
%>
  HIERZO DE PAGINA ZELF DUS
<%
End If
%>

om te testen wat er in de variabele staat ff weg schrijven
code:
1
  response.write "-" & IPADRESS & "-"

ow en btw het is adres OF address ;)

Verwijderd

Topicstarter
Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'Response.Redirect'

/svencoop/default.asp, line 2

:?:?:?

Verwijderd

Tjonge jonge... wat een gehannes allemaal met een simpele vergelijking! |:(

Als je inderdaad op een gedeelte van het IP adres wil controleren, dan kun je 't bovenstaande code voorbeeld pakken. Wel ff opletten: hierboven keurt ie zowel xxx.123.456.789 als 123.456.789.xxx goed. Een extra puntje achter 789 doet wonderen ;)

http://support.microsoft.com/default.aspx?scid=kb;EN-US;q159402

Verwijderd

Topicstarter
Krijg nou tieten! Hij werkt!! :)

Bedankt he!! :) :bier: :)

  • Yoda
  • Registratie: December 1999
  • Laatst online: 07-11-2025

Yoda

Can you feel it?

Op woensdag 03 april 2002 11:58 schreef daxx909 het volgende:
Tjonge jonge... wat een gehannes allemaal met een simpele vergelijking! |:(

Als je inderdaad op een gedeelte van het IP adres wil controleren, dan kun je 't bovenstaande code voorbeeld pakken. Wel ff opletten: hierboven keurt ie zowel xxx.123.456.789 als 123.456.789.xxx goed. Een extra puntje achter 789 doet wonderen ;)

http://support.microsoft.com/default.aspx?scid=kb;EN-US;q159402
extra puntje,..idd heb je gelijk in, had ik ff niet aan gedacht in eerste instantie,... :)
Pagina: 1