用DAO Dim cnnNewDB               As Database
'創建Access2000
Set cnnNewDB = CreateDatabase("c:\Newsletter.mdb", dbLangGeneral, dbVersion40)
'創建Access97
Set cnnNewDB = CreateDatabase("c:\Newsletter.mdb", dbLangGeneral, dbVersion30)

解决方案 »

  1.   

    db.engine.creatdatabase(strlacalposition,struser,strpassword)
    给分啦.......
      

  2.   

    用ADOX的方法'引用 Microsoft ADO Ext. 2.6 for DDL and Security
    Private Sub Command1_Click()
      Dim catalog1 As New ADOX.Catalog
      catalog1.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\new.mdb"
    End Sub
      

  3.   

    在vb中的project菜单中,选references。
    引用 ms ado3.51 object library
      

  4.   

    Oracle数据库我倒可以发表一下意见