select MM.strNom, MM.strPrenom [, ...] From T_cellule CC, T_Membre MM Where CC.strPret is not null And CC.lngNoMembre = MM.lngNoMembre Order by MM.strNom, MM.strPRenom
'Faisons le triage dans l'ordre Set RS2 = db.OpenRecordset("select * from T_Membre ORDER BY strNom DESC, strPRenom", dbOpenDynaset) 'Recherche des strPre est Null Set RS1 = db.OpenRecordset("select * from T_cellule where strPre is not null", dbOpenDynaset) 'Maintenant triage des infos pour conserver ce que l'on veux open "toto.txt" for output as #1 do until rs1.eof do until RS1.fields("lngNoMembre")=RS2.fields("lngNoMembre") RS2.movenext loop print #1, "Nom : " & RS1.fields("strNom") & " / Prénom : " & RS1.fields("strPRenom") RS2.MoveFirst RS1.movenext loop close #1
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionselect * From T_cellule, T_Membre Where T_cellule.lngNoMembre = T_Membre.lngNoMembre AND not isnull(strPret) Order by strNom, strPRenom