ASP与数据库,有用的代码(转贴,摘贴)(3)


      ‘以上几句判断是否已经读完数据库中的记录,如果没有,就向后读,如果已经完成,则验证用户名及密码。如果验证通过,则为true,反之为flase
        %> 
        <% 
        if isEmpty(session("passed")) then session("passed")=false 
      '判断用户输入信息 
        id=request("id") ‘获取用户id(用户名)
        psd=request("psd") ‘获取用户psd(密码)
        if id="" or psd="" then 
        response.write"请输入您的登录名及密码。" '如果用户没有输入完整的信息,返回出错信息。 
        elseif not checkpwd(id,psd) then 
        response.write"用户名或密码错误!<br>请检查你的用户名及密码然后再试一次!" 
      ‘如果用户已经输入完整信息,但输入错误也返回出错信息。
        else session("passed")=true 
        end if
        if not session("passed") then%> 
      ‘用户输入的信息完全正确并验证通过,以下开始编写html代码,做一个用户登录界面。
        <html>
        <head>
        <meta http-equiv="Content-Type" content="text/html; 
      charset=gb2312">
        <title>请您输入您的用户名及密码!</title>
        </head>
        <body bgcolor="#000000" text="#FFFFFF">
        <p align="center">  
        <p align="center"> </p> 
        <p align="center"><b><font face="黑体" 
      size="6">用户登录首页</font></b></p> 
        <p align="center"> </p> 
        <form method="POST" 
      action="<%=request.serverVariables("psd.mdb")%>"> 
        <table border="0" width="100%" cellspacing="0" cellpadding="0"> 
        <tr> 
        <td width="41%" align="right">用户名:</td> 
        <td width="59%"><input type="text" name="id" size="20" 
      value="<%=id%>"></td> 
        </tr> 
        <tr> 
        <td width="41%" align="right"> 密 码:</td> 

内容版权声明:除非注明,否则皆为本站原创文章。

转载注明出处:http://www.heiqu.com/2906.html