大家帮忙看看这个程序为什么不行
<!--#include file="connect.asp"-->
<%
if request("test")="yes" then
username=request("username")
password=request("password")
set rs=server.createobject ("adodb.recordset")
rs.cursortype=1
sql="select * from userinfo where 用户名="&""&username&""&" and 密码="&""&password&""&" "
rs.open cn,sql,1,3
if rs.recordcount<=0 then
errmsg="你还不是本中心的会员,请先注册"
session("errmsg")=errmsg
rs.close
cn.close
response.redirect "username.asp"
end if
rs.close
cn.close
session("username")=username
response.redirect "main.asp"
end if
%>
<html>
<head>
<meta http-equiv="content-type" content="text/html;charset=gb_2312-80">
</head>
<body>
<p align="center"><b>网上购物</b></p>
<h2>用户登陆：<%errmsg=session("errmsg")%><%=errmsg%></h2>
<form method="post" action="username.asp" name="form1">
<input type="hidden" name="test" value="yes"><p>输入用户名：
<input type="text" name="username" size="20">输入密码：
<input type="text" name="password" size="20"></p>
<p align="center"><input type="button" value="用户登陆" name="b1" onclick="test1()"></p>
</form>
<p align="left"> </p>
<script language="vbscript">
<!--
function test1()
if form1.username.value<>"" form1.password.value<>"" then
form1.submit
else
msgbox "必须输入用户名和密码"
end if
end function
-->
</script>
</body>
</html>
connect.asp这个文件里的程序是
<%
set cn=server.createobject ("adodb.connection")
dbpath=server.mappath("shop.mdb")
cn.open "driver={microsoft access driver (*.mdb)};dbq="&dbpath
%>
数据库里的userinfo表里有6个字段，姓名，通讯地址，邮政编码，用户名，密码，剩余资金
推荐阅读
讨论区