MyException - 我的异常网
当前位置:我的异常网» VB » 请问 连接Access数据库时总是出现对象变量或with块

请问 连接Access数据库时总是出现对象变量或with块变量异常

www.MyException.Cn  网友分享于:2013-12-31  浏览:8次
请教 连接Access数据库时总是出现对象变量或with块变量错误?
用Adodc访问Access数据库定义了一个连接数据库的函数
Public   cnn   As   ADODB.Connection
Public   rst   As   ADODB.Recordset
Public   Sub   DBConnect()
Dim   CONSTER   As   String
CONSTER   =   "Provider=Microsoft.Jet.OLEDB.4.0;Data   Source=F:\luntai\luntai.mdb;Persist   Security   Info=False "
cnn.ConnectionString   =   CONSTER
cnn.Open
If   cnn.State   <>   adStateOpen   Then
MsgBox   "数据库连接失败 ",   vbOKOnly   +   vbCritical,   "连接失败 "
End   If
End   Sub
帮忙看看是代码错误吗

------解决方案--------------------
发多张帖干什么,你没有实例化,引用ado2.5的版本

在申明中加个as new

文章评论

软件开发程序错误异常ExceptionCopyright © 2009-2015 MyException 版权所有