[cr 8.5] alimenter un report par un recordset en vb? [Résolu]

[sboober]

Bonjour,

j'aimerais savoir si on peut alimenter un report par un recordset en vb.
J'ai fait quelque recherche et j'ai vu qu'il fallais utiliser un .ttx. On injecterai le resultat du recordset dans le .ttx et le report utiliserai ce .ttx.

Ceci me semble un peu bizarre.

Donc suis je sur la bonne voie, ou existe t'il une autre methode ?

Merci par avance

[sboober]

Bon j'avance un peu, alors si ça peu aider :

J'arrive a creer mon ttx a partir de mon recordet, je cree donc mon report utilisant ce ttx (report.rpt)

Ensuite je veux donc afficher ce report alimenter par le recordset.
Donc dans mon VB:

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
    Dim CrAppl AS CRAXDRT.Application
    Dim CrRep AS CRAXDRT.report
 
    SET CrAppl = New CRAXDRT.Application
    SET CrRep = CrAppl.OpenReport("report.rpt")
 
    MsgBox (Oracle.rs.RecordCount)
 
    CrRep.DATABASE.TABLES(1).SetDataSource Oracle.rs, 3
 
    CRViewer1.ReportSource = CrRep
 
    CRViewer1.ViewReport
 
    CRViewer1.Top = 0
    CRViewer1.LEFT = 0
    CRViewer1.Width = PAT_Planning.Width - 200
    CRViewer1.Height = PAT_Planning.Height - 400
 
    Oracle.rs.Close

Et la le report s'affiche mais sans les données. Pourtant quand j'affiche le recordcount, g bien plusieurs données.

Je suppose que c : CrRep.Database.Tables(1).SetDataSource Oracle.rs, 3 qui pose problème.

Donc si kkun a une idée...

Merci

[sboober]

Ba c bon g trouvé, donc si ça peu aider :

ajouter : CrRep.DiscardSavedData