Как установить информацию для входа в базу данных (информацию о подключении) для отчета Crystal vb.net?

Question

У меня возникла небольшая проблема с получением Crystal Reports для входа в систему. У меня это работает в нескольких отчетах, но пара почему-то перестала работать. Прикрепленный мой сценарий входа в систему, я прошел через него, и информация о входе находится там после каждого шага.
Что еще более необычным является то, что отчет в визуальной студии откроется с информацией OK

Private Sub cmdPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdPrint.Click 
    Dim cryRpt As New ReportDocument 
    Dim crTableLogonInfos As New TableLogOnInfos 
    Dim crTableLogonInfo As New TableLogOnInfo 
    Dim crConnectionInfo As New ConnectionInfo 
    Dim crTables As Tables 
    Dim crTable As Table 
    cryRpt.Load("g:\dt2\rptMusterSheet.rpt") 
    With crConnectionInfo 
     .ServerName = "SERVERNAME" 
     .DatabaseName = "DB NAME" 
     .UserID = "sa" 
     .Password = "xxxxxxx" 
    End With 
    crTables = cryRpt.Database.Tables 
    For Each crTable In crTables 
     crTableLogonInfo = crTable.LogOnInfo 
     crTableLogonInfo.ConnectionInfo = crConnectionInfo 
     crTable.ApplyLogOnInfo(crTableLogonInfo) 
    Next 
    CRV1.ReportSource = cryRpt 
    CRV1.Refresh() 
End Sub 

после пошагового я получаю это Message Box

Answer 1

Попробуйте это ...

Dim mytableloginfos As New TableLogOnInfos() 
mytableloginfos = CRV1.LogOnInfo 
For Each myTableLogOnInfo As TableLogOnInfo In mytableloginfos 
    myTableLogOnInfo.ConnectionInfo = crConnectionInfo 
Next