かいけつさ〜ん、まだ解決しておりません。
あれから、セットアッププログラムを作って実行したり、
開発環境と実行環境に共に.NET Framework 3.5 SP1をインストールをして
試したのですが動作しませんでした。
現在のエラー内容は、以下の通りです。
**************************************
○○○は動作を停止しました。
**************************************
どこに、不手際があるのでしょうか?
「どこか」に問題があるのは確実なので,おそらくあるであろう,例外を取得するところから始めると良いと思います。
MSDN: Application.DispatcherUnhandledException イベント (System.Windows)
http://msdn.microsoft.com/ja-jp/library/system.windows.application.dispatcherunhandledexception.aspx
MSDN: AppDomain.UnhandledException イベント (System)
http://msdn.microsoft.com/ja-jp/library/system.appdomain.unhandledexception.aspx
MSDN: Application.ThreadException イベント (System.Windows.Forms)
http://msdn.microsoft.com/ja-jp/library/system.windows.forms.application.threadexception.aspx
これらのイベントで,未処理例外を取得して,そのときの例外情報を何らかのファイルに書き出します。
# ファイルがかけない状況だとどうしようもないですが……。
この時,Message, StackTraceは少なくとも書きだしてください。
また,InnerExceptionがNothingになるまで追う必要もあります。
この情報があれば,まずは切り分けができるはずです。
YuOさん、ご助言ありがとうございます。
VB初心者の為、YuOさんのご助言が理解できません。
現在のコードは以下のの通りなのですが、どのように
記述すればよいのでしょうか?
*******************************************************
Public Class frmCryRepXIR2View
Private Sub frmCryRepXIR2View_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label1.Text = "C:TEST.RPT"
' CrystalReportsオブジェクトの生成
Dim Report As CrystalDecisions.CrystalReports.Engine.ReportDocument
Report = New CrystalDecisions.CrystalReports.Engine.ReportDocument
Dim sReportFile As String = Label1.Text
Report.Load(sReportFile, CrystalDecisions.Shared.OpenReportMethod.OpenReportByTempCopy)
'// プレビュー表示 //
Me.CrystalReportViewer1.ReportSource = sReportFile
' レポート内のテーブルの接続情報を設定
Dim logOnInfo As New CrystalDecisions.Shared.TableLogOnInfo
logOnInfo.ConnectionInfo.ServerName = "oooo"
logOnInfo.ConnectionInfo.DatabaseName = "oooo"
logOnInfo.ConnectionInfo.UserID = "oooo"
logOnInfo.ConnectionInfo.Password = "oooo"
logOnInfo.TableName = "oooo"
' logOnInfosコレクションにlogOnInfoオブジェクトを追加します。
Me.CrystalReportViewer1.LogOnInfo.Add(logOnInfo)
For Each Table As CrystalDecisions.CrystalReports.Engine.Table In Report.Database.Tables
' logOnInfosコレクションにlogOnInfoを追加
Table.ApplyLogOnInfo(logOnInfo)
Next
' ビューアーの表示
Me.Show()
'Me.CrystalReportViewer1.Refresh()
Me.CrystalReportViewer1.RefreshReport()
End Sub
End Class