[RESOLVED] Access 2003: Creating new instance of current database

[RiceRocket]

Hi,

I would like the user to be able to create a new instance of my Access app which would basically replicate the current database and clear the contents of all of the tables. It is similiar to simply doing File -> Save As... then clearing all of the tables. But, for some reason, i can't get the FileDialog object to do this. I have tried coding this with the FileDialog object, but Access crashes on the .Execute method of FD obj. If anyone has any other suggestions about how to do this or how to change my code to get it work, I would LOVE to hear them!! Here's my code:

Private Sub LblEffect2_Click() ' NOT WORKING!!
    With Application
        With .FileDialog(msoFileDialogSaveAs)
            .InitialFileName = "New AR Tracker.mdb"
            .Title = "Please choose a name for your new AR Tracker database"
            .ButtonName = "Create New"
            .Show
            .Execute
        End With
    End With
End Sub

Thanks in advance!!