• Version
• Download 221
• File Size 390.48 KB
• File Count 1
• Create Date March 1, 2016
• Last Updated March 1, 2016

Backup MS Access Database in Visual Basic

Backup MS Access Database in Visual Basic

This is actually a process of copying the original file and save it in selected location or path in your computer.

A step by step tutorial and source code is included in the download file that will help you on how to create a backup copy of your ms access database in visual basic.

Sample code:

Private Sub cmdSave_Click()
Dim FS As New FileSystemObject
FS.CopyFile App.Path & "Data.mdb", txtBackupPath & "Data" & ".mdb", True
Set FS = Nothing
MsgBox "Backup successful", vbInformation, ""
End Sub
Private Sub Dir1_Click()
txtBackupPath = Dir1.Path
On Error GoTo errHandler:
Exit Sub
errHandler:
MsgBox " Error drive is not accessible", vbInformation, ""
Drive1.Drive = "C:"
End Sub
Private Sub Dir1_Change()
Dir1_Click
End Sub
Private Sub Drive1_Change()
On Error GoTo errHandler
Dir1.Path = Drive1.Drive
Exit Sub
errHandler:
MsgBox " Error drive is not accessible", vbInformation, ""
Drive1.Drive = "C:"
End Sub