How to block IP address in a guestbook?

[pcchong]

I use a free database-driven ASP guestbook. I want to add a IP address
blocking filter to it( just to block one particular guest). What is the
easiest way to do so? Thanks.

pcchong

[PW]

"pcchong" <pc*****@singne t.com.sg> wrote in message
news:eu******** *****@TK2MSFTNG P12.phx.gbl...

I use a free database-driven ASP guestbook. I want to add a IP address
blocking filter to it( just to block one particular guest). What is the
easiest way to do so? Thanks.

Put this at the beginning of the first ASP (change "111.222.33 3" to your
enemys IP address) ...

<%
if Request.ServerV ariables("REMOT E_ADDR") = "111.222.33 3" then
Response.End
end if
%>

[Roland Hall]

"pcchong" wrote in message news:eu******** *****@TK2MSFTNG P12.phx.gbl...
: I use a free database-driven ASP guestbook. I want to add a IP address
: blocking filter to it( just to block one particular guest). What is the
: easiest way to do so? Thanks.

I don't know where you're coming from [IP address] so you would have to
modify this but directions are included. I'm redirecting everyone as an
example. Modify the appropriate lines and then put this at the top of your
page where you want to block someone. However, if their IP is dynamic, then
you'd need to modify it to block IP ranges.

<%@ Language=VBScri pt %>
<%
Option Explicit
Response.Buffer = True
dim outtahair, visitor, strURL
strURL = "http://www.fbi.gov/mostwant.htm" ' modify this line for target
redirect host
outtahair = Request.ServerV ariables("REMOT E_HOST")
' Delete the line above and uncomment the one below replacing x.x.x.x with
IP to redirect
' outtahair = "x.x.x.x"
visitor = Request.ServerV ariables("REMOT E_HOST")
if visitor = outtahair then
Response.Clear( )
Response.Redire ct(strURL)
end if
%>

http://kiddanger.com/lab/remotehostredirect.asp

HTH...

--
Roland Hall
/* This information is distributed in the hope that it will be useful, but
without any warranty; without even the implied warranty of merchantability
or fitness for a particular purpose. */
Technet Script Center - http://www.microsoft.com/technet/scriptcenter/
WSH 5.6 Documentation - http://msdn.microsoft.com/downloads/list/webdev.asp
MSDN Library - http://msdn.microsoft.com/library/default.asp

[Jeff Cochran]

On Wed, 19 May 2004 19:29:20 +0800, "PW" <pw*@NObigSPAMp ond.net.au>
wrote:

"pcchong" <pc*****@singne t.com.sg> wrote in message
news:eu******* ******@TK2MSFTN GP12.phx.gbl...

I use a free database-driven ASP guestbook. I want to add a IP address
blocking filter to it( just to block one particular guest). What is the
easiest way to do so? Thanks.

Put this at the beginning of the first ASP (change "111.222.33 3" to your
enemys IP address) ...

<%
if Request.ServerV ariables("REMOT E_ADDR") = "111.222.33 3" then
Response.End
end if
%>

Better would be to check the address and if it's not allowed, simply
not update the guestbook. Let them go through the process, thank them
for their entry, just don't record it. :)

Jeff

[pcchong]

Thanks. It works for specific IP, but what if it is a IP range, say
210.187.176.# to 210.187.176.### . How do I change the line? Thanks.
pcchong

"PW" <pw*@NObigSPAMp ond.net.au> wrote in message
news:uR******** ******@TK2MSFTN GP12.phx.gbl...

"pcchong" <pc*****@singne t.com.sg> wrote in message
news:eu******** *****@TK2MSFTNG P12.phx.gbl...

I use a free database-driven ASP guestbook. I want to add a IP address
blocking filter to it( just to block one particular guest). What is the
easiest way to do so? Thanks.

Put this at the beginning of the first ASP (change "111.222.33 3" to your
enemys IP address) ...

<%
if Request.ServerV ariables("REMOT E_ADDR") = "111.222.33 3" then
Response.End
end if
%>

[Bob Barrows [MVP]]

Use Instr(), or a Regular Expression.

Instr():

dim sIP
sIP = Request.ServerV ariables("REMOT E_ADDR")

if Instr(sIP, "111.222.33 3") > 0 then

For more complicated patterns, you should use a Regular Expression.

Bob Barrows

pcchong wrote:

