script

trying to get this script to work with newspad works on other pages

<%
visitorIP = Request.ServerVariables("REMOTE_ADDR")
' Banned IP List
strBannedIPList="1.1.1.1,2.2.2.2"
arrBannedIPList=split(strBannedIPList,",")
visitorIP=request.ServerVariables("REMOTE_HOST")

For x=0 To ubound(arrBannedIPList)
If instr(visitorIP,arrBannedIPList(x)) then Response.Redirect("http://www.mysite.com/banned.asp")
Next
%>

NewsPad uses Option Explicit which means you need to program properly and declare variables before they are used. You would need the following at the beginning of the code:-

Dim strBannedIPList
Dim arrBannedIPList
Dim visitorIP