 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
这是一个异常简朴的加密程序，大家自己看看！ <% 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 %> 返回类别: 教程 上一教程: 一点ASP问题、差错和个人心得 下一教程: 使用SQL MAIL收发和自动处理邮件 您可以阅读与"如何使用MICROSOFT ACCESS和ACTIVE SERVER PAGES加密你的页面"相关的教程: · 如何使用 MICROSOFT ACCESS 和 ACTIVE SERVER PAGES 加密你的页面 · 如何使用ASP制作类似安装向导的页面 · 加密你的ASP页面-SCRIPT ENCODER初探 · 使用ASP加密算法加密你的数据（二） · 加密你的ACCESS数据库 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
