- PR -

Cristal Reportsのプレビュー表示

1
投稿者投稿内容
K2
会議室デビュー日: 2004/10/20
投稿数: 2
投稿日時: 2005-01-14 00:05
いつもお世話になっております。現在windows2000環境でVB.NET2003と付属のCristalReportsでwindowsアプリケーションを作成中の初心者のものです。

現在AccessファイルとCristalReportsを使ってレポートを印刷しようと思っています。しかし何度やっても「Invalid Report Source」とメッセージが出るだけでプレビューが表示されません。

設定は以下のとおりに進めていきました。

プロジェクトにXMLスキーマを追加(DatasetLabelSyohin.xsd)

サーバーエクスプローラよりMDBファイルの接続を設定し、テーブルをスキーマ上にSET

プロジェクトにCristalレポートを追加(RptLabelSyohin.rpt)

フィールドエクスプローラよりADO.NETデータセット内のXMLスキーマと同じ名前のものを選択しレポートフィールドをデザイン。

プロジェクトにwindowsフォームを作成（FormLabelPreview）し、CrystalReportViewerをフォーム上にセット。その後フォームのコード部分に下記のようなコードを追加しました。

Imports CrystalDecisions.CrystalReports.Engine '追加
Imports System.Data '追加
Imports System.Data.OleDb '追加


Public Class FormLabelPreview
Inherits System.Windows.Forms.Form
Dim connMDB As OleDb.OleDbConnection '追加
Dim daMDB As OleDb.OleDbDataAdapter '追加
Dim dtset As DatasetLabelSyohin '追加
Dim ReportSyohin As RptLabelSyohin '追加

#Region " Windows フォーム デザイナで生成されたコード "

Public Sub New()
MyBase.New()

'' この呼び出しは Windows フォーム デザイナで必要です。
InitializeComponent()

'' InitializeComponent() 呼び出しの後に初期化を追加します。

'=============================追加部分===============================

'設定ファイルを利用してデータベースに接続
Dim cnfAppSet As Configuration.AppSettingsReader = _
New Configuration.AppSettingsReader

connMDB = New OleDb.OleDbConnection

connMDB.ConnectionString = _
CType(cnfAppSet.GetValue("BarcodeMDB", GetType(System.String)), String)

'dataadapterの設定
daMDB = New OleDb.OleDbDataAdapter("select * from T_lblsyohin", connMDB)

dtset = New DatasetLabelSyohin
daMDB.Fill(dtset, "T_lblsyohin")

ReportSyohin = New RptLabelSyohin

ReportSyohin.SetDataSource(dtset)

CrystalReportViewer2.ReportSource = ReportSyohin

End Sub

原因はどうも最後から２行目のReportSourceにあるようなのですが、まったくわかりません。ちなみにフォーム上にDatagridを追加して、そのDatagridにデータセットをSetするときちんと表示されます。ご指導のほどよろしくお願いいたします。
1

スキルアップ／キャリアアップ（JOB@IT）