- PR -

PDF出力時にログインエラー

1
投稿者投稿内容
oni-chan
会議室デビュー日: 2004/07/15
投稿数: 9
投稿日時: 2004-07-15 19:31
初めて投稿します。
CrystalReportからPDFにExportするロジックを
このサイトのおかげで何とか完成することができました。
ただ、まったく同じロジックなのですが、
2つめのCrystalReportを同じようにExportしようとすると、
「ログインに失敗しました」エラーが表示されます。

↓ちなみにソースです。

Me.CrystalReportViewer1.ReportSource = Me.cachedReportRequest2
Me.CrystalReportViewer1.LogOnInfo.Item ("Table名").ConnectionInfo.Password = "Password"

Dim crReportDocument As New ReportDocument
Dim crExportOptions As ExportOptions
Dim crDiskFileDestinationOptions As DiskFileDestinationOptions
Dim Fname As String

crReportDocument.Load(Server.MapPath("./Report.rpt"))
crReportDocument.SetDatabaseLogon("user", "Password", "ServerName", "DB")
Fname = "c:\\" & Session.SessionID.ToString & ".pdf"
crDiskFileDestinationOptions = New DiskFileDestinationOptions
crDiskFileDestinationOptions.DiskFileName = Fname
crExportOptions = crReportDocument.ExportOptions
With crExportOptions
.DestinationOptions = crDiskFileDestinationOptions
.ExportDestinationType = ExportDestinationType.DiskFile
.ExportFormatType = ExportFormatType.PortableDocFormat
End With
crReportDocument.Export()
      ↑ここでエラーになります。

1帳票目がうまくいっているだけに原因がさっぱり分かりません。
ぜひご教授お願いします。
よろしくお願いします。m(_ _"m)ペコリ
oni-chan
会議室デビュー日: 2004/07/15
投稿数: 9
投稿日時: 2004-07-16 12:15
自己解決しました。
DataBaseへの接続方法を変えることでログインエラーが消えました。
お騒がせしてすみませんです。

For Each MyTable In crReportDoc.Database.Tables
MyLogin = MyTable.LogOnInfo
MyLogin.ConnectionInfo.UserID = ConfigurationSettings.AppSettings("UserID")
MyLogin.ConnectionInfo.Password = ConfigurationSettings.AppSettings("Password")
MyTable.ApplyLogOnInfo(MyLogin)
Next
1

スキルアップ/キャリアアップ(JOB@IT)