ASP中对IP进行过滤限制函数

<% '获取访问者的地址 ip=Request.ServerVariables("REMOTE_ADDR") '允许的IP地址段为10.0.0.0～10.68.63.255 allow

<% ’获取访问者的地址 ip=Request.ServerVariables("REMOTE_ADDR") ’允许的IP地址段为10.0.0.0～10.68.63.255

'****************************** 'Function CheckIp(cInput_Ip,cBound_Ip) 'Created by qqdao, qqdao@263.

几年以前，我以前的一个大学老师准备利用Microsoft的一台大型赠品设备来组建一个实验室。希望把这个实验室建成某种供学生和职工使用的地方，让他们拥有学院系统（Faculty System）的系统管理

<% ''获取访问者的地址 ip=Request.ServerVariables("REMOTE_ADDR") ''允许的IP地址段为10.0.0.0～10.68.63.255 allowip

'-------------------------------------------------------------------------- '作用:安全字符串检测函数 '名字:SafeCh

'作用:安全字符串检测函数 '名字:SafeCheck '参数:CheckString,CheckType,CheckLength '说明: 'Checkstring待检测字符串:任意字符. 'Che

'-------------------------------------------------------------------------- '作用:安全字符串检测函数 '名字:SafeCh

偶做留言本的时候想起做这么个,具体思路也许不好,做出来只是抛砖引玉,希望有更好的方法! IP添加页是用了一个ListBox, TextBox,两个Button，而在其他的页上则直接用当