Есть такой кусок в котором для всех таблиц репорта прописывается
идентификация (пароль, login) . Глюк состоит в том что после applylogon свойство password у crTableLogOnInfo.ConnectionInfo очищается и соответсвенно репорт выдает Logon failure . Никто такого не встречал? Никак не могу победить.


Dim crDatabase As CrystalDecisions.CrystalReports.Engine.Database
Dim crTables As CrystalDecisions.CrystalReports.Engine.Tables
Dim crTable As CrystalDecisions.CrystalReports.Engine.Table
Dim crConnectionInfo As CrystalDecisions.Shared.ConnectionInfo
Dim crTableLogOnInfo As CrystalDecisions.Shared.TableLogOnInfo

crDatabase = rpt.Database
crTables = crDatabase.Tables


For Each crTable In crTables
crConnectionInfo = New CrystalDecisions.Shared.ConnectionInfo
crTableLogOnInfo = New CrystalDecisions.Shared.TableLogOnInfo

crConnectionInfo.ServerName = ServerName
crConnectionInfo.DatabaseName = DBName
crConnectionInfo.UserID = UserID
crConnectionInfo.Password = Password

crTableLogOnInfo = crTable.LogOnInfo
crConnectionInfo.Password = Password


crTableLogOnInfo.ConnectionInfo = crConnectionInfo
crTable.ApplyLogOnInfo(crTableLogOnInfo)
Next

rpt.SetParameterValue(prmName, _value)
crv.ReportSource = rpt
crv.DataBind()
crv.RefreshReport()