[Access/VBA] Kopie van actieve db maken

[WimB]

Ik ben bezig met het programmeren in Access en ik wil een kopie van de huidige database maken mbh VBA.

Ik heb al wat zitten proberen met FileCopy, maar ik krijg steeds de melding dat ik geen kopie kan maken omdat de database geopend is. Dit klopt natuurlijk wel, maar als ik de database open, kan ik er in Windows nog zonder problemen handmatig een kopie van maken.

Verder heb ik ook al met DoCmd zitten proberen om het Save As venster op te roepen. Maar het lukt me enkel om het Save As venster van een formulier ofzo op te roepen. En daarbij komt dan nog eens dat je handmatig de locatie en bestandsnaam zou moeten opgeven, en ik wil dat automatisch laten gebeuren.

Weet er iemand hoe ik vanuit Access kan programmeren om automatisch een backup van de huidige database te maken (met tabellen, query's, formulieren,... en alles erbij)

[Verwijderd]

Volgensmij moet je zoiets sleutelen:

Set FSOdir = Server.CreateObject("Scripting.FileSystemObject")
Set MyDir = FSODir.GetFolder (...Database Serverdir...)
FSODir.DeleteFile AccessDB,True
FSODir.CopyFile DestDB,AccessDB

[WimB]

FSODir.DeleteFile AccessDB,True

Het is niet de bedoeling om een database te verwijderen ofzo
Ik wil ze allemaal bijhouden, alle backups en het origineel

[Verwijderd]

Ik heb hetzelfde probleem gehad met een Access 97 applicatie (front-end mdb en data mdb).
Vanuit de front-end MDB moest ik een backup maken van de data MDB.
FileCopy werkte niet, maar API werkte wel
Zie dit artikel in de Knowledge Base

edit:
kan ook via de shell natuurlijk, maar API vind ik mooier