Regroupement dans un Data Report sans Data Environment ? [Résolu]

GiBuSS1942
Messages postés
11
Date d'inscription
samedi 1 janvier 2005
Dernière intervention
20 juin 2006
- 30 mars 2006 à 11:09 - Dernière réponse : rvblog
Messages postés
794
Date d'inscription
vendredi 4 mars 2005
Dernière intervention
12 juin 2012
- 31 mars 2006 à 12:55
Bonjour,


<?xml:namespace prefix o ns "urn:schemas-microsoft-com:office:office" />


Je cherche à créer un regroupement dans un Data Report sans utiliser un Data Environnement.





J’ai ajouté une section en-tête de groupe sur mon Data Report. Dans le code, j’ai défini le recordset source et les champs associés aux différentes zones de texte du Data Report.





Seulement, quand j’exécute, j’ai le message d’erreur suivant :


« Les sections de l’état ne correspondent pas à la source de données »





Si je supprime l’en-tête de groupe du Data Report et le code associé à cet en-tête, l’état est généré sans soucis.





Bref, j’aimerais savoir comment coder un regroupement dans un Data Report…





Merci pour votre aide.





Pour info, voici mon code :


-------------------------------------------------------------------------------------------


Dim Rs As New ADODB.Recordset





StrEtat "select * from destinataire, message where destinataire.numdes message.numdes"


StrEtat StrEtat & " and destinataire.numdes in (" & StrNumdes & ") and datmes '"


StrEtat = StrEtat & LblDate.Caption & "' order by nomdes, predes"





Rs.Open StrEtat, Cn, adOpenDynamic, adLockOptimistic


Set DataReport1.DataSource = Rs





With Me.Sections("GroupeDes").Controls 'Section En-tête de groupe


.Item("txtnomdes").DataField = "nomdes"


.Item("txtpredes").DataField = "predes"


End With





With Me.Sections("SectionMess").Controls 'Section Détails


.Item("txtdatmes").DataField = "datmes"


.Item("txtheurmes").DataField = "heurmes"


.Item("txtnomapp").DataField = "nomapp"


.Item("txtpreapp").DataField = "preapp"


.Item("txtsocapp").DataField = "socapp"


.Item("txttelapp").DataField = "telapp"


End With


---------------------------------------------------------------------------------------------------
Afficher la suite 

1 réponse

Meilleure réponse
rvblog
Messages postés
794
Date d'inscription
vendredi 4 mars 2005
Dernière intervention
12 juin 2012
- 31 mars 2006 à 12:55
3
Merci
Salut GiBuss,

tu n'aurais pas aussi le code d'ajout et de configuration des sections (juste pour relecture)?

à+


rvblogn<SUP>
</SUP><SUP>Je veux ton bien... et je l'aurais
</SUP>

Merci rvblog 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 94 internautes ce mois-ci

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.