国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

如何使用 Microsoft Access 和 Active Server Pages 加密你的頁面

2019-11-18 22:44:22
字體:
來源:轉載
供稿:網友
  這是一個非常簡單的加密程序,大家自己看看!
<%
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='javascr Response.End
End If
conn.close
%>
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 贵港市| 克拉玛依市| 贡觉县| 华蓥市| 山丹县| 张北县| 察雅县| 淄博市| 独山县| 航空| 内丘县| 安义县| 玉溪市| 衡水市| 吉林省| 深水埗区| 阿尔山市| 晋城| 长寿区| 博爱县| 横山县| 宝兴县| 秭归县| 利川市| 军事| 政和县| 夏邑县| 洛阳市| 漠河县| 凤阳县| 泗阳县| 海林市| 读书| 永顺县| 肇源县| 普宁市| 宁晋县| 汝南县| 佛冈县| 芦山县| 丰城市|