DaniWeb Forum Index > Software Development > Visual Basic 4 / 5 / 6

Help ==> DataReprot + Password Protected Database (Urgent)

Please support our Visual Basic 4 / 5 / 6 advertiser: Programming Forums - DaniWeb Sister Site

Thread Solved

•

Join Date: Jun 2007

Posts: 10

Reputation: Naveed_Cn is an unknown quantity at this point

Solved Threads: 0

Naveed_Cn

Offline

Newbie Poster

Help ==> DataReprot + Password Protected Database (Urgent)

Jul 29th, 2007

Hi Everyone
I m trying to open password protected Database for Data Report applying the following Code in Command Button1.

Dim CN As ADODB.Connection
Dim RS As ADODB.Recordset
Set CN = New ADODB.Connection
Set RS = New ADODB.Recordset
CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0" & _
";Data Source =" & App.Path & ".\MyDataBase.mdb"

CN.Open
Set RS = CN.Execute("Select * From Tabel1 Where Name ='" & txtName.Text & "'")
Set DataReprot1.DataSource = RS

DataReprot1.Show

But its showing error please, anyone tell me how can I set the connection for password protected Database.

•

Join Date: Nov 2006

Posts: 848

Reputation: QVeen72 is on a distinguished road

Solved Threads: 120

QVeen72

Offline

Practically a Posting Shark

Re: Help ==> DataReprot + Password Protected Database (Urgent)

Jul 30th, 2007

Hi,

open password protected database like this :

 Help with Code Tags 
 Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
CN.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source="& App.Path & _
"\MyDataBase.mdb" & ";" & _
"Jet OLEDB:Database Password=MyPWd" 
 
    CN.Open
CN.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source="& App.Path & _
"\MyDataBase.mdb" & ";" & _
"Jet OLEDB:Database Password=MyPWd" 

    CN.Open

Regards
Veena

•

Join Date: Jul 2007

Posts: 71

Reputation: suneel kar is an unknown quantity at this point

Solved Threads: 1

suneel kar suneel kar is offline

Offline

Junior Poster in Training

Re: Help ==> DataReprot + Password Protected Database (Urgent)

Jul 30th, 2007

hi veena
our company has a passwor protected database.can we open tthat database.
regards
suneel

•

Originally Posted by QVeen72

Hi,

open password protected database like this :
Help with Code Tags

Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text)
CN.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source="& App.Path & _
"\MyDataBase.mdb" & ";" & _
"Jet OLEDB:Database Password=MyPWd" 
 
    CN.Open
CN.ConnectionString = _ "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source="& App.Path & _ "\MyDataBase.mdb" & ";" & _ "Jet OLEDB:Database Password=MyPWd" CN.Open
Regards
Veena