
你可以在程序中加上检查,在打开文件前检查文件是否存在,如晌裤果不存在就创建文件。
这样就避免出错了。
祝宴胡简好运,望采纳。
出现上述错误,表示打开 数据库(Access数据库)文件的路径是无效的!1、检查你定义的数据文件及其路径
Stpath = ThisWorkbook.Path &Application.PathSeparator &"\" &"RB.MDB"
如果想用绝对路径,就直接给出数据文件及路径。
如:
Stpath ="D:\RB.MDB"
如果数据文件放在自己开发程序的目录里面,态举可以如下
If Right$(App.Path, 1) <>"\" Then
stPath = App.Path + "\RB.MDB"
else
stPath = App.Path + "RB.MDB"
End If
2、采用ADODB 连接Access 数据库时,如果数据库没有侍渗密码,连接字符串简老闭脊单处理
如:
Dim adoConnStr As String
Dim adoConn As New ADODB.Connection
adoConStr="Provider=Microsoft.Jet.OLEDB.4.0Persist Security Info=False
Data Source=" &StPath
adoConn.Open adoConStr
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)