如何最大限度地实现安全登录功能？_编程10000问_

<％
if not IsEmpty(Session("cust—id")) and Len(Session("cust—id"))>0 then

' 用户登录后指向主页.
　Response.Redirect("navigation/dashbrd.asp")

　' 在此添入真正的主页URL.

end if

bLogin = False　　

' 设置标志.
bError = False
if IsEmpty(Request("uid")) or Len(Request("uid")) = 0 or IsEmpty(Request("pwd")) or Len(Request("pwd")) = 0 then　　

'检查空字符.
　　bLogin = True
else

----------------------------------------------------------------------------------------------------------------
' 检验数据库保存密码表中是否有该用户.
"select ＊ from customer WHERE cust—id=′　"＆ request("uid") ＆"′ and ′cust—pwd=′"＆ request(″pwd″) ＆"′"
'连接数据库,其中request(″uid″)和request(″pwd″) 为本页html中表单中的用户名和密码的text.

　　gbFound = False
----------------------------------------------------------------------------------------------------------------

　　if not rsCust.BOF and not rsCust.EOF then
提示： 本文由神整理自网络，如有侵权请联系本站删除！
本站声明：
1、本站所有资源均来源于互联网，不保证100%完整、不提供任何技术支持；
2、本站所发布的文章以及附件仅限用于学习和研究目的;不得将用于商业或者非法用途；否则由此产生的法律后果，本站概不负责！