[求助]哪位大大帮我进来帮我看看啊!
<script language="VBScript" runat="server">
dim conn,connstr,db
db="search.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db)
conn.Open connstr
</script>
<script language="VBScript" runat="server">
dim connn,connstr2,db2
db2="知识查询库一个表.mdb"
Set connn = Server.CreateObject("ADODB.Connection")
connstr2="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db)
connn.Open connstr2
</script>
<%
keyword=Request.Form("bz_name");
RsG=conn.Execute("select name from search2");
while(!RsG.eof)
{
db=RsG("name");
if (Indexofstr(keyword,db))
{
sql="select * from search3 where name="+"'"+db+"'";
Rs=connn.Execute(sql);
response.Write(Rs("定义"))
}
}
%>
这个程序有什么错吗?他说我“Microsoft JScript 运行时错误 (0x800A138F)缺少对象”
是在“if (Indexofstr(keyword,db))”这一行错,应该怎么该啊,那为大大说说!本人谢谢了!