Crystal Reports XI R2 (ID:102254)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 魔界の仮面弁士さん、何度もお手数おかけしております。 なかなか、うまくいかないので、ネットで色々探していたら 以下のようなコーディングが記載されていました。 ************************************************* ' CrystalReportsオブジェクトの生成 Dim Report As CrystalDecisions.CrystalReports.Engine.ReportDocument Report = New CrystalDecisions.CrystalReports.Engine.ReportDocument Dim sReportFile As String = "C:\TEST.RPT" Report.Load(sReportFile,CrystalDecisions.Shared.OpenReportMethod.OpenReportByTempCopy) '// プレビュー表示 // Dim frmPreview As New Form1 frmPreview.CrystalReportViewer1.ReportSource = sReportFile ' レポート内のテーブルの接続情報を設定 Dim logOnInfo As New CrystalDecisions.Shared.TableLogOnInfo logOnInfo.ConnectionInfo.ServerName = "@@@" logOnInfo.ConnectionInfo.DatabaseName = "@@@" logOnInfo.ConnectionInfo.UserID = "@@@" logOnInfo.ConnectionInfo.Password = "@@@" logOnInfo.TableName = "@@@" ' logOnInfosコレクションにlogOnInfoオブジェクトを追加します。 frmPreview.CrystalReportViewer1.LogOnInfo.Add(logOnInfo) For Each Table As CrystalDecisions.CrystalReports.Engine.Table In Report.Database.Tables ' logOnInfosコレクションにlogOnInfoを追加 Table.ApplyLogOnInfo(logOnInfo) Next ' ビューアーの表示 frmPreview.Show() ********************************************************** 実行したところForm1のボタンをClickすると もう１枚Form1が表示され、そのなかにクリスタルレポートが表示されました。 ボタンをClickするとそのフォーム上でクリスタルレポートを表示 する方法はあるのでしょうか。