Postada em 27/04/2005 23:02 hs
Estou fazendo assim:
Dim Report_Application As New CRAXDRT.Application
Dim Report As New CRAXDRT.Report
Set Report = Report_Application.OpenReport(.txtCaminho)
For I = 1 To Report.Database.Tables.Count
Report.Database.Tables.Item(I).SetLogOnInfo Trim(st_Server), Trim(st_DataBase), Trim(st_User), Trim(st_Password)
Next
Mas não estou usando o objeto View e sim Control, gostaria de saber de como passar isso para o control. Estou fazendo assim porque as vezes pode ocorrer de utlizar os relatorios em outro Servidor.
|
