28,406
社区成员
发帖
与我相关
我的任务
分享关于ASP SQL 查询问题,在线等,
这是我的那段源码
这是CONN.ASP
<%
dim conn
set conn = server.createobject("adodb.connection")
conn.connectionstring= "provider=microsoft.jet.oledb.4.0;" & "data source =" & server.mappath("/data/wangxin.mdb")
conn.open
%>
dim lsuser,lsps,sql,rs
lsuser=request("username")
lsps=request("password")
aa="SELECT * FROM userku WHERE user = "&lsuser&" and password= "&lsps&" "
set rs = conn.execute("sql")
这是出的错误
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft JET Database Engine 错误 '80040e14'
无效的 SQL语句；期待 'DELETE'、'INSERT'、'PROCEDURE'、'SELECT'、或 'UPDATE'。
/yz.asp，行16
这到底是什么问题呀???
这是CONN.ASP
<%
dim conn
set conn = server.createobject("adodb.connection")
conn.connectionstring= "provider=microsoft.jet.oledb.4.0;" & "data source =" & server.mappath("/data/wangxin.mdb")
conn.open
%>
dim lsuser,lsps,sql,rs
lsuser=request("username")
lsps=request("password")
aa="SELECT * FROM userku WHERE user = "&lsuser&" and password= "&lsps&" "
set rs = conn.execute("sql")
这是出的错误
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft JET Database Engine 错误 '80040e14'
无效的 SQL语句；期待 'DELETE'、'INSERT'、'PROCEDURE'、'SELECT'、或 'UPDATE'。
/yz.asp，行16
这到底是什么问题呀???
...全文
请发表友善的回复…
发表回复
flyczb 2005-04-02
- 打赏
- 举报
老大,给了,只不过是给上边那个回复了,HEHE,小弟新来的有点笨
flyczb 2005-04-02
- 打赏
- 举报
对不起,给错了
peijunfeng 2005-04-01
- 打赏
- 举报
set rs = conn.execute("sql")多了一对引号
flyczb 2005-04-01
- 打赏
- 举报
风之友,谢谢了,好了
jinjie0577 2005-04-01
- 打赏
- 举报
set rs = conn.execute("sql")
告诉你要去掉引号了
应该是
set rs=conn.execute(sql)
告诉你要去掉引号了
应该是
set rs=conn.execute(sql)
flyczb 2005-04-01
- 打赏
- 举报
conn.asp
<%
dim conn
set conn = server.createobject("adodb.connection")
conn.connectionstring= "provider=microsoft.jet.oledb.4.0;" & "data source =" & server.mappath("/data/wangxin.mdb")
conn.open
%>
index.asp
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>网信虚拟主机及服务器托管管理系统</title>
</head>
<body>
<table background="image/bg.jpg" width="800" height="600" border="0" align="center">
<tr>
<td align="center">
<font size="+5">欢迎光临网信管理页面</font><br><br><br>
<form name="login" method="post" action="yz.asp">
用户名<input type="text" name="username" size="20" maxlength="40"><br>
密 码<input type="password" name="password" size="20" maxlength="40"><br>
<input type="submit" value="确定">
<input type="reset" value="取消">
</form>
</td>
</tr>
</table>
</body>
</html>
yz.asp
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<!-- #include file="inc/conn.asp" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
<%
dim lsuser,lsps,sql,rs
lsuser=request("username")
lsps=request("password")
sql="SELECT * FROM userku WHERE user = '"&lsuser&"' and password= '"&lsps&"' "
set rs = conn.execute("sql")
if not rs.bof then
rs.close
response.redirect "welcome.asp"
else
response.redirect"sorry.asp"
end if
%>
</body>
</html>
<%
dim conn
set conn = server.createobject("adodb.connection")
conn.connectionstring= "provider=microsoft.jet.oledb.4.0;" & "data source =" & server.mappath("/data/wangxin.mdb")
conn.open
%>
index.asp
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>网信虚拟主机及服务器托管管理系统</title>
</head>
<body>
<table background="image/bg.jpg" width="800" height="600" border="0" align="center">
<tr>
<td align="center">
<font size="+5">欢迎光临网信管理页面</font><br><br><br>
<form name="login" method="post" action="yz.asp">
用户名<input type="text" name="username" size="20" maxlength="40"><br>
密 码<input type="password" name="password" size="20" maxlength="40"><br>
<input type="submit" value="确定">
<input type="reset" value="取消">
</form>
</td>
</tr>
</table>
</body>
</html>
yz.asp
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<!-- #include file="inc/conn.asp" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
<%
dim lsuser,lsps,sql,rs
lsuser=request("username")
lsps=request("password")
sql="SELECT * FROM userku WHERE user = '"&lsuser&"' and password= '"&lsps&"' "
set rs = conn.execute("sql")
if not rs.bof then
rs.close
response.redirect "welcome.asp"
else
response.redirect"sorry.asp"
end if
%>
</body>
</html>
flyczb 2005-04-01
- 打赏
- 举报
我是按各位说的改的,就是不行,要不我贴全了你们看看
flyczb 2005-04-01
- 打赏
- 举报
还是不行,谢谢各位老大,到底是哪里的错误呀
tonisove 2005-04-01
- 打赏
- 举报
sql="SELECT * FROM userku WHERE [user] = '"&lsuser&"' and [password]= '"&lsps&"' "
set rs = conn.execute(sql)
set rs = conn.execute(sql)
flyczb 2005-04-01
- 打赏
- 举报
对不起打错了,那个是SQL,我就是换成SQL,也出一样的错误
kellybs 2005-04-01
- 打赏
- 举报
aa="SELECT * FROM userku WHERE user = "&lsuser&" and password= "&lsps&" " ‘这里是aa
set rs = conn.execute("sql") '这里是sql
set rs = conn.execute("aa")
变量不一致啊
set rs = conn.execute("sql") '这里是sql
set rs = conn.execute("aa")
变量不一致啊
jinjie0577 2005-04-01
- 打赏
- 举报
aa="SELECT * FROM userku WHERE user = "&lsuser&" and password= "&lsps&" "
set rs = conn.execute("sql")
既然你sql语句给了aa,那你执行语句当然也要用aa了，即set rs=conn.execute(aa)
括号里不能用引号
还有user字段应该是字符型的吗，那语句里要写'"&lsuser&"'
set rs = conn.execute("sql")
既然你sql语句给了aa,那你执行语句当然也要用aa了，即set rs=conn.execute(aa)
括号里不能用引号
还有user字段应该是字符型的吗，那语句里要写'"&lsuser&"'
flyczb 2005-04-01
- 打赏
- 举报
各位大侠帮帮我呀
jinjie0577 2005-04-01
- 打赏
- 举报
晕，5分都不给啊
