Sun Apr 03, 2011 11:00 pm
<%
'variables to store banned IP and the users IP
Dim strUserAddress , strBlockedIP
' just imagine that this is a banned IP address
strBlockedIP= "147.3.3.1"
' retrieve the user IP address ,
strUserAddress = Request.ServerVariables("LOCAL_ADDR")
'if page visitor address equals to banned IP address
'condition and print error message for visitor .
If strBlockedIP= strUserAddress Then
Response.Write "Error : Your IP address is not allowed to see this page."
'If IP address is not banned.
Else
Response.Write "<b>Page content </b>"
End If
%>
Mon Jan 02, 2012 6:51 pm
Codemiles.com is a participant in the Amazon Services LLC Associates Program, an affiliate advertising program designed to provide a means for sites to earn advertising fees by advertising and linking to Amazon.com
Powered by phpBB © phpBB Group.