Connect an OLEDB with MS Access 2007 Files

Add a new module in you project or use the existing module... add a Reference" Microsoft ActiveX Data Objects 2.1 Library or Higher type this code in the Module and make Sub Main as your startup module Option Explicit Public CON as ADODB.Connection Sub Main() Set CON = New ADODB.Connection CON.Provider = "Microsoft.ACE.OLEDB.12.0" CON.Open App.Path & "\ACCESS2007FILE.accdb","admin","" NextForm.show 'From here, you should be typing the name of the first Form to be loaded when running you program... End sub Note: you may not use App.Path in the Connection string if you haven't save the project and database in just one Folder, so make sure that you project and database are in one folder.