backup and recovery

[deviii]

hello Veena,

i am using MS-Access as Backend can you explain how i can apply backup and recovery in my project?

Thanking You
Rathiga

[QVeen72]

Hi,

I had already replied this in ur previous thread:

Hi,

If MS-Access, then it's quite Simple, Copy the .mdb Access File using "FileCopy":
Check this :

For Back Up

Code: ( vb )
If Dir("C:\BackUp\MyDB.mdb", vbDirectory) <> "" Then
'If Already Exisits then Delete It
Kill "C:\BackUp\MyDB.mdb"
End If
FileCopy App.Path & "\MyDB.mdb", "C:\BackUp\MyDB.mdb"


For Restore :


Code: ( vb )
If Dir("C:\BackUp\MyDB.mdb", vbDirectory) <> "" Then
If Dir(App.Path & "\MyDB.mdb", vbDirectory) <> "" Then
'Remove Current Working DB
Kill App.Path & "\MyDB.mdb"
End If
FileCopy "C:\BackUp\MyDB.mdb", App.Path & "\MyDB.mdb"
Else
Msgbox "No Back Up Database Found"
Exit Sub
End If


Change this App.Path & "\MyDB.mdb" to ur Variable/Actual Database Name/Path Name

Note Before doing any Back-Up / Restore Operations u have to "Close All the Connections of the Database" in the Code. otherwise u cannot do the file copy...


REgards
Veena

[Ali Rizwan]

Hi,

I had already replied this in ur previous thread:

Hi,

If MS-Access, then it's quite Simple, Copy the .mdb Access File using "FileCopy":
Check this :

For Back Up

Code: ( vb )
If Dir("C:\BackUp\MyDB.mdb", vbDirectory) <> "" Then
'If Already Exisits then Delete It
Kill "C:\BackUp\MyDB.mdb"
End If
FileCopy App.Path & "\MyDB.mdb", "C:\BackUp\MyDB.mdb"


For Restore :


Code: ( vb )
If Dir("C:\BackUp\MyDB.mdb", vbDirectory) <> "" Then
If Dir(App.Path & "\MyDB.mdb", vbDirectory) <> "" Then
'Remove Current Working DB
Kill App.Path & "\MyDB.mdb"
End If
FileCopy "C:\BackUp\MyDB.mdb", App.Path & "\MyDB.mdb"
Else
Msgbox "No Back Up Database Found"
Exit Sub
End If


Change this App.Path & "\MyDB.mdb" to ur Variable/Actual Database Name/Path Name

Note Before doing any Back-Up / Restore Operations u have to "Close All the Connections of the Database" in the Code. otherwise u cannot do the file copy...


REgards
Veena

If we use fso.copyfile then file is copied whether it is open or close.
and i m also using fso.copyfile