Spæring af IP?

<%
'====================
'HVILKE IPADRESSER MÅ 
'IKKE KOMME IND HER!!
'====================
Dim arrIP, strIP, i
strIP = "192.63.187.9,192.63.187.10,192.63.187.240"

arrIP = Split(strIP,",")

For i = 0 To Ubound(arrIP)
    If arrIP(i) = Request.ServerVariables("REMOTE_ADDR") Then
        Response.Redirect("http://www.dr.dk")
    End If
Next


%>

Takker, det virker jo som det skal :-)