MDAC 2.5 SDK - ADOX
See Also
The following code shows how to create a new Microsoft Jet database with the Create method.
Sub CreateDatabase() Dim cat As New ADOX.Catalog cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb" End Sub