屏蔽指定IP段！

<%
dim onlineips:onlineips=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
if onlineips="" then
Dim AspIP:AspIP = Request.ServerVariables("REMOTE_ADDR")
If InStr(AspIP,"211.138")=0 and InStr(AspIP,"218.205")=0 and InStr(AspIP,"211.139")=0 and InStr(AspIP,"117.136")=0 and InStr(AspIP,"211.143")=0 and InStr(AspIP,"121.14")=0 and InStr(AspIP,"125.72")=0 and InStr(AspIP,"124.31")=0 and InStr(AspIP,"218.200")=0 and InStr(AspIP,"218.206")=0 and InStr(AspIP,"211.137")=0 and InStr(AspIP,"211.136")=0 and InStr(AspIP,"211.138")=0 and InStr(AspIP,"218.206")=0 and InStr(AspIP,"211.142")=0 and InStr(AspIP,"211.141")=0 and InStr(AspIP,"218.202")=0 and InStr(AspIP,"221.176")=0 and InStr(AspIP,"220.201")=0 and InStr(AspIP,"123.150")=0 and InStr(AspIP,"218.203")=0 and InStr(AspIP,"211.140")=0 and InStr(AspIP,"124.160")=0 and InStr(AspIP,"113.28")=0 and InStr(AspIP,"61.242")=0 and InStr(AspIP,"221.130")=0 and InStr(AspIP,"221.179")=0 and InStr(AspIP,"218.201")=0 and InStr(AspIP,"218.207")=0 Then
Response.Redirect "http://3g.cn/"
Response.End
End If
End If
%>
这是ASP的。求C#的,感谢！