在Access开发中,我们有时会调用其他数据库的函数,做成多层架构。
首先是如何用代码打开另外的Access数据文件?
这里我们通过CreateObject 函数来打开mdb(accdb)文件
Public Sub openAccess()
Dim acc As Access.Application
Set acc = CreateObject(\”access.Application\”) \’
acc.OpenCurrentDatabase \”C:\\Documents and Settings\\Administrator\\桌面\\罗斯文1.accdb\”, True \’ 打开APP的一个数据库
End Sub
运行代码效果图
详细源码:
http://www.office-cn.net/access-office/408.html
版权声明:本文图片和内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请发送联系客服 举报,一经查实,本站将立刻删除,请注明出处:https://www.4kpp.com/72005.html