natt_han’s Weblog

Dim oAccess As Microsoft.Office.Interop.Access.Application = New Microsoft.Office.Interop.Access.Application
                Dim sDBPath As String = ‘database path’
                oAccess.OpenCurrentDatabase(sDBPath, True, “password”)
                Dim accessDB As Database = oAccess.CurrentDb()
                accessDB.Close()
                accessDB [...]