How to Import and Export Ms Access data using vb.net 2008

[ohisiojohn]

Hi guys,

I need a help. I have EmployeesInfo system with several tables (Employees, Payroll and Purchases tables) in Ms Access Database and forms in Vb.Net accordingly.

How can I Export and Import data from Ms Access Database using vb.net 2008 ?. Can anyone help me with codes ?. I had coded but does not work !.

Private Sub ExportToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExportToolStripMenuItem.Click
        Dim source, target As String
        source = Application.CommonAppDataPath & "\EmployeesInfo.mdb" 'this is the path where vb stores databse file. 
        If SaveFileDialog1.ShowDialog() <> Windows.Forms.DialogResult.Cancel Then 'sfdFile is save file dialogue 
            target = SaveFileDialog1.FileName
            Try
                My.Computer.FileSystem.CopyFile(source, target, True)
                MsgBox("Export Completed Successfully")
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try
        End If
    End Sub
 
 
Private Sub ImportToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ImportToolStripMenuItem.Click
        Dim source, target As String
        If OpenFileDialog1.ShowDialog() <> Windows.Forms.DialogResult.Cancel Then ' ofdFile is open file dialouge 
            source = OpenFileDialog1.FileName
            target = Application.CommonAppDataPath & "\EmployeesInfo.mdb"
            Try
                My.Computer.FileSystem.CopyFile(source, target, True)
                MsgBox("Import Completed Successfully")
            Catch ex As Exception
                MsgBox(ex.Message)
            End Try
 
        End If
 
    End Sub