Skip to main content

Connect an OLEDB with MS Access 2007 Files

Language


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.

Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. After downloading it, you will need a program like Winzip to decompress it.

Virus note: All files are scanned once-a-day by SourceCodester.com for viruses, but new viruses come out every day, so no prevention program can catch 100% of them.

FOR YOUR OWN SAFETY, PLEASE:

1. Re-scan downloaded files using your personal virus checker before using it.
2. NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.

Add new comment

CAPTCHA
This question is for testing whether or not you are a human visitor and to prevent automated spam submissions.