求一段代码,请各位帮忙
有一个程序,需要判断用户是不是10.0.0.0 IP段的,如果不是弹出一个提示,是的话直接转入页面,我不会写这个判断了,哪位帮帮忙,不尽感谢
用户的IP可能是 10.10.16.10、10.10.130.18、10.20.25.36等等,
问题点数:20、回复次数:3Top
1 楼icejd()回复于 2006-02-18 14:21:04 得分 0
其他的IP应该都是公网的了Top
2 楼shown_james(咖啡)回复于 2006-02-18 14:59:44 得分 20
userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR")
myip=split(userip,".")
for i = 1 to ubound(myip)
Top
3 楼shown_james(咖啡)回复于 2006-02-18 15:01:33 得分 0
userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR")
myip=split(userip,".")
if myip(1)<> 10 then
'提示
end if
前面按错发了一半的了
Top




