这段ASP代码那里有错?

来源:百度知道 编辑:UC知道 时间:2024/05/27 18:23:31
<%
dim action:action=request("action")
if action="" then%>
<form action=1.html?action=check method=post>
用户名:
<input type=text size=12 name=user>
口令:
<input type=password size=12 name=password>
<input type=submit value="登陆">
</form>

<%language="VBScrept"
dim id,pwd
id=Trim (request.form("user")
pwd=Trim (request.form("password")
if (id="" or pwd="")
then response.write("请将信息填写完整")
response.end()
end if
set conn=server.creatobject("adodb.connection")
conn.open"drive={microsoft access drive(*.mdb)};dbp="&server.mappath("db1.mdb")
set rs=server.creatobject("adodb.recordset")
cx="select 用户名,密码 from db1 where 用户名="'&id&'" and 密码="'&pwd&'"
set rs=conn.execute(cx)

cx="select 用户名,密码 from db1 where 用户名="'&id&'" and 密码="'&pwd&'"
这一行改成下面这样(也就是把单引号放进又引号里面去

cx="select 用户名,密码 from db1 where 用户名='" & id & "' and 密码='"& pwd & "';"

if not rs.eof then
response.write("欢迎您")
else
response.write("非法用户")
end if
%>
<%end if%>

else换行,再加一个<%end if%>

<%language="VBScrept" ---错
id=Trim (request.form("user") ---错
pwd=Trim (request.form("password") ---错
if (id="" or pwd="")
then response.write("请将信息填写完整") ---错
用户名="'&id&'" and 密码="'&pwd&'" ---错
if not rs.eof then
response.write("欢迎您")
else response.write("非法用户") ---错
end if

if not rs.eof then
response.write("欢迎您")
els