Link to home
Start Free TrialLog in
Avatar of tomjones735
tomjones735

asked on

OPEN Encrypted access database using DAO

I am trying open the database password projected encrypted database. I am using below code to open the database. Its not opening. Its giving error messgae.
   
   
    Dim db As DAO.Database
    Dim sql As String
    Dim ws As DAO.Workspace
    Dim oconn As String
   
   
    Dim recupdate As DAO.Recordset
    Dim recmaster As DAO.Recordset
    Dim recflowmaster As DAO.Recordset
   
   
    Set ws = DBEngine.Workspaces(0)
   
oconn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=C:\bankstaffing\SSP-LCR.mdb;" & _
           "Jet OLEDB:System Database=c:\bankstaffing\secured1.mdw,myUsername, myPassword"
           
    Set db = ws.OpenDatabase _
    ("C:\bankstaffing\SSP-LCR.mdb", False, False, oconn)
 
I am getting this error message.
Runtime Error '3151'

ODBC - - connection to  'C:\bankstaffing\SSP-LCR.mdb' failed.
ASKER CERTIFIED SOLUTION
Avatar of jkaios
jkaios
Flag of Marshall Islands image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial