这一行"rs.open sql,conn,1,3出现"至少一个参数没有指定值的错误"这个问题出现好几次了,到底是怎么回事呢? 15
<html><!--#includefile="../inc/conn.asp"--><%keywords=Request.Form("sousuo")'关键字IfTri...
<html>
<!--#include file="../inc/conn.asp"-->
<%
keywords = Request.Form("sousuo") '关键字
If Trim(keywords) = "" Then
Response.Write "<script>alert('请输入查询搜索关键字！');history.back();</script>"
Response.End
End If
keywords =Trim(Request.Form("sousuo")) '去掉字符串左边和右边空格
Set rs = Server.CreateObject("ADODB.RecordSet")
sql = "Select * from tongxunlu where keywords='"&xm&"'"
rs.open sql,conn,1,3 '执行查询，结果保存在rs中
If rs.EOF or rs.BOF Then '不存在记录
Response.Write("<script>alert('没有包含关键字的记录')</script>")
Response.End
Else '存在记录
Do While Not rs.EOF '循环显示所有记录的id
%>
<%=rs("xm")%> <%=rs("shoujihaoma")%> <%=rs("email")%>
<br>
<%
rs.MoveNext
Loop
rs.close
set rs=nothing
End If
%>
</body>
</html> 展开
<!--#include file="../inc/conn.asp"-->
<%
keywords = Request.Form("sousuo") '关键字
If Trim(keywords) = "" Then
Response.Write "<script>alert('请输入查询搜索关键字！');history.back();</script>"
Response.End
End If
keywords =Trim(Request.Form("sousuo")) '去掉字符串左边和右边空格
Set rs = Server.CreateObject("ADODB.RecordSet")
sql = "Select * from tongxunlu where keywords='"&xm&"'"
rs.open sql,conn,1,3 '执行查询，结果保存在rs中
If rs.EOF or rs.BOF Then '不存在记录
Response.Write("<script>alert('没有包含关键字的记录')</script>")
Response.End
Else '存在记录
Do While Not rs.EOF '循环显示所有记录的id
%>
<%=rs("xm")%> <%=rs("shoujihaoma")%> <%=rs("email")%>
<br>
<%
rs.MoveNext
Loop
rs.close
set rs=nothing
End If
%>
</body>
</html> 展开
1个回答
展开全部
笨蛋,你没有定义 XM(姓名)
sql = "Select * from tongxunlu where keywords='"&xm&"'"
是不是把 keywords 和 xm搞反了
sql = "Select * from tongxunlu where keywords='"&xm&"'"
是不是把 keywords 和 xm搞反了
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
