<table width="100%" border="0" cellspacing="2" cellpadding="2">
      <tr>
        <td width="10%">&nbsp;</td>
        <td width="20%">用户名：</td>
        <td><input name="user" type="text" id="user" size="19" style="font-size: 12px" />        </td>
      </tr>
      <tr>
        <td width="10%">&nbsp;</td>
        <td width="20%">密　码：</td>
        <td><input name="password" type="password" id="password" size="20" style="font-size: 12px" />        </td>
      </tr>
      <tr>
        <td colspan="3" align="center"><input type="submit" name="submit" value=" 登 录 " class="tbutton" />
          &nbsp;
          <input type="reset" name="Submit" value=" 重 置 " /></td>
      </tr>
    </table>
如何将它运行 实训作业 要后台管理

<form name="loginForm" method="post" action="?action=Check" onSubmit="return CheckForm();">
    <table width="500" border="0" align="center" id="login">
        <tr>
            <th colspan="2" align="left" scope="col">管理员登陆</th>
        </tr>
        <tr>
            <td width="131" align="right" valign="middle">用户名：</td>
            <td width="359" align="left" valign="middle"><input id="username" name="username" type="text" /></td>
        </tr>
        <tr>
            <td align="right" valign="middle">密&nbsp;&nbsp;码：</td>
            <td align="left" valign="middle"><input id="password" name="password" type="password" /></td>
        </tr>
        <tr>
            <td colspan="2" align="center"><input name="input" type="submit" value="确定"  style="height:30px;" /></td>
        </tr>
        <tr>
            <td colspan="2" align="center" class="copyrhght">CopyRight &copy;2009-2010 <a target="_blank" href="http://www.">办公100分</a>.All Rights Reserved.</td>
        </tr>
    </table>
</form>

处理页面

if Request.QueryString("action")="Check" then
    Dim username,password
    Dim sql,rs
    username = trim(replace(request.form("username"),"'",""))
    password = trim(replace(request.form("password"),"'",""))

    set rs = server.createobject("adodb.recordset")
    sql = "select * from Admin where UserName = '"&username&"'"
        rs.open sql,conn,1,3
            if rs.eof and rs.bof then
              Response.write "<script>alert('没有这个用户名!');</script>"
              Response.End()
            else
                if  rs("password") <> md5(password) then
                    Response.write "<script>alert('密码错误!');';</script>"
                    Response.End()
                else
                    Session("UserName")=username
                    Response.Redirect("main.asp")
                end if
            end if
        rs.Close             
    Set rs=Nothing 
End if

楼上的言简意赅！ 呵呵

想问一下 2楼这样的判断是否会产生 一个用户名可以通过多个密码访问呢？ 假如说李四和张三都注册了  那么张三也可以用李四的密码登录！

我想说的是 两个条件应该一起判断 ！

if Request.QueryString("action")="Check" then
    Dim username,password
    Dim sql,rs
    username = trim(replace(request.form("username"),"'",""))
    password = trim(replace(request.form("password"),"'",""))
    if username = "" then
       写入提示
       response.end
    end if
    if password = "" then
       response.end
    end if
    '还有对提交的数据是否含有 SQL注入符号
    set rs = server.createobject("adodb.recordset")
    sql = "select * from Admin where UserName = '"&username&"'"
        rs.open sql,conn,1,3
            if rs.eof and rs.bof then
              Response.write "<script>alert('没有这个用户名!');</script>"
              Response.End()
            else
                if  cstr(rs("password")) <> cstr(md5(password)) then
                    Response.write "<script>alert('密码错误!');';</script>"
                    Response.End()
                else
                    Session("UserName")=username
                    Response.Redirect("main.asp")
                end if
            end if
        rs.Close            
    Set rs=Nothing
End if

[ 本帖最后由 ysf0181 于 2012-2-14 15:17 编辑 ]

这个还是一样吧！
sql = "select * from Admin where UserName = '"&username&"'and password='"password"'"
rs.open sql,conn,1,3
if rs.eof then
Response.write "<script>alert('用户名已存在或者密码错误!');</script>"
Response.End()
else
Session("UserName")=username
Response.Redirect("main.asp")
end if
这个部分的代码改成这样 是不是能够避免我所说的那个问题呢！ 我新手！刚学这个东西！有错的地方希望高手指出！

你这样写，安全性比较底的。

为什么？对于这个东西我是初学！所以有很多地方都不怎么懂！ 我的疑问就是你这样的判断 会不会导致 张三注册了 李四也注册了 然后张三登录 账户名是存在的 然后他用的是李四的密码 是不是也同样可以登录？