Information générale
Catégorie:
Codage, syntaxe et commandes
Hi,
Anybody can help me......Doesnt display my record in my recordset....
Option Explicit
Private SaleMaster_BackOffice_RS As adodb.Recordset
Private Main_RS As adodb.Recordset
Dim TMP As adodb.Recordset
Private strConn_BackOffice As String
Private strConn_Main As String
Private rptApp As CRAXDRT.Application
Private rptReport As CRAXDRT.Report
Private rptDatabase As CRAXDRT.Database
Private Sub Command1_Click()
Dim strReportFilename As String
Prog.Value = 0
strReportFilename = "C:\ProductSales.rpt"
DoEvents
Call Create_Recordset
DoEvents
Call Process
DoEvents
Set rptApp = New CRAXDRT.Application
Set rptReport = rptApp.OpenReport(strReportFilename)
rptReport.Database.SetDataSource TMP, 3, 1
CRViewer1.ReportSource = rptReport
CRViewer1.ViewReport
Set DataGrid1.DataSource = TMP
End Sub
NOTE:
in the datagrid1 my record appear but not in crytal report.. (Crystal Report v7)
TIA
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement