ASP使用者登入代碼

來源:互聯網
上載者:User

asp+access使用者登入代碼,an.mdb資料庫名
fd表名
y_username使用者名稱欄位,y_password密碼欄位.
loginnew.asp網頁
<%
dim username,password
 
 username=request.form("username")
 password=request.form("password")
 set rs=server.createobject("adodb.recordset") 
 conn = "DBQ=" + server.mappath("huiyuan.mdb") + ";DefaultDir=;
DRIVER={Microsoft Access Driver (*.mdb)};" 
 sql="select * from pUser213 where y_username='"&username&"'"
 rs.open sql,conn,1,1
 if rs.eof then
  response.write "<script>alert('登入失敗');history.back();</script>"
  response.end
  else
    if rs("y_password")<>password then
      response.write "<script>alert('登入失敗');history.back();</script>"
      response.end     
     end if      
     session("admin")=username
response.write"<script>alert('登入成功');location.href='index.asp'</script>"
  end if
%>
再來看html 代碼.
login.htm頁面
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>登入</title>
</head>
<body>
<p> </p>
<form name="form1" method="post" action="loginnew.asp">
  <table width="200" border="1" align="center" cellpadding="0" cellspacing="0">
    <tr> 
      <td colspan="2"><div align="center">登入</div></td>
    </tr>
    <tr> 
      <td width="57"><div align="center">使用者名稱</div></td>
      <td width="137" valign="top"><input name="username" type="text" 
id="username" size="25"></td>
    </tr>
    <tr> 
      <td><div align="center">密碼</div></td>
      <td valign="top"><input name="password" type="password" 
id="password" size="25"></td>
    </tr>
    <tr> 
      <td colspan="2"><div align="center"> 
          <input type="submit" name="Submit" value="提交">
        </div></td>
    </tr>
  </table>
</form>
</body>
</html>

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.