Create Method Example (VB)

The following code shows how to create a new Microsoft Jet database with the Create method.

Attribute VB_Name = "Create"
Option Explicit

' BeginCreateDatabseVB
Sub CreateDatabase()

   Dim cat As New ADOX.Catalog
   cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb"

End Sub
' EndCreateDatabaseVB

See Also

Catalog Object | Create Method

© 1998-2001 Microsoft Corporation. All rights reserved.