Discussion :

[guandal]

Bonjour,
voilà mon problème:
je veux récuperer le nombre total de pages d'un état en code Vb6.
Mon état est chargé dans un CRViewer avec le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 'La definition des variables
        Dim RsEtatLettres As Recordset
        Dim EtatLettres As CRAXDDRT.Report
        Dim NbPages as long
'traitement et puis l'affichage de l'etat
Set EtatEnCours = EtatLettres
 
        EtatEnCours.Database.Tables(1).SetDataSource RsEtatLettres
        EtatEnCours.ReadRecords
 
        ZoneApercu.ReportSource = EtatEnCours
        ZoneApercu.ViewReport

-J'ai essayé de mettre une formule dans mon état et de récuperer la valeur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

NbPages=EtatEnCours.FormulaFields.GetItemByName("NbPages").Value

Mais ça marche pas. la valeur est toujours vide; pourtant l'affichage se passe bien aucun souci,j'ai bien des données et à l'impression j'ai 2 pages.

La fonction TotalPageCount, je n'arrive pas à l'appeler depuis le code VB.
Si vous avez une piste pour moi , je suis preneur.
Merci beaucoup.

[guandal]

Bonjour,
juste pour dire que je me suis debrouillé autrement par tatonement.
Comme il faut une licence pour fait un get, la solution que j'ai adoptée pour le moment est :
J'ai mis mon etat dans un DSR, avec un formulafield.
Au formatage de la section où se trouve ce formulafield, je récupère la valeur de mon formulafieds.
Pour le moment ça m'arrange en attendant une solution plus professionnelle.