学峰网论坛-查看贴子

☉〖发表新贴〗〖查看贴子〗〖关闭本页回主页〗☉

 发表新贴  回复贴子

 主题:封IP的ASP代码的实现
99软件站
sz
QQ:000000
发表时间:2005-10-25 4:04:21   IP:218.17.91.212
主题:封IP的ASP代码的实现
　
建一个表:IP论坛封IP
建一个表:IP
2个双精度的字段 IP_start与IP_end

存伫代码形式如下:
存伫的时候,将普通的IP转成双精度数字..
如果:
ip_start=request("ip_start")
ip_ary=split(ip_start,".")
ip_start=ip_ary(0)*256*256*256+ip_ary(1)*256*256+ip_ary(2)*256+ip_ary(3)
ip_and=request("ip_end")
ip_ary=split(ip_end,".")
ip_end=ip_ary(0)*256*256*256+ip_ary(1)*256*256+ip_ary(2)*256+ip_ary(3)
sql="select top 1 * from ip"
rs.open sql,conn,1,3
rs.addnew
rs("ip_start")=ip_start
rs("ip_end")=ip_end
rs.update
----------------------------------- 存伫完毕
查询:
ip=Request.ServerVariables("remote_addr")
ip_ary=split(ip,".")
tmp_ip=ip_ary(0)*256*256*256+ip_ary(1)*256*256+ip_ary(2)*256+ip_ary(3)
sql="select * from ip where ip_start<="&tmp_ip&" and ip_and>="&tmp_ip
rs.open sql,conn,0,1
if no rs.eof then
response.write("你的IP被封")
response.end
end if

2个双精度的字段 IP_start与IP_end

存伫代码形式如下:
存伫的时候,将普通的IP转成双精度数字..
如果:
ip_start=request("ip_start")
ip_ary=split(ip_start,".")
ip_start=ip_ary(0)*256*256*256+ip_ary(1)*256*256+ip_ary(2)*256+ip_ary(3)
ip_and=request("ip_end")
ip_ary=split(ip_end,".")
ip_end=ip_ary(0)*256*256*256+ip_ary(1)*256*256+ip_ary(2)*256+ip_ary(3)
sql="select top 1 * from ip"
rs.open sql,conn,1,3
rs.addnew
rs("ip_start")=ip_start
rs("ip_end")=ip_end
rs.update
----------------------------------- 存伫完毕
查询:
ip=Request.ServerVariables("remote_addr")
ip_ary=split(ip,".")
tmp_ip=ip_ary(0)*256*256*256+ip_ary(1)*256*256+ip_ary(2)*256+ip_ary(3)
sql="select * from ip where ip_start<="&tmp_ip&" and ip_and>="&tmp_ip
rs.open sql,conn,0,1
if no rs.eof then
response.write("你的IP被封")
response.end
end if



 　
E-mail  Homepage

贴子数:1 页数:1

1

 _ 目前有26人在线|访问统计|总访问次|Powered by学峰网Surfeon.net|联系 _