主题：【求助】VB.Net高手们进来瞅一瞅啦, CR问题 -- MacArthur
正在学习VB.Net中，这个问题可能在高手眼里比较弱，多多包涵...
最近在用VB.Net 2002 + CrystalReport给别人做一个小小的reporting tool，非常简单，就是从OracleDB里读取数据然后通过CrystalReport生成Excel报表。
边学边做，VB的intellisense挺不错的，上手比较容易，表扬一个。
在我的开发机上，什么问题都没有了，Excel报表也能一次生成，毫无问题。
好了，作了个Setup Project，把所有东东包裹一下，生成一个MSI。
这个MSI里头，包括了"Database_Access.msm", "Database_Access_enu.msm"和"Regwiz.msm"，还包括两个.rpt文件，因为用户有可能随后需要调整报表格式。
把MSI往用户机器上一装，却出问题了：Logon Failed
这个错误在VB/CR用户中似乎很常见，有不少文章都在谈论如何解决之。
可问题在于，别人都是在开发阶段遇上的这个问题，无论如何都可以debug一步步地看进程；到我这里呢，在自己的机器上没事儿，送到别人机器上就有事儿了，没法debug!
记得西河当初报家门的时候颇有几位.Net高手，请大家帮帮忙，分析分析是咋回事儿...
附上生成报表的源程序，希冀有人能瞅出端倪...
多谢多谢
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Private Sub generateCryatalReport(ByVal strReportName As String)
Dim strReportPath As String = Application.StartupPath & "\" & strReportName & ".rpt"
'Dim strReportPath As String = strReportName & ".rpt"
Try
If Not IO.File.Exists(strReportPath) Then
Throw (New Exception("Unable to locate report file:" & vbCrLf & strReportPath))
End If
Dim strSQL As String = "Select * From WLCM_PKG"
Dim DA As New System.Data.OleDb.OleDbDataAdapter(strSQL, dBConPaps)
Dim DS As New DataSet()
DA.Fill(DS)
Dim rptWKIT As New CrystalDecisions.CrystalReports.Engine.ReportDocument()
rptWKIT.Load(strReportPath)
rptWKIT.SetDataSource(DS.Tables(0))
Dim DiskOpts As CrystalDecisions.Shared.DiskFileDestinationOptions = New CrystalDecisions.Shared.DiskFileDestinationOptions()
rptWKIT.ExportOptions.ExportDestinationType = CrystalDecisions.[Shared].ExportDestinationType.DiskFile
rptWKIT.ExportOptions.ExportFormatType = CrystalDecisions.[Shared].ExportFormatType.Excel
DiskOpts.DiskFileName = "c:\" & strReportName & "_Report.xls"
rptWKIT.ExportOptions.DestinationOptions = DiskOpts
rptWKIT.Export()
Catch x As Exception
MessageBox.Show(x.Message + x.Source + x.StackTrace, "Report Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub
- 相关回复 上下关系8
🙂【求助】VB.Net高手们进来瞅一瞅啦, CR问题
😄CrystalReport去死吧 1 MacArthur 字1877 2006-11-17 16:30:07
🙂用EXCEL做chart一样方便 1 晓晴夕照 字401 2006-12-04 15:59:00
🙂谢谢，献花 MacArthur 字102 2006-12-04 17:04:53
🙂see the text in red 1 晓晴夕照 字1075 2006-12-04 18:39:55
🙂直接填数据这招狠 lanchong 字53 2006-11-17 21:51:55
🙂不晓得是啥问题~~ 1 并非马甲 字117 2006-11-08 07:29:37
🙂多谢 1 MacArthur 字0 2006-11-08 08:54:57