HomeVisual Basicクリスタルレポート データベースからクリスタルレポートにセット

データベースからクリスタルレポートにセット

「DataTable」オブジェクトを利用することで、表示する列やレコード、SQL関数などでテーブルを整形しクリスタルレポートにセットすることができます。

1.データベースを読込み、「DataTable」オブジェクトを生成しセットします。
2.「ReportDocument」にセット。

コード

'インポートクラス
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Imports System.Data.OleDb
'ReportDocument(.RPT)のディレクトリパス設定      
Dim reportPath As String = "ファイルパス" & "ファイル名.rpt"

'レポートをロード
RD.Load(reportPath)

'ReportDocumentのオブジェクト生成
Dim RD As New ReportDocument

'データベース接続
Dim Cn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\販売管理B.mdb;")
Dim SQLCm As OleDbCommand = Cn.CreateCommand
Dim Adapter As New OleDbDataAdapter(SQLCm)
Dim Table As New DataTable

'例:"select 社員コード,氏名,フリガナ,所属,性別,給与,手当 from [社員マスタ] where 社員コード between ""0001"" and ""0010"""
SQLCm.CommandText = "SELECT文"
Adapter.Fill(Table)

'データソースをレポートにセット
RD.SetDataSource(Table)

'CrystalReportViewerへReportDocumentを渡す()
CrystalReportViewer1.ReportSource = RD



ページトップへ

データベース

サーバ

Copyright (C) MadCap. All Rights Reserved.