Microsoft VBScript 运行时错误 (0x800A01B6)请高手指教，在线等，解决立即结帖！！

[fclz2000]

代码如下：
<%option explicit%>
<!-- #include file="conn.asp" -->
<%
dim rs,sql
'ajbh="031013005"
rs=server.createobject("adodb.recordset")
sql="select * from receive where ajbh='031013004'"
response.write sql
'response.end
rs.open sql,conn,1,3 '第 10 行
'rs=execute(sql)
%>
报错如下：
本页无法显示
试图访问的网页出现问题，无法显示。

--------------------------------------------------------------------------------

请尝试以下方法：

单击 刷新按钮或者梢候再试。

打开 localhost 主页，然后查找与所需信息相关的链接。
HTTP 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务

--------------------------------------------------------------------------------

技术信息（适用于支持人员）

错误类型：
Microsoft VBScript 运行时错误 (0x800A01B6)
/one/text_selectajbh.asp, 第 10 行


浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)

页：
GET /one/text_selectajbh.asp

时间：
2003年10月13日, 11:01:24


详细信息：
Microsoft 支持



请高手指教!谢谢

[fclz2000]

是的，谢谢，太粗心了，这几天写得头晕了，哈哈

[fclz2000]

谢谢yyl3227(yyl3227) ( ) ！

[pp4u]

确定conn是否打开
确定ajbh是字符型。

[fclz2000]

conn.asp文件如下：
<%
dim conn,dbpath
set conn=Server.CreateObject("ADODB.Connection")
dbpath=Server.MapPath("./sgclxt.mdb")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&dbpath
%>

ajbh是文本型

[Primer2002cn]

conn.open了吗？

[fclz2000]

conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&dbpath

这句打开了呀

[fclz2000]

我还以为是一个小问题，这么长时间了也没人回答上来,语句应该没什么问题，难道是我的机器出毛病了？郁闷...

[lovehwq21]

把这句sql="select * from receive where ajbh='031013004'"
换成sql="select * from receive"
看看行不行运行

[yyl3227]

rs=server.createobject("adodb.recordset")

应该是 set rs=server.create......你少了 set

[cybernaute]

up