1
我得到錯誤0x800A5077
,我嘗試導入CrystalActiveXReportViewerLib10
和CrystalReportsCommonObjectModelLib
,但它仍然沒有工作。
異常來自HRESULT:0x800A5077當執行水晶報告
Call ReportConnection(CInspAuditList, "Pab_Prod")
CInspAuditList.ReportFileName = My.Application.Info.DirectoryPath & "\MAuditList.rpt"
Call SubReportConnection(CInspAuditList, "Pab_Prod")
CInspAuditList.set_ParameterFields(0, "mchno; " & frmMachine.machine & " ;true")
CInspAuditList.set_ParameterFields(1, "batch; " & CDbl(frmMachine.batch) - 1 & " ;true")
CInspAuditList.set_ParameterFields(2, "Points; " & InpStdPt & " ;true")
CInspAuditList.set_ParameterFields(3, "ovrpt; " & OvrPoints & " ;true")
CInspAuditList.Action = 1
發生錯誤時CInspAuditList.Action = 1
vb.net幫我申報CInspAuditList as AxCrystal.AxCrystalReport
這是我的連接功能:
Public Function ReportConnection(ByRef CrystalReport1 As AxCrystal.AxCrystalReport, ByRef dsnname As String) As Boolean
CrystalReport1.Connect = "dsn=" & dsnname & ";UID=" & gstrID & ";PWD=" & gstrPassword & ";DSQ="
End Function
我想知道原因的原因發生錯誤&我的連線是否正確