问关于ASP站内搜索的问题?

来源：百度知道编辑：UC知道时间：2024/05/30 14:39:48

代码如下,数据库已接好的,运行时出现:
错误类型：
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''
/我的作品/Succeed/manage/resoarces_search.asp, 第 198 行

(198行这行do while not rs.eof ,如果去掉这行及 rs.movenext loop时出现:Microsoft VBScript 运行时错误 (0x800A000D)
类型不匹配 (就是这行<%=rs("resoarces4")%>)
)

请问,这是如何解决啊,昨晚我通宵也摘不好,真火!
<%
dim resoarces1,aa1,rs

resoarces1=request("resoarces1")
if resoarces1<>"" then
strSql="Select * From resoarces Where resoarces1 Like '%" & resoarces1 & "%'"
set rs=db.execute(strsql)

If rs.RecordCount<=0 Then
aa1="对不起，没有找到信息"
Else
aa1="共找到" & rs.RecordCount & "条记录"
end if

else

'如果没有输入信息就不执行下列语句
If Trim(Request("resoarces1"))<>"" Then
'以姓名为关键字查找
strSql="Select * From resoarces Where reso

rs.RecordCount 用这样的表现形式,你要新建一个rs..不要用
set rs=db.execute(strsql) 这种写法!!!
用这种
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open strsql,conn,1,1

在显示的时候你没有判断是属于哪种情况(是否搜索到结果)

问关于ASP站内搜索的问题? 关于asp站内搜索的问题关于ASP的站内搜索 ASP站内搜索的问题关于ASP程序站内搜索问题 ASP中站内搜索的问题关于站内搜索的问题 ASP站内搜索，数据库连接问题。。。。。 ASP站内搜索，数据库连接问题.............. ASP站内搜索关键字问题