一个登录页面

大师傅

管理提醒： 本帖被 醉雪枫叶 执行锁定操作(2007-09-27)    不知道代码哪里错了，按F12后，没有出现填写用户名和密码的表单，而只有"Running,欢迎您再次到来"和“退出登录”。怎么搞的？
  代码如下（本来想发附件的，一直发不上）:
  <!-- #include file="db.inc.asp" -->    '这是个与数据库连接的文件
<%
set rst=server.CreateObject("adodb.recordset")
if request.QueryString("act")="login" then
'登录
sql="select * from user where u_user='"&request.Form("f_user") & "'"
sql=sql & " and u_code='" & request.Form("f_code") & "'"
rst.open sql,conn,1,1
if rst.recordcount>0 then
session("user")=rst("u_user")
'用这个SESSION变量表示用户是否已经登录
session("acc")=true
else
response.Write"用户名或密码错误！登录不成功！"
end if
rst.close
elseif request.QueryString("act")="loginout" then
'退出登录
session("user")=""
session("acc")=false
end if
%>
   
<%
    if not session("acc") then
    %>
   
    <form id="form1" name="form1" method="post" action="login.asp?act=login">
        <p><span class="style4"><span class="style5">用户名</span>:</span>
          <input name="f_user" type="text" id="f_user" size="20">
  </p>
        <p><span class="style4"><span class="style5">密码</span>：</span>　
          <input name="f_code" type="password" id="f_code" size="20">
        </p>
        <p>　　　　　　　　
          <input type="submit" name="Submit" value="登录">   
          </p>
    </form>
   
    <p>
    <% else %>
    <span class="style6"><%=session("user")%>,欢迎您再次到来！</span></p>
    <p align="center"><br/>
        
      <a href="login.asp?loginout" class="style6">退出登录</a></p></td>
    <td>
    <% end if %>
    </td>
[ 此贴被盆盆儿在2007-09-26 14:24重新编辑 ]