网络编程
位置:首页>> 网络编程>> Asp编程>> ASP用户登录验证代码

ASP用户登录验证代码

  发布时间:2008-05-15 12:49:00 

标签:验证,登录,asp

asp+access用户登录代码,loginnew.asp网面包含了登录框及验证用户的代码

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>登录 - asp之家</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>
0
投稿

猜你喜欢

手机版 网络编程 asp之家 www.aspxhome.com