Invalid Connection String???

[NewbieVB2003]

Set ConnectionInfo = crReport.Database.Tables(1).ConnectionProperties
            
ConnectionInfo.Item("DSN") = dsn_name
ConnectionInfo.Item("User ID") = user_name
ConnectionInfo.Item("Password") = pass_word

When I try to run a report setting the Connection Info as described above,it throws an Error message "Invalid Connection String"
Can anybody please tell me where I went wrong.
Thanks

[ARPRINCE]

You're missing some parameters. You can try something like below:

With crReport.Database.Tables(1).ConnectionProperties
      .Item("Provider") = "your_provider"
      .Item("Data source") = "your_server"
      .Item("Initial Catalog") = "your_database"
      .Item("User ID") = "user_id"
      .Item("Password") = "user_password"
   End With

[NewbieVB2003]

Thank you for replying to my query.On following your advice,I specified :

With crReport.Database.Tables(1).ConnectionProperties
      .Item("Provider") = "sqloledb"
      .Item("Data source") = "your_server"
      .Item("Initial Catalog") = "your_database"
      .Item("User ID") = "user_id"
      .Item("Password") = "user_password"
    End With

But,it is showing error message : "Method value of 'iConnection Property' Failed" and,showing me error in Provider.I have used the same provider for calling the DB and it works fine.Do you think for CR,it needs to be called in a different way?
Thanks



*EDIT*
On using the below specified code,the Report is visible.
Thanks

With crReport.Database.Tables(1).ConnectionProperties
      .Item("DSN") = "your_server"
      .Item("User ID") = "user_id"
      .Item("Password") = "user_password"
    End With

[ARPRINCE]

What CR Version do you have? Also, I forgot to mention that the above example uses OLE DB as a connection and I assumed that yours uses the same type of a connection.

If true, you can go to your report's database expert and check the properties of your connection. It should tell you the right provider name and other properties values to use.

Otherwise, can you post your report form's code?

[NewbieVB2003]

Thank you for replying back. I had an ODBC(RDO) setup and,your suggestion showed me the right way to work it out.

[etatis]

Hi NewbieVB2003


i had the same problem and finally found the way to do it.
but if you have more than one tables in your report (like i have)
you could do the following....

Report.DiscardSavedData

For i = 1 To Report.Database.Tables.Count
Report.Database.Tables(i).ConnectionProperties.DeleteAll
Report.Database.Tables(i).ConnectionProperties.Add "DSN", newDSN
Report.Database.Tables(i).ConnectionProperties.Add "User ID", newID
Report.Database.Tables(i).ConnectionProperties.Add "Password", newPWD
Next i

it is also usefull sometimes, before you try anything with your report to call the DiscardSavedData function