office交流網--QQ交流群號及微信交流群

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

微信交流群(請用微信掃碼)

        

vba動態(tài)創(chuàng)建Access數據庫文件

2017-12-18 16:01:00
tmtony8
原創(chuàng)
6051

有網友問到如何在ACCESS窗體上執(zhí)行命令,在指定文件夾生成一個ACCESS數據文件。

利用代碼動態(tài)創(chuàng)建一個Access數據庫文件在運用中確實會經常用。因為有時需要把數據導入到一個新的Access數據庫中。



示例,在C盤中創(chuàng)建一個名為“我的數據庫”的accdb文件。

Public Sub CreateMdbFile()
    Dim myCat As New ADOX.Catalog
    Set myCat = CreateObject("ADOX.Catalog")
    
    myCat.Create "Provider=Microsoft.ACE.OLEDB.12.0;Data Source='C:\我的數據庫.accdb'"
    Set myCat = Nothing

End Sub

注意:

需要引用對象:Microsoft ADO Ext. 2.8 for DDL and Security


創(chuàng)建效果如下圖:



    分享
    聯系我們
    聯系人: 王先生
    Email: 18449932@qq.com
    QQ: 18449932
    微博: officecn01
    移動訪問