FinalPrime
Technical User
to all:
How do I delete a mdb database via code?
My function below works great for creating one,
but I'm stuck writing my delete function.
help appreciated.
finalprime
Function CreateAccessDatabase(sDatabaseToCreate) As String
Dim oCatalog
Dim catNewDB As Database
Set catNewDB = Nothing
Set oCatalog = CreateObject("ADOX.Catalog")
sDatabaseToCreate = sDatabaseToCreate & ".mdb"
oCatalog.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sDatabaseToCreate
Set oCatalog = Nothing
End Function
How do I delete a mdb database via code?
My function below works great for creating one,
but I'm stuck writing my delete function.
help appreciated.
finalprime
Function CreateAccessDatabase(sDatabaseToCreate) As String
Dim oCatalog
Dim catNewDB As Database
Set catNewDB = Nothing
Set oCatalog = CreateObject("ADOX.Catalog")
sDatabaseToCreate = sDatabaseToCreate & ".mdb"
oCatalog.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sDatabaseToCreate
Set oCatalog = Nothing
End Function