hi guys
i have created a crystal report using crystal XI which accesses its data from Oracle Database through OLEDB.Now i am trying to call the report using VB6 and i get this error at the point of viewing the report.
here is my code
'my connection string in a module
Option Explicit
Global conn As New ADODB.Connection
Sub Main()
conn.Open _
"Provider = OraOLEDB.Oracle;" & _
"Data Source=myservername;" & _
"Initial Catalog=mydatabase;" & _
"User ID=myusername;" & _
"Password=mypassword;"
Form1.Show
End Sub
Dim crxApp As New CRAXDRT.Application
Dim crxRpt As CRAXDRT.Report
Dim CrtParameters As CRAXDRT.ParameterFieldDefinitions
Dim simula As String
Dim OrderNo As String
'put the report inside the same folder as your .vbp
Set crxRpt = crxApp.OpenReport(App.Path & "\Invoice.rpt", 1)
OrderNo = Trim(GetSetting("NatFoods", "Inv", "Order_no"))
If IsNull(OrderNo) Then
Exit Sub
End If
With crxRpt
.DiscardSavedData
Set CrtParameters = crxRpt.ParameterFields
.ParameterFields.GetItemByName("order number").AddDefaultValue OrderNo 'simula
End With
Me.WindowState = vbMaximized
CrystalActiveXReportViewer1.Width = 15000 '.Width = Me.Width '- 200
CrystalActiveXReportViewer1.Height = 14500 ' Me.Height '- 500
CrystalActiveXReportViewer1.EnableSelectExpertButton = True
CrystalActiveXReportViewer1.EnablePrintButton = True
CrystalActiveXReportViewer1.DisplayGroupTree = False
CrystalActiveXReportViewer1.EnableRefreshButton = False
CrystalActiveXReportViewer1.DisplayToolbar = True
CrystalActiveXReportViewer1.EnableToolbar = True
CrystalActiveXReportViewer1.ReportSource = crxRpt
CrystalActiveXReportViewer1.ViewReport 'the error comes at ths point
the error is
crystal reports activex designer prompting failed with the following error message Error Code 0x80004005
then the second window
login failed
please help m stuck m actually at a client i desperately need your help