backup

[shakeelmscw]

I need to save the current database to a new location.

When we click on backup button on a form. this should display save as dialog box, where we can choose location to save the backup copy.

Can some one give me codes to do this?

Presently i am using these codes to take backup


Dim fs, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(CurrentDb.Name)
f.Copy Replace(CurrentDb.Name, ".mdb", ".bak"), True

these codes saves the active file to the same folder but in bak extension. i need the option to show the save as dialog box where user can choose location for backup.

 

[Mr Smin]

Could you just dodge this problem? I would think that someone who is expected to run the backup process should have enough confidence and technical knowledge to just use the features in the Access Tools menu.

 

[shakeelmscw]

If you don't know the answer, why are you wasting your time.

 

[speakers_86]

If your expecting FREE help on CHRISTMAS DAY you need a better attitude then that, especially when you only have six posts.

 

[shakeelmscw]

If your expecting FREE help on CHRISTMAS DAY you need a better attitude then that, especially when you only have six posts.

Ok, I am sorry about my attitude. but don't link attitude to posts.