OVH Cloud OVH Cloud

concepteur data

2 réponses
Avatar
Noui Eva
Salut,

J'ai =E9crit sous VB69 un petit prog qui "utilise" acces97.=20
Tout est OK.
Mes requ=E8tes se font par ADODB.connection et=20
ADODB.recordset.

J'ai voulu ajout=E9 des imprim=E9s. Quelle gal=E8re. Pas de=20
crystal report, alors j'ai d=E9couvert le dataenvironement=20
et le datareport, deux concepteurs. Je n'ai essay=E9 q'un=20
imprim=E9.
A la cr=E9ation, je n'arrive pas =E0 comprendre et =E0 d=E9finir=20
ses propri=E9t=E9s comme la largeur de marges, l'orientation=20
de la page en paysage, le format A3. Le r=E9sultat est =E0=20
taton, gaspillant pas mal de papier. Ou trouver de la doc,=20
des conseils, un tut ?

J'aimerai savoir comment faire soit pour affecter=20
dynamiquements des ADODB.connection et ADODB.recordset =E0=20
ces concepteurs, n'ayant pas envie de r=E9=E9crire tout mon=20
programme.

De plus, est-on oblig=E9 de d=E9finir toutes les requ=E8tes ?

A ce jour, les filtres, les requ=EAtes et sous-requ=EAtes,=20
=E9taient automatiquement cr=E9=E9r =E0 l'ex=E9cution en fonction du=20
nom des champs et des tables ( nom_table, prim_table pour=20
clef primaire de la table et sec_table pour clef=20
secondaire de la table en relation).

voici un exemple :
tab1 =3D lulu
tab2 =3D lala

recorset.source=3D"select " & tab1 & ".*," & tab2 & ".*=20
from " & tab1 & "," & tab2 & "=20
where prim_" & tab2 & " =3D sec_" & tab2

ou en clair:

select lulu.*,lala.*=20
from lala,lulu=20
where prim_lala =3D sec_lala

et pour les puristes :

recorset.source=3D"SELECT " & tab1 & ".*, " & tab2 & ".*
FROM " & tab2 & " INNER JOIN " & tab1 & "=20
ON .prim_" & tab2 & " =3D .sec_" & tab2

ou en clair toujours pour les puristes :

SELECT lulu.*, lala.*
FROM lala INNER JOIN lulu=20
ON prim_lala =3D sec_lala

Ma demande est importante, car le bouquin que j'ai est=20
tr=E9s sommaire =E0 ce sujet !

En esp=E9rant avoir =E9t=E9 explicite, sinon questionnez moi

2 réponses

Avatar
Cédric Naudy
Ceci pourrait vous aider :
240019 HOWTO: Dynamically Populate a Data Report in Visual Basic
http://support.microsoft.com/?id$0019
289793 HOWTO: Dynamically Populate a Group Data Report in Visual Basic
http://support.microsoft.com/?id(9793

Cédric



"Noui Eva" wrote in message
news:1c3a01c3e0cb$bb0621b0$
Salut,

J'ai écrit sous VB69 un petit prog qui "utilise" acces97.
Tout est OK.
Mes requètes se font par ADODB.connection et
ADODB.recordset.

J'ai voulu ajouté des imprimés. Quelle galère. Pas de
crystal report, alors j'ai découvert le dataenvironement
et le datareport, deux concepteurs. Je n'ai essayé q'un
imprimé.
A la création, je n'arrive pas à comprendre et à définir
ses propriétés comme la largeur de marges, l'orientation
de la page en paysage, le format A3. Le résultat est à
taton, gaspillant pas mal de papier. Ou trouver de la doc,
des conseils, un tut ?

J'aimerai savoir comment faire soit pour affecter
dynamiquements des ADODB.connection et ADODB.recordset à
ces concepteurs, n'ayant pas envie de réécrire tout mon
programme.

De plus, est-on obligé de définir toutes les requètes ?

A ce jour, les filtres, les requêtes et sous-requêtes,
étaient automatiquement créér à l'exécution en fonction du
nom des champs et des tables ( nom_table, prim_table pour
clef primaire de la table et sec_table pour clef
secondaire de la table en relation).

voici un exemple :
tab1 = lulu
tab2 = lala

recorset.source="select " & tab1 & ".*," & tab2 & ".*
from " & tab1 & "," & tab2 & "
where prim_" & tab2 & " = sec_" & tab2

ou en clair:

select lulu.*,lala.*
from lala,lulu
where prim_lala = sec_lala

et pour les puristes :

recorset.source="SELECT " & tab1 & ".*, " & tab2 & ".*
FROM " & tab2 & " INNER JOIN " & tab1 & "
ON .prim_" & tab2 & " = .sec_" & tab2

ou en clair toujours pour les puristes :

SELECT lulu.*, lala.*
FROM lala INNER JOIN lulu
ON prim_lala = sec_lala

Ma demande est importante, car le bouquin que j'ai est
trés sommaire à ce sujet !

En espérant avoir été explicite, sinon questionnez moi
Avatar
Noui Eva
Merci de ta réponse je vais esayé de comprendre les
explications, surtout celles en anglais !

-----Message d'origine-----
Ceci pourrait vous aider :
240019 HOWTO: Dynamically Populate a Data Report in


Visual Basic
http://support.microsoft.com/?id$0019
289793 HOWTO: Dynamically Populate a Group Data Report in


Visual Basic
http://support.microsoft.com/?id(9793

Cédric