devxlogo

Open a password-protected MDB database with ADO

Open a password-protected MDB database with ADO

The syntax for opening a password-protected Jet database might not be obvious. In fact, assigning the password to the Password property in the ConnectionString raises the following error:

Run-time Error: 2147217843 (80040e4d)Cannot start your application. The workgroup information file is missing or _    openened exclusively by another user.

Instead, you must assign your password to the Jet OLEDB:Database Password dynamic property:

Dim cn As New ADODB.Connectioncn.Provider = "Microsoft Jet 4.0 OLE DB Provider"cn.ConnectionString = "Data Source=c:db1.mdb"cn.Properties("Jet OLEDB:Database Password") = "mypwd"cn.Open

Of course, you can reach the same result and write more concise code by embedding all values in the connection string:

Dim cn As New ADODB.Connectioncn.Open "Provider=Microsoft Jet 4.0 OLE DB Provider;Data Source=c:db1.mdb;Jet " _    & "OLEDB:Database Password=fb"

See also  Why ChatGPT Is So Important Today
devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist