Discussion :

[elifqaoui]

bonjour,

voilà j'ai entendu dire que DataReport permet de faire des impressions, j'aimerais en savoir plus svp, et quelles sont ces caractéristiques aussi comment l'utiliser
merci!!

[SpaceFrog]

Dans ton projet ajoute un data report... il aparait dans les concepteurs

Le datareport comprend plusieurs zones

entete de rapport => apparait une fois en entete sur la première page du rapport

entete de page => apparait en haut de chaque page du rapport

detail se répète sur la page autant de fois qu'il y a d'enregistrments dans la base liée

pied de page => apparait au bas de chaque page du rapprot

pied de rapport => apparait au pied de la dernière page du rapport

Dans la zone détail tu colles de rptlabels que tu lie à un champs de l'enregistrement

Dans l'initialise de ton data report tu peux mettre du code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Me.WindowState = vbMaximized
Me.Height = Printer.ScaleHeight
'Entête:
With Me.Sections("section2")
.Controls("Label1").Caption = currentheader.Client_ & Chr(13) & currentheader.Adresse1_ & Chr(13) & currentheader.Adresse2_ & Chr(13) & currentheader.Adresse3_
.Controls("Lbl_agence").Caption = Trim(Agence_) & vbCrLf & _
                                  Trim(AdresseAgence.AdrOne) & vbCrLf & _
                                  Trim(AdresseAgence.AdrTwo) & vbCrLf & _
                                  Trim(AdresseAgence.AdrThree) & vbCrLf & _
                                  Trim(AdresseAgence.AdrFour)
.Controls("Lbl_date").Caption = "Date : " & currentheader.StudyDate_
.Controls("Lbl_StudyNr").Caption = "Remise de Prix Nr. :  " & EnrMemo.UserID_ & Format(currentheader.NrEtude_, "0000")
End With
 
Set Me.DataSource = RSlines

[ThierryAIM]

Le DataReport permet de créer des formulaires d'impression comme sous MS Access.

A integrer dans le projet VB à partir du menu projet

Tu peux definir un DataEnvironment afin de te familiariser avec DataReport mais suite à mes soucis et au dire de plusieurs membres du club, il semblerais plus prudent de créer des connexions toi-même et de remplir les champs du DR par le code.

Soit peût-etre un peu plus précis dans ta demande pour que l'on puisse t'aider

A +

[elifqaoui]

bonjour
merci pour toutes ces précisions
le DataReport je veux l'utiliser pour générer des états (requetes qui pourrait etre mises dans un Grid) puis les imprimer.

j'utilise une Connectin DAO alors j'aimerais bien savoir si le DataReport va fonctionner avec ou non.

toute autre explication serait la bienvenue
merci

[SpaceFrog]

Avec l'instruction
Set MyDatareport.DataSource = MaBase
tu sera vite fixé ....

[elifqaoui]

comme tu as dit SpaceFrog j'ai été vite fixé, j'ai une erreur de type incompatible.

c sur que le DataSource de DataReport est une base de données (c pas Recordset ou Requete????????)

si qlq'un a un petit ex sous la main qu'il m'en fait part
et merci encore

[ThierryAIM]

Le DataReport utilise les connexions ADO
Tu peux par exemple utiliser un Controle ADODC1 connecte à ta base de donneée

Puis tu definis dans la propriete Initialize De tn DR

set DR.Datasource = adodc1
With Me.section ("SectionName")
.Controles("Ctrlname1").datafield = "champ1"
.Controles("Ctrlname2").datafield = "champ2"
etc...
end With

Champ1, champ2,... etant les champs de ta base de données

[VirtuaL]

et si je suis en ado et je veux attaquer plusieurs tables comment faire sachant qu'on peut affecter qu'un recodorset par datareport ?

[khany]

salut !

en faisant une requête SQL qui te donnes un recordset comprenant les infos que tu désires des tables que tu désires. puis tu alloues les données de ton recordset aux zones définies dans ton Datareport.

A la rigueur, tu peux même afficher ton résultat ds un MSHFlexgrid et imprimer celui-ci ce qui t'évite d'utiliser le Datareport.

Voilà juste une idée en passant