Changing default database used by ODBC programmatically

Question

Hi,
I have a report that I'm using ODBC to connect with and it can be run against one of two databases.  I am  unable to get it to point to any database other than the default set in the DSN.  I have tried setting the database in the ConnectionInfo object but still points to the default.
Thanks,
Steve

Answer 1

HI,
Sorry for not providing more information.  II'm using CR2008 and Visual Basic 2008.
The code i'm  using is similar to what is in the sample code:
Dim newreport As New frmReportViewer
        Dim DataVariables As DataVariablesType
        DataVariables = DataUtility.GetDataVariables
        Dim crtableLogoninfos As New TableLogOnInfos
        Dim crtableLogoninfo As New TableLogOnInfo
        Dim crConnectionInfo As New ConnectionInfo
        Dim CrTables As Tables
        Dim CrTable As Table
        With crConnectionInfo
            .ServerName = DataUtility.GetDataVariables.dsn
            .DatabaseName = DataUtility.GetDataVariables.Catalog
            .UserID = DataUtility.GetDataVariables.UserId
            .Password = DataUtility.GetDataVariables.Password
        End With
        CrTables = rptDoc.Database.Tables
        For Each CrTable In CrTables
            crtableLogoninfo = CrTable.LogOnInfo
            crtableLogoninfo.ConnectionInfo = crConnectionInfo
            CrTable.ApplyLogOnInfo(crtableLogoninfo)
        Next
        If rptDoc.Subreports.Count > 0 Then
            For count As Integer = 0 To rptDoc.Subreports.Count - 1
                CrTables = rptDoc.Subreports(count).Database.Tables
                For Each CrTable In CrTables
                    crtableLogoninfo = CrTable.LogOnInfo
                    crtableLogoninfo.ConnectionInfo = crConnectionInfo
                    CrTable.ApplyLogOnInfo(crtableLogoninfo)
                Next
            Next
        End If
        newreport.rptViewer.ReportSource = rptDoc
        newreport.Show()
I have steped through the code and the database name, userid, password , server name are being picked up properly.
I am sending the name of the DSN for the Server Name and instead of the default database I am passing the name of a test database.  When the report is displayed, the data is being retrieved from the production databse instead o f test.