Thanks. It works for specific IP, but what if it is a IP range, say
210.187.176.# to 210.187.176.### . How do I change the line? Thanks.
pcchong

"PW" <pw*@NObigSPAMp ond.net.au> wrote in message
news:uR******** ******@TK2MSFTN GP12.phx.gbl...

"pcchong" <pc*****@singne t.com.sg> wrote in message
news:eu******** *****@TK2MSFTNG P12.phx.gbl...

I use a free database-driven ASP guestbook. I want to add a IP
address blocking filter to it( just to block one particular guest).
What is the easiest way to do so? Thanks.

Put this at the beginning of the first ASP (change "111.222.33 3" to
your enemys IP address) ...

<%
if Request.ServerV ariables("REMOT E_ADDR") = "111.222.33 3" then
Response.End
end if
%>

--
Microsoft MVP -- ASP/ASP.NET
Please reply to the newsgroup. The email account listed in my From
header is my spam trap, so I don't check it very often. You will get a
quicker response by posting to the newsgroup.

[pcchong]

Thanks. This is a better way.
pcchong

"Bob Barrows [MVP]" <re******@NOyah oo.SPAMcom> wrote in message
news:uW******** *****@TK2MSFTNG P12.phx.gbl...

Use Instr(), or a Regular Expression.

Instr():

dim sIP
sIP = Request.ServerV ariables("REMOT E_ADDR")

if Instr(sIP, "111.222.33 3") > 0 then

For more complicated patterns, you should use a Regular Expression.

Bob Barrows

pcchong wrote:

Thanks. It works for specific IP, but what if it is a IP range, say
210.187.176.# to 210.187.176.### . How do I change the line? Thanks.
pcchong

"PW" <pw*@NObigSPAMp ond.net.au> wrote in message
news:uR******** ******@TK2MSFTN GP12.phx.gbl...

"pcchong" <pc*****@singne t.com.sg> wrote in message
news:eu******** *****@TK2MSFTNG P12.phx.gbl...
I use a free database-driven ASP guestbook. I want to add a IP
address blocking filter to it( just to block one particular guest).
What is the easiest way to do so? Thanks.
Put this at the beginning of the first ASP (change "111.222.33 3" to
your enemys IP address) ...

<%
if Request.ServerV ariables("REMOT E_ADDR") = "111.222.33 3" then
Response.End
end if
%>

--
Microsoft MVP -- ASP/ASP.NET
Please reply to the newsgroup. The email account listed in my From
header is my spam trap, so I don't check it very often. You will get a
quicker response by posting to the newsgroup.

[pcchong]

My joy is shortlived. This guest still managed to enter with the same IP
(within the IP range that the IP blocking filter set). How can he get
through? Thanks.

pcchong

"Bob Barrows [MVP]" <re******@NOyah oo.SPAMcom> wrote in message
news:uW******** *****@TK2MSFTNG P12.phx.gbl...

Use Instr(), or a Regular Expression.

Instr():

dim sIP
sIP = Request.ServerV ariables("REMOT E_ADDR")

if Instr(sIP, "111.222.33 3") > 0 then

For more complicated patterns, you should use a Regular Expression.

Bob Barrows

pcchong wrote:

Thanks. It works for specific IP, but what if it is a IP range, say
210.187.176.# to 210.187.176.### . How do I change the line? Thanks.
pcchong

"PW" <pw*@NObigSPAMp ond.net.au> wrote in message
news:uR******** ******@TK2MSFTN GP12.phx.gbl...

"pcchong" <pc*****@singne t.com.sg> wrote in message
news:eu******** *****@TK2MSFTNG P12.phx.gbl...
I use a free database-driven ASP guestbook. I want to add a IP
address blocking filter to it( just to block one particular guest).
What is the easiest way to do so? Thanks.
Put this at the beginning of the first ASP (change "111.222.33 3" to
your enemys IP address) ...

<%
if Request.ServerV ariables("REMOT E_ADDR") = "111.222.33 3" then
Response.End
end if
%>

--
Microsoft MVP -- ASP/ASP.NET
Please reply to the newsgroup. The email account listed in my From
header is my spam trap, so I don't check it very often. You will get a
quicker response by posting to the newsgroup.

[Jeff Cochran]

On Fri, 21 May 2004 21:53:32 +0800, "pcchong" <pc*****@singne t.com.sg>
wrote:

My joy is shortlived. This guest still managed to enter with the same IP
(within the IP range that the IP blocking filter set). How can he get
through? Thanks.
Good question. But what did you do with Bob's code? Are you sure
you're blocking that IP and not just checking to see what it is?

Jeff
"Bob Barrows [MVP]" <re******@NOyah oo.SPAMcom> wrote in message
news:uW******* ******@TK2MSFTN GP12.phx.gbl...

Use Instr(), or a Regular Expression.

Instr():

dim sIP
sIP = Request.ServerV ariables("REMOT E_ADDR")

if Instr(sIP, "111.222.33 3") > 0 then

For more complicated patterns, you should use a Regular Expression.

Bob Barrows

pcchong wrote:

> Thanks. It works for specific IP, but what if it is a IP range, say
> 210.187.176.# to 210.187.176.### . How do I change the line? Thanks.
>
>
> pcchong
>
> "PW" <pw*@NObigSPAMp ond.net.au> wrote in message
> news:uR******** ******@TK2MSFTN GP12.phx.gbl...
>>
>> "pcchong" <pc*****@singne t.com.sg> wrote in message
>> news:eu******** *****@TK2MSFTNG P12.phx.gbl...
>>> I use a free database-driven ASP guestbook. I want to add a IP
>>> address blocking filter to it( just to block one particular guest).
>>> What is the easiest way to do so? Thanks.
>>
>>
>> Put this at the beginning of the first ASP (change "111.222.33 3" to
>> your enemys IP address) ...
>>
>> <%
>> if Request.ServerV ariables("REMOT E_ADDR") = "111.222.33 3" then
>> Response.End
>> end if
>> %>

--
Microsoft MVP -- ASP/ASP.NET
Please reply to the newsgroup. The email account listed in my From
header is my spam trap, so I don't check it very often. You will get a
quicker response by posting to the newsgroup.

[pcchong]

I place this in the beginning of the first asp:

<%
dim sIP
sIP = Request.ServerV ariables("REMOT E_ADDR")
if Instr(sIP, "###.###.## #") > 0 then
Response.End
end if
%>

Anything wrong? Please advise. Thanks.

pcchong

"Jeff Cochran" <jc************ *@naplesgov.com > wrote in message
news:40******** *******@msnews. microsoft.com.. .

On Fri, 21 May 2004 21:53:32 +0800, "pcchong" <pc*****@singne t.com.sg>
wrote:

My joy is shortlived. This guest still managed to enter with the same IP
(within the IP range that the IP blocking filter set). How can he get
through? Thanks.

Good question. But what did you do with Bob's code? Are you sure
you're blocking that IP and not just checking to see what it is?

Jeff

"Bob Barrows [MVP]" <re******@NOyah oo.SPAMcom> wrote in message
news:uW******* ******@TK2MSFTN GP12.phx.gbl...

Use Instr(), or a Regular Expression.

Instr():

dim sIP
sIP = Request.ServerV ariables("REMOT E_ADDR")

if Instr(sIP, "111.222.33 3") > 0 then

For more complicated patterns, you should use a Regular Expression.

Bob Barrows

pcchong wrote:
> Thanks. It works for specific IP, but what if it is a IP range, say
> 210.187.176.# to 210.187.176.### . How do I change the line? Thanks.
>
>
> pcchong
>
> "PW" <pw*@NObigSPAMp ond.net.au> wrote in message
> news:uR******** ******@TK2MSFTN GP12.phx.gbl...
>>
>> "pcchong" <pc*****@singne t.com.sg> wrote in message
>> news:eu******** *****@TK2MSFTNG P12.phx.gbl...
>>> I use a free database-driven ASP guestbook. I want to add a IP
>>> address blocking filter to it( just to block one particular guest).
>>> What is the easiest way to do so? Thanks.
>>
>>
>> Put this at the beginning of the first ASP (change "111.222.33 3" to
>> your enemys IP address) ...
>>
>> <%
>> if Request.ServerV ariables("REMOT E_ADDR") = "111.222.33 3" then
>> Response.End
>> end if
>> %>

--
Microsoft MVP -- ASP/ASP.NET
Please reply to the newsgroup. The email account listed in my From
header is my spam trap, so I don't check it very often. You will get a
quicker response by posting to the newsgroup.