Version imprimable
Bonsoir,
Je m'explique : j'ai besoin, pour remplir un fichier texte, d'informations venant de deux tables.
J'effectue donc une première requête qui remplis mon premier jeu de donnée que je parcours et pendant le parcours j'effectue une recherche avec la fonction find sur mon second recorset.
Or je ne sais pas comment utiliser le résultat renvoyé par cette méthode. Quelqu'un a t-il une idée ?
Bonjour,
Une fois positionné sur l'enregistrement grâce au find(first?) il te suffit de mettre les données d'un champ vers l'autre comme ceci :
Il existe un tuto sur DAO et un sur ADO.Code:
2
3
4
Cordialement,
NB: tu ne peux pas faire tout avec la même requête ?
Re-Bonjour et merci de votre réponse.
Non car je vais chercher mes info sur deux BDD différentes et à moins de me tromper cela ne peux pas s'effectuer en une seule requête.Citation:
NB: tu ne peux pas faire tout avec la même requête ?
En fait je parcours mon premier recordset et pendant le parcours j'effectue une recherche findfirst sur mon second recordset pour trouver l'enregistrement correspondant et obtenir les infos qu'il me manque.Citation:
Bonjour,
Une fois positionné sur l'enregistrement grâce au find(first?) il te suffit de mettre les données d'un champ vers l'autre comme ceci :
rstDestination.edit
rstDestination.fields(nom) = rstSource.fields(nom)
rstDestination.update
Il existe un tuto sur DAO et un sur ADO.
Cordialement,
Cependant je ne sais pas comment pointer sur ce résultat pour en extraire la valeurs des champs qui m'interessent..
Voici un extrait de mon code :
En espérant avoir été le plus clair possible,Citation:
Selection = "******"
rs.Open Selection, oCnHeliosNatif, adOpenStatic, adLockReadOnly
rs.MoveFirst
selection2 = "********"
Set rs2 = CurrentDb.OpenRecordset(selection2)
rs2.MoveFirst
Do While Not (rs.EOF)
enr = "#" & rs!NO_RESA & "#;"
enr = enr & "#" & rs!COUT_HEBERG_TTC & "#;"
enr = enr & "#" & rs!COUT_FDD_TTC & "#;"
enr = enr & "#" & rs!COUT_ASSUR_TTC & "#;"
enr = enr & "#" & rs!CAUTION_HEBERG & "#;"
enr = enr & "#" & rs!ETAT_RESA & "#;"
rs2.FindFirst ("NO_RESA =' & rs!NO_RESA & '")
c'est ici que j'aimerais pouvoir extraire les donnée pour les écrire dans mon fichier txt
rs.MoveNext
a.WriteLine (enr)
Loop
Bon appétit ! :D
Re,
Je me suis diriger vers le tchat et grâce à l'idée de @jimbolion j'ai réussi à me débrouiller autrement c'est a dire, oublier la méthode find first, et exécuter une requête a chaque boucle dans mon parcours du premier recordset qui pointe sur le bon enregistrement et je peux ainsi extraire mes données.
Quoi qu'il en soit merci de ta réponse & bon week-end !