当前位置: 首页 > 图文教程 > 网络编程 > ASP > 如何使用 Microsoft Access 和 Active Server Pages 加密你的页面

ASP
asp中缓存cache技术的应用
escape解决AJAX中文乱码的简单方法
提高asp程序访问速度的方法
17个ASP编程基础典型代码
用asp编写类似搜索引擎功能的代码
ASP-server.URLEncode反函数:urldecode
判断远程图片是否存在的asp技巧
ASP采集-ASP采集程序原理
好用的asp防SQL注入代码
asp中提取HTML中图片的SRC路径
FileSystemObject 示例代码
asp动态页面生成html页面
ASP中的常用服务器检测源码
asp无组件上传并插入到数据库里
ASP+AJAX做类似google的搜索提示
asp的RegExp对象正则表达式功能用法
ASP怎样获得代码中第一张图片地址
ASP实现多域名同一空间的处理实例
ASP无组件上载,带进度条,多文件上载
用GetString来提高ASP的速度

ASP 中的 如何使用 Microsoft Access 和 Active Server Pages 加密你的页面


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 40 ::
收藏到网摘: n/a

    这是一个非常简单的加密程序,大家自己看看!
<%
userid = Request("userid")
userpass = Request("userpass")

Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("userinfo.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath

userid=trim(userid)
userpass=trim(userpass)
sql="select * from [userinfo]"
set Rs=Conn.execute(sql)
while not (Rs.bof or Rs.eof )
if userid=trim(Rs("用户名")) and userpass=trim(Rs("密码")) then
flag = "1"
end if
Rs.movenext()
wend
if flag = "1" then
Rs.close()
else
Rs.close()
Response.Write "<center>对不起,此用户不存在或密码不正确,请重试!</center><p align='center'><a href='javascript:history.go(-1);'>点这里回上一页!</a>"
Response.End
End If
conn.close
%>