VB Impression
javi
-
zujam -
zujam -
Salut à tous,
je dois réaliser des impressions en vb (6.0), j'ai déjà laissé un message dans lequel je demandais le mode d'emploi des data report et data environment de vb. En effet c'est une possibilité qui fonctionne bien mais je suis confronté à un problème ...
Le data report me permet de récupèrer des données d'une seule table, hors je dois récupérer des données de plusieures tables à la fois pour établir mon data report et ensuite l'imprimer. Pour établir ce data report, je dois spécifier un data member dans les propriétés...ce data member fait référence à une et une seule table donc je ne peux récupérer des données que de cette table ...Comment remédier à ce problème?
Avez-vous une solution à ce problème? Merci d'avance...;-)
je dois réaliser des impressions en vb (6.0), j'ai déjà laissé un message dans lequel je demandais le mode d'emploi des data report et data environment de vb. En effet c'est une possibilité qui fonctionne bien mais je suis confronté à un problème ...
Le data report me permet de récupèrer des données d'une seule table, hors je dois récupérer des données de plusieures tables à la fois pour établir mon data report et ensuite l'imprimer. Pour établir ce data report, je dois spécifier un data member dans les propriétés...ce data member fait référence à une et une seule table donc je ne peux récupérer des données que de cette table ...Comment remédier à ce problème?
Avez-vous une solution à ce problème? Merci d'avance...;-)
A voir également:
- VB Impression
- Spouleur d'impression - Guide
- Impression livret a5 - Guide
- Impression ecran samsung - Guide
- Problème impression pdf texte manquant - Forum PDF
- Impression miroir word - Guide
1 réponse
voila comment faire :
Private Sub DataReport_Initialize()
Dim MyRecordset As ADODB.Recordset
Dim Requet As String
Requet = " SELECT * FROM Toto "
Set MyRecordset = New ADODB.Recordset
MyRecordset .Open Requet, cnBaseSQL, adOpenStatic, adLockOptimistic
Set rptReglements.DataSource = MyRecordset
End Sub
et la tu peux utiliser tous les champs de ta requete pour faire ton report....
Private Sub DataReport_Initialize()
Dim MyRecordset As ADODB.Recordset
Dim Requet As String
Requet = " SELECT * FROM Toto "
Set MyRecordset = New ADODB.Recordset
MyRecordset .Open Requet, cnBaseSQL, adOpenStatic, adLockOptimistic
Set rptReglements.DataSource = MyRecordset
End Sub
et la tu peux utiliser tous les champs de ta requete pour faire ton report....
