Bonjour,
J'ai programmé un AddIn pour Outlook permettant d'uploader un mail sur un serveur FTP et de le référencer dans la DB d'une bibilothèque numérique.
La toute dernière étape consiste à tagger le sujet du mail en ajoutant "GED>" devant celui-ci pour informer l'utilisateur qu'il a déjà traité ce mail.
Quand je n'utilise qu'un mail, pas de souci; par contre, quand j'en sélectionne plusieurs, j'ai un problème : pour tous les messages ne contenant pas d'attachment, le tag "GED>" se met, mais le mail ne se sauve pas, car dans la liste des mails je ne vois pas "GED>" dans l'objet, mais dans le preview pane de ce mail, il est bien là ! Donc le mail reste en mode modification qqpart... Pourquoi ?
myMail = myOlSel.Item(CurrentMail)
...
myAttach = myMail.Attachments
...
If InStr(myMail.Subject, "GED: ") <= 0 And bOK = TrueThen myMail.Subject = ">GED: " & myMail.Subject
myAttach = Nothing
myMail.Save()
Si à cet endroit je sors dans mon log la valeur "myMail.Saved", il me répond "true". Or, il semble ne pas l'être...
Merci pour votre aide !