Hi guys!!!!

I am here once again because I can't solve the problem for 3 days now.

I can't see the data on the report. I am currently using Crystal Reports 10

and I am using VB6 with SQL Server 2000. There's something wrong with my

code because it works in Crystal reports. Here is the code:

VB Code:
  1. Private Sub Form_Load()
  2. Dim BookingSheet As New CRAXDRT.Application
  3. Dim TransactionReport As New CRAXDRT.Report
  4.  
  5. Set TransactionReport = BookingSheet.OpenReport("\\mnlbs001\Cargo Suite\Applications\BookingSheet.rpt", 1)
  6.  
  7. CrystalActiveXReportViewer1.ReportSource = TransactionReport
  8.  
  9.  
  10. CrystalActiveXReportViewer1.ViewReport
  11. TransactionReport.RecordSelectionFormula = ""
  12. MsgBox "{Transaction_Table.Transaction_No} = '" & Trim(frmTransactionEntries.txtTransactionNo.Text) & "'"
  13. TransactionReport.RecordSelectionFormula = "{Transaction_Table.Transaction_No} = '" & Trim(frmTransactionEntries.txtTransactionNo.Text) & "'"
  14. Screen.MousePointer = vbHourglass
  15. Screen.MousePointer = vbDefault
  16.  
  17. End Sub
  18.  
  19. Private Sub Form_Resize()
  20. CrystalActiveXReportViewer1.Top = 0
  21. CrystalActiveXReportViewer1.Left = 0
  22. CrystalActiveXReportViewer1.Height = ScaleHeight
  23. CrystalActiveXReportViewer1.Width = ScaleWidth
  24. End Sub

Can you guys please help me out.