une requete SQL sur un recordSet

Code:

---

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

Public Sub Simple_Send() Dim Mba As Database, TabTempo As DAO.Recordset, NumId As Variant 'Dim MAX_NUM As Integer 'Id de la table LegalEntity Set Mba = CurrentDb() Set TabTempo = Mba.OpenRecordset(" SELECT * FROM [Consolidation Req]") Do Until TabTempo.EOF DoCmd.SetWarnings False 'Requete SQL pour recupere les lignes qui m'interesse une par une Sql1 = "SELECT * FROM TabTempo WHERE LegalEntity= True AND [e-mail Sent]= True" DoCmd.RunSQL Sql1 'Appel de la function SendNotesMail SendNotesMail( ......,........,.......,......) TabTempo.MoveNext Loop End Sub

---

Bonjour ,

voici mon code , je voudrais savoir si c'est possible de mettre en parametre de la function "SendNotesMail" des champs que je recupere de ma requete SQL1 du style :

SendNotesMail(select name from Sql1, select Adresse from sql1,.......) .

Merci d'avance .

:king:

bonjour,
le passage de paramètre sera un peu plus complexe selon ce que tu souhaites faire. Tu dois mettre les résultats de la requête dans un recordset
S'il s'agit d'un mail à chaque personne indépendamment tu peux faire un

Code:

---

1 2 3 4 5 6 7 8

Dim RS as DAO.Recordset '... Set RS = Mba.OpenRecordset(SQL1) Do Until RS.EOF SendNotesMail(RS!Name, RS!Adresse,.......) RS.MoveNext Loop

---

Je ne connais pas la structure des paramètres à passer dans SendNotesMail, mais si tu veux faire un seul mail avec plein de destinataire, le code serait alors plutôt du style

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Dim RS as DAO.Recordset dim listenoms as string dim listeadresses as string '... Set RS = Mba.OpenRecordset(SQL1) listenoms="" listeadresses="" Do Until RS.EOF listenoms= listenoms & "," & RS!Nom listeadresses=listeadresses & "," & RS!Adresse RS.MoveNext Loop SendNotesMail(listenoms, listeadresses,.......)

---

en espérant que ca pourra te servir.

Bonjour ,

les parametres que je voudrais passer dans ma function d'envoi de mail , c'est ce les champs qui appartienne a chaque ligne de ma tabTempo ; c'est pour cela que je voulais savoir si je peux faire des requetes sur la ligne .

Merci