国产探花免费观看_亚洲丰满少妇自慰呻吟_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
%>
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 南召县| 犍为县| 乌海市| 丽江市| 灵丘县| 莱芜市| 玛沁县| 沽源县| 平安县| 容城县| 武功县| 福清市| 铁力市| 聂拉木县| 沐川县| 平罗县| 三门峡市| 汉中市| 波密县| 安新县| 通州区| 喜德县| 连山| 龙州县| 平塘县| 东乡族自治县| 牙克石市| 北京市| 武汉市| 都江堰市| 通河县| 乃东县| 赤峰市| 珲春市| 乌拉特后旗| 虞城县| 喀喇沁旗| 邹城市| 河津市| 榆中县| 庆安县|