database password !!

[Pirate]

Hi ,
I wanna open protected database (access 97 ) .I tried this but seems not hlep :

Dim myPath As String = Application.StartupPath
Dim myConnection As New OleDb.OleDbConnection("provider=Microsoft.jet.oledb.4.0;DATA SOURCE=" _
& myPath & "\DBWEB.MDB;" & "Jet OLEDB: Database Password=" & "mypassword;")
Try
myConnection.Open()
Catch x As Exception
MsgBox(x.Message())
'It keep throwing this error :
couldn't find installable ISAM.
End Try

Any hlep would be highly appreciated !

[MrGTI]

This is a good resource: ConnectionStrings.com

I use this in my code:

Public Const ACCESS2K = "Provider=Microsoft.Jet.OLEDB.4.0;Password='';User ID=Admin;Data Source='C:\myData.mdb';"

[Pirate]

that's wonderful site ! Many thanks .I will try to solve the problem.

[Pirate]

what happens then if the path was a const as follow :

Dim path As String = "C:\db1.mdb"
'I tried this but with error of course
 
Dim MyConnection As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source= path;Jet OLEDB:Database Password=aaa;")

this time ,the path is throwing an error. any ideas plz ??

[MrGTI]

Did you forget how to use a variable?

Dim sDBPath As String = "C:\db1.mdb"
Dim MyConnection As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source='" & sDBPath & "';Jet OLEDBatabase Password=aaa;")

I'm sure it was just a momentary brain lapse.

[Pirate]

hehe . thanx thanx . Dunno what's wrong with my PC recently(actually it me not my PC).