当前位置：首页 > 资讯 > 技术文档

如何用Access加密页面？

时间：2020-10-12 21:31 编辑：来源：阅读：
扫一扫，手机访问

摘要：如何用Access加密页面？

<% 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 %>

全部评论(0)

上一篇：图像图表
下一篇：如何制作一个文本文件编辑器？

资讯排行榜
更多>>