###前提・実現したいこと
現在ActiveReportを使用し、作成したレポートデータをPDFに出力するプログラムを作成しております。
クエリで取得したデータをページレポート内のコントロールに貼り付ける為、動的にパラメータに値を設定し、レポートを作成したいのですが一度目に追加したパラメーター情報が残ったままレポート出力されてしまい、同じ内容のレポートが出力されます。
PDFは出力されるのですが思った通りのレポートが出力できずに困っております。
根本的にActiveReportの使い方が誤っているのか原因がわかりません。お力お貸しして頂けますと幸いです。
###発生している問題・エラーメッセージ
CurrentValueで追加したパラメータへの値がForEachで回した際に上書きされない。 パラメータへの初期化ができていない?。
###該当のソースコード
'オリジナルのページレポートファイル(rdlx)を読み込む。 Dim fileName As String = Path.Combine(My.Application.Info.DirectoryPath, "test.rdlx") Dim pageReport As New PageReport(New FileInfo(fileName)) Dim pageDocument As New PageDocument(pageReport) 'groupsはクエリで取得したデータ。 For Each row In groups 'レポート上のコントロール値に設定された各パラメータに値を入れる。 pageDocument.Parameters("ReportParameter1").CurrentValue = row.Field(of String)("TEST") pageDocument.Parameters("ReportParameter2").CurrentValue = row.Field(of Integer)("TEST2") pageDocument.Parameters("ReportParameter3").CurrentValue = DateTime.Now.ToString("yyyy/MM/dd") 'PDF作成。 Using Export = New PdfExport Export.Export(pageDocument, Path.Combine(filePath, fileName)) End Using Next
###補足情報(言語/FW/ツール等のバージョンなど)
言語:VB.net ,C#
ActiveReports 9.0J
あなたの回答
tips
プレビュー