I am using VB 6.0 and Access . Now the Database in Access is Password Protected and MS Access has Logon Name Admin
Password :- Password (i.e this is to start MS Access)
Below is the code to logon to MS Access but I don't Know how to open the Password Protected Database .
Set conn = New Connection
Dim path As String
path = App.path & "\Expo2002.mdb"
Set res = New Recordset
Set comm = New Command
Dim str As String '//This is the connection string
str = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Password=password;User ID=Admin;" & _
"Data Source= " & path & ";" & _
"Persist Security Info = True;" & _
"Jet OLEDB:System database=C:\Windows\System\system.mdw"
With conn
.CursorLocation = adUseClient
.Open str
End With
comm.ActiveConnection = conn
Exit Sub
Please treat this matter the most Urgent ..