调用adodb.connection时出现 运行时错误'-2147023898(800703e6)'Automation错误

[求知不倦]

Dim cn As ADODB.Connection
Set cn = CreateObject("adodb.connection")

出现 运行时错误'-2147023898(800703e6)'Automation错误

[province_]

那是因为你的机器里没安装数据库引擎（这句话我好象在N多帖里写过^_^）,找个MDAC_TYP.EXE文件安装一下吧

[求知不倦]

感谢 province_(雍昊) ,现在那个问题没出现了,但执行晚语句后退出程序时出现内存错误.
我在
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
cn.Close
Set cn = Nothing
end sub
中已写了这几句

[mustudent]

那就是释放了内存了啊

[hr88rong]

它错误怎么提示啊？
你加个判断CN的状态
if cn.state=1 then
cn.close
set cn=nothing
endif
这样行否？

[province_]

把关闭及释放放到其他地方，比如用完记录集后试试，我还没碰见过这种错误。

[求知不倦]

感谢各位的回复！！！