Bom dia,
Estou tendo dificuldades ao enviar Parametros par ao Relatório
Dim rpt As New ReportDocument
Dim Rpt_Conn As New CrystalDecisions.Shared.ConnectionInfo
Dim Rpt_LogOnInfo As New TableLogOnInfo
Dim Rpt_LogOnInfos As New TableLogOnInfos
Dim Rpt_Table As Table
Dim Rpt_tables As Tables
With Rpt_Conn
.DatabaseName = "sisepc"
.UserID = "sisplan_ebn"
.Password = "sisplan_ebn"
End With
Caminho = Application.StartupPath
Caminho = Replace(Caminho, "\bin\Debug", "")
Caminho = Replace(Caminho, "\bin\Release", "")
rpt.Load(Caminho & relatorio)
Rpt_tables = rpt.Database.Tables
For Each Rpt_Table In Rpt_tables
Rpt_LogOnInfo = Rpt_Table.LogOnInfo
Rpt_LogOnInfo.ConnectionInfo = Rpt_Conn
Rpt_Table.ApplyLogOnInfo(Rpt_LogOnInfo)
Next
da = New OracleDataAdapter(Sql_Rel, conn)
dt_Report = New DataTable
da.Fill(dt_Report)
rpt.SetDataSource(dt_Report)
rpt.SetParameterValue("DESCRICAO_GERAL", "INFORMAÇOES")
rpt.ExportToDisk(ExportFormatType.PortableDocFormat, OndeSalvar)
AQUI ACONTECE O ERRO quando eu vou exportar ele me da a mensagem.
"parameter missing a value"
alguem pode me ajudar com este problema
Grato Jonatas
