Add to our Guestbook

<% 'declare variables Dim sIP Dim sIParray(2) 'assign our blocked IP addresses to our array sIParray(0) = "61.254.32.22" sIParray(1) = "62.454.32.25" sIParray(2) = "62.254.32.17" 'retrieve the visitors IP address sIP = Request.ServerVariables("REMOTE_ADDR") 'loop through the banned IPs using the UBound function For i = 0 to UBound(sIParray) 'check if IP address matches any of the blocked IPs If sIP = sIParray(i) Then Response.Redirect "no_access.asp" End If Next %> Add to our Guestbook

We had to pull down the Guestbook because of heavy spamming.. Some people simply enjoy making things harder for other people.. So sorry for the inconvenience. We will try to think of something.. Thank you for dropping by, we hope you have a good year ahead~

Meanwhile you might want to use the message board in its place.