Discussion :

[mimou2009]

Bonjour
j'ai un code VBA dans une application access qui sert a envoyer plusieurs email a plusieurs personne avec piece jointe specifique a chaque personne du liste a traves outlouk, ma question comment je peux faire un colone qui permer de cocher les personnes que j'ai envoye des mails ou une autre methode
merci d'avance

[marot_r]

Bonjour.

• Est-ce que tu envoies un seule courriel par personne ?
• Est-ce que tu envoies un courriel en rapporte avec une autre entite dans ta BD (ex : un courriel par inscription ?)
• Est-ce que tu envoies une serie de courriel juste associe a cette personne ?
• Autres circonstances ?

A+

[mimou2009]

Une convocation par personne, mais la personne qui n'a pas encore une convocation il ne recoie rien.
J'ai déja un dossier qui contien les convocations sous formr de PDF
Donc je ne veux pas envoyer une convocation deux fois pour la mĕme prrsonne

[marot_r]

Bonjour.

Donc la convocation est reliee a la personne.

La solution qui me parait la plus simple est de mettre un champ du genre EstConvocationEnvoyede type Oui/non (booleen) dans la table des personnes.
Puis dans le code d'envoi mettre a jour ce champ apres l'envoi.
Quelque chose du type :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
dim db as dao.database:set db=currentdb
dim r as dao.recordset: set r=db.openrecordset("tblPersonne", dbOpenDynaset)
call r.findfirst("ClefPersonne=" & [ClefPersonne])
 
if not r.nomatch then
      r.edit
      r![EstConvocationEnvoye]=true
      r.update
   else
      call err.raise(5, , Error$(5) & " - Personne non trouvee.") 'cas normalement impossible en production puisqu'on vient de lui envoye un courriel
end if
 
r.close: set r=nothing
db.close: set db=nothing

Avant l'envoi tu ne selectionnes que les personnes pour lesquelles EstConvocationEnvoye est False donc pas de risque de double envoi.

Une autre solution serait de tester si tu as un PDF pour cette personne et de l'eliminer de la liste d'envoi mais le champ me parait plus exploitable.

A+