当前位置:首页>>开发编程>>ASP>>新闻内容  |虚拟主机 主机托管
ASP实现简单的网页保护
作者: 发布时间:2006-4-7 14:30:16 | 【字体:

   主要使用request对象的ServerVariables属性,通过它来获得环境变量的值。使用的语法为:Request.ServerVariables(variable),“variable”表示环境变量的名称,如服务器主机名称、Web服务器软件名等等,若“variable”为“REMOTE_ADDR”则表示访问者的IP地址,通过它就可以实现IP地址的过滤。

   源程序如下:(文件名:demo.ASP)

   <html>
   <head>
   <meta http-equiv=“Content-Type” content=“text/html; charset=gb_2312-80”>
   <meta name=“GENERATOR” content=“Microsoft FrontPage Express 2.0”>

   <style>
   <!--
   .as{ line-height: 15px; font-size: 9pt }
   a:hover {color: rgb(0,51,240);text-decoration:underline}
   .p9 { font-family: “宋体”; font-size: 9pt; line-height: 15pt}
   .p12 { font-family: “宋体”; font-size: 12pt; line-height: 18pt}
   a:link { text-decoration: none;}
   a:visited { text-decoration:none;}
   a:hover {text-decoration: underline;font-size: 125%;color:blue}
   -->
   </style>

   <title>ASP页面防火墙功能演示</title>
   </head>

   <body background=“back.jpg”>
   <%
   ′使用Request.ServerVariables(“REMOTE_ADDR”)得到IP地址并保存在变量rip中
   rip=Request.ServerVariables(“REMOTE_ADDR”)
   strip=cstr(rip)
   ′取得IP地址第三个段的值并保存到strip中

   for i=1 to 2
   strip=right(strip,len(strip)-instr(1,strip,“.”))
   next

   strip=left(strip,instr(1,strip,“.”)-1)
   ′IP地址有效性检验及密码验证,包括两方面的内容:
   ′如果IP地址符合则通过验证;如果IP地址不符合则检验输入的密码是否正确(此处密码为“asp”)
   if (left(rip,5) <> “127.1” or strip<“1” or strip>“50”) and request(“Passwd”)<>“asp” then
   %>
   <p><font color=“#FF0000”>对不起,你的IP是<%=rip%>,本页面可以访问的IP是127.1.1.*到127.1.50.*之间,如果你是本单位内部网的用户,请确认你的浏览器没有使用代理!<BR></font></p>

   <form action=“demo.asp” method=“POST” id=form1 name=form1>
   <p>请输入访问密码:<input type=“password” name=“Passwd” > <input type=“submit” value=“确认” name=“B1”>;
   </p>
   </form>

   <%else %>
   ′合法用户可以访问的页面,在此可以加入任何信息
   祝贺您,您已经顺利通过了页面的安全认证,可以直接使用本站点的资源!
   <%end if%>
   </body>
   </html>


   实际使用只要稍微修改上面的程序(如IP地址等信息)就可以了,当然这只是在一个页面中实现了安全防范功能,如果一个网站有多个页面的话,可以设置一个session变量来对用户进行标志,以在后面的页面中进行判断。


文章来源:ASPcool.com
·ASP的escape和unescape函数
·使用AspUpload组件上传事例代码
·Godaddy虚拟主机使用AspUpload组件的方法
·怎样解决ASP图片上传漏洞的方法
·ASP里面的四舍五入函数Round和FormatNumber
·ASP 程序实现自动升级功能
·chr码值对应列表大全
·用正则表达式搜索网页手机号码和Email
·ASP在线转flv+所略图+flash在线录制视频
·让163网易相册QQ相册里的照片也能外链
 放生
 愚爱
 够爱
 触电
 白狐
 葬爱
 光荣
 画心
 火花
 稻香
 小酒窝
 下雨天
 右手边
 安静了
 魔杰座
 你不像她
 边做边爱
 擦肩而过
 我的答铃
 怀念过去
 等一分钟
 放手去爱
 冰河时代
 你的承诺
 自由飞翔
 原谅我一次
 吻的太逼真
 左眼皮跳跳
 做你的爱人
 一定要爱你
 飞向别人的床
 爱上别人的人
 感动天感动地
 心在跳情在烧
 玫瑰花的葬礼
 有没有人告诉你
 即使知道要见面
 爱上你是一个错
 最后一次的温柔
 爱上你是我的错
 怎么会狠心伤害我
 不是因为寂寞才想
 亲爱的那不是爱情
 难道爱一个人有错
 寂寞的时候说爱我