N'arrive pas à bloquer un IP visiteur malgré GLOBAL.ASA

[arnaudpons]

Bonjour,

J'ai installé sur mon site un fichier GLOBAL.ASA afin de bloquer certains IP malveillants. Cela marche bien puisque ces IP sont en effet bloqués avec succès.

Pourtant, il y a toujours un IP qui revient toujours et ce, malgré mes tentatives de blocage... savez vous pourquoi ? Y a t'il une solution pour parvenir à le bloquer ? Merci d'avance pour vos réponses...

Voici le script :


<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Sub Session_OnStart
If Request.ServerVariables("REMOTE_ADDR") = "86.64.25." Or Request.ServerVariables("REMOTE_ADDR") = "230.25.64." Or Request.ServerVariables("REMOTE_ADDR") = "218.242.143.131" Or Request.ServerVariables("REMOTE_ADDR") = "218.17.75.134" Or Request.ServerVariables("REMOTE_ADDR") = "218.19.70.49" Or Request.ServerVariables("REMOTE_ADDR") = "219.235.233.163" Or Request.ServerVariables("REMOTE_ADDR") = "219.78.218.51" Or Request.ServerVariables("REMOTE_ADDR") = "221.127.10.113" Or Request.ServerVariables("REMOTE_ADDR") = "121.15.115.226" Or Request.ServerVariables("REMOTE_ADDR") = "221.126.96.159" Or Request.ServerVariables("REMOTE_ADDR") = "124.81.205.181" Or Request.ServerVariables("REMOTE_ADDR") = "220.249.17.153" Or Request.ServerVariables("REMOTE_ADDR") = "202.22.143.164" Or Request.ServerVariables("REMOTE_ADDR") = "221.213.184.214" Or Request.ServerVariables("REMOTE_ADDR") = "58.37.102.232" Or Request.ServerVariables("REMOTE_ADDR") = "210.245.251.131" Or Request.ServerVariables("REMOTE_ADDR") = "202.90.83.132" Or Request.ServerVariables("REMOTE_ADDR") = "203.185.160.222" Or Request.ServerVariables("REMOTE_ADDR") = "192.168.2.15" Or Request.ServerVariables("REMOTE_ADDR") = "202.3.244.118" Or Request.ServerVariables("REMOTE_ADDR") = "222.71.17.55" Or Request.ServerVariables("REMOTE_ADDR") = "222.187.180.7" Or Request.ServerVariables("REMOTE_ADDR") = "125.112.183.28" Or Request.ServerVariables("REMOTE_ADDR") = "202.90.64.250" Or Request.ServerVariables("REMOTE_ADDR") = "221.221.181.104" Or Request.ServerVariables("REMOTE_ADDR") = "203.185.160.160" Or Request.ServerVariables("REMOTE_ADDR") = "58.211.105.242" Or Request.ServerVariables("REMOTE_ADDR") = "203.86.47.106" Or Request.ServerVariables("REMOTE_ADDR") = "219.233.20.239" Then

Session.Abandon
Response.redirect("http://www.163.com")
End If
End Sub

</script>

 

[Sir Dipp]

Salut,

Quel est l'IP en question qui revient toujours ?

A+

 

[reglysse]

Si ton test fonctionne pour certaines IP mais pas toutes je vois peut-être un soucis, au début on dirait que tu veux exclure une plage d'ip :

Request.ServerVariables("REMOTE_ADDR") = "86.64.25."

Mais la tu fais un test d'égalité, l'IP ne peut pas être "86.64.25.", il faut mettre plutôt ça je pense :

left(Request.ServerVariables("REMOTE_ADDR"), 9) = "86.64.25."

 

[arnaudpons]

Salut,

Quel est l'IP en question qui revient toujours ?

A+

Celui la "86.64.25.230", je viens juste de le replacer sur le script (au lieu de "86.64.25.")... cela ne l'empèchera pas de revenir demain... J'ai donc tout essayé mais en vain pour l'instant...

Cordialement,