Discussion :

[js8bleu]

Bonjour,

j'ai développé une application (avec VB 6.0) de gestion de laboratoire d'analyses biomédicales et j'aimerai faire les états à présents. Concernant les analyses des patients, j'ai besoin de 4 tables. Mais je ne sais pas comme faire pour faire afficher les propriétés et les valeurs (qui sont chacune une table) de la façon suivante :

Propriété1 Valeur1

Propriété2 Valeur2

Propriété3 Valeur3

et tout ça pour l'examen N°X.

Je suis ouvert à toute question.

Le résultat avec une requête SQL serait à peu près :

Code :

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

select tablepropriete.nompropriété, tablevaleur.valpatient from tablepropriete, tablevaleur where tablepropriete.numpropriete = tablevaleur.numpropriete where tablevaleur.numdossier = X;

Merci d'avance.

Cordialement.

[Fabrice Moll]

La section "détail" sert justement à cela.

Il suffit d'y ajouter les champs voulu et ils s'afficheront l'un en dessous de l'autre.

J'espère que cela répond à votre question.

[js8bleu]

Bonjour Fabrice Moll et Merci pour ton intervention. En effet je sais que la section détails permet de répéter les champs. J'ai pu contourner mon problème même si ce n'est pas exactement ce que j'espérais. Cependant, je vais tenter de poser une autre question dans ce même poste. J'ai deux champs de type dates et je voudrais faire la différence pour trouver l'âge. Sais-tu comment le faire s'il te plaît?

Merci d'avance.

Cordialement.

[Fabrice Moll]

Je pense que cela doit faire l'affaire :

http://www.crystalkeen.com/articles/...ifferences.htm

[js8bleu]

Bonjour Fabrice Moll et Merci pour ton aide. Mon problème est résolu grâce à toi. Encore Merci. Juste pour ceux qui pourrait en avoir besoin. Pour régler mon premier problème j'ai créé une table contenant tous les enregistrements dont je pourrais avoir besoin pour l'état et c'est cette table que je lie à mon état. Voici la requête qui permet de faire tout cela :

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
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
    INSERT INTO tableimpdossier
    SELECT D.numdossier AS NumDossier
    , D.datedossier AS DateDossier
    , D.resultat AS Resultat
    , D.commentaire AS Commentaire
    , D.medecintraitant AS MedecinTraitant
    , E.nomexamen AS NomExamen
    , N.desnature AS DesNature
    , PR.nompropriete AS NomPropriete
    , D.numpatient AS NumPatient
    , PA.nompatient AS NomPatient
    , PA.prenompatient AS PrenomPatient
    , PA.sexepatient AS Sexe
    , PA.contactpatient AS ContactPatient
    , V.valpatient AS ValPatient
    , V.valnormale AS ValNormale
    , V.interpretation AS Interpretation
    FROM tabledossier D
    , tableexamen E
    , tablenature N
    , tablepropriete PR
    , tablepatient PA
    , tablevaleur V
    WHERE D.numexamen = E.numexamen
    AND E.numnature = N.numnature
    AND D.numpatient = PA.numpatient
    AND D.numdossier = V.numdossier
    AND V.numpropriete = PR.numpropriete
    AND V.numdossier = " & txtnumdossier & " "

Merci encore Fabrice Moll et excellente journée.

Cordialement.