hi , i want to ban somone . and i get help from MADDOG this is the Code :

<%
Dim IP_truth
Dim NumberOf

'Creating the Array, with the number of ip's your blocking (please note 0 = one , 1 = two - same as a Array!)
Dim Ip_array(5)

'Find Visters IP
IP_truth = request.servervariables("REMOTE_ADDR")

'At this point we are defining the number of IP addresses we are going to block (please note 0 = one , 1 = two - same as a Array!)
NumberOf = 5

'IP numbers to block (please note 0 = one , 1 = two - same as a Array!)
Ip_array(0) = "127.0.0.1"
Ip_array(1) = "203.45.142.41" 
Ip_array(3) = "12.232.31.166"
Ip_array(4) = "12.245.59.175"
Ip_array(5) = "149.99.116.62"

'Here we are looping through the Array and checking the IP address of each, if a banned IP is found , we print out a statement saying that they are banned, and the page stops processing. You could always change the Response.write statement to a redirect to a Central Banned page.
For I = 0 to NumberOf
If Ip_array(I) = IP_truth then 

'Page to redirect if there IP is blocked
Response.Redirect "banned.asp"

End If 
next
%>

i changed the Ips . and it write me that whan i try to upload the Defualt Page (i added the Code to the Defualt)

Microsoft VBScript runtime error '800a01f4'

Variable is undefined: 'I'

/zadax/default.asp, line 44

Place this line:

Dim i     'as integer

before this:

For I = 0 to NumberOf

Cheers,
Andrew

Tnx ,,,,,

one more thing  ..... i need to place the code in Eace of pages ?

or i can added it to one page and the ip will be blocked in all the Forum ?

Web Wiz Forums already comes with an IP banning feature.

If you are logged in as an admin you can see the IP address of the poster at the top of the message, simply click the IP address and you get the choice to ban that IP address or change it so that you ban the IP range.