Question

那位大侠帮我看看这段程序asp的错在那里

<!-- #include file="conn.asp" -->
<%
'打开数据库判断用户是否存在,info为表名,username为字段名
set rsc=server.createobject("adodb.recordset")
sqlc="select * from info where username='"&request.Form("username")&"' and password='"&request.Form("password")&"'"
rsc.open sqlc,conn,1,1
session("username")=rsc("username")
session("password")=rsc("password")
session.Timeout=30
set rsc=nothing
response.Redirect("index.asp")
'如果用户不存在,session("username")为空
%>
登陆页面<form name="form1" method="post" action="http://www.rfpchina.org/bbs/login.asp">
<tr>
<td><div align="right">用户名：</div></td>
<td width="10"> </td>
<td><input name="username" type="text" id="username" size="10" /></td>
</tr>

<tr>
<td><div align="right">密 码：</div></td>
<td> </td>
<td><input name="password" type="password" id="password" size="10" /></td>
</tr>

<tr>
<td></td>
<td></td>
<td><input name="Submit" type="Submit" value="提交">    <input type="reset" value="取消" name="reset"></td>
</tr>
</for

Answer 1

<!-- #include file="conn.asp" -->
<%
'打开数据库判断用户是否存在,info为表名,username为字段名
set rsc=server.CreateObject("adodb.recordset")
rsc.Open "select * from info where username='"&request.Form("username")&"' and password='"&request.Form("password")&"'" ,conn,1,1
if not(rsc.bof and rsc.eof) then
session("username")=rsc("username")
session("password")=rsc("password")
session.Timeout=30
rsc.Close
set rsc=nothing
response.Redirect("index.asp")
else
response.write "<script LANGUAGE='javascript'>alert('对不起，登陆失败！');history.go(-1);</script>"
end if
'如果用户不存在,session("username")为空
%>

这样写吧!以我的思想的.你这样的程序的很容易出错的.
前面最好还要检查是否输入为空
不懂再Q我

Answer 2

打开记录集之后，应该是用 If rsc.eof then 来判断一下记录集是否为空，这样就知道验证成不成功了。如果验证不成功，是不会有返回的。

Answer 3

应该没错吧，哪儿出问题了吗？

Answer 4

rsc("username")=session("username")
rsc("password")=session("password")