1 membre
Connectés : ( personne )
- La Charte du Forum - Forum - Questions générale
Sujet n° 518 |
recuperer le contenu d un mail en vba |
le 29/05/2011 : 20:13 par flomen
visiteur |
Bonjour,Je recherche une solution pour traiter les adresses mail erronées (inconnues), c'est à dire je voudrai traiter tous les mail qui me reviennent : "Undelivered Mail Returned to Sender"Pour cela il me faut pouvoir lire le contenu de ces mails.Y a t'il une fonction comme "enregistrer sous" ? Cela pourrez me permettre ensuite de litre le fichier texte et de traiter tous les mails en erreeur.Merci pour vos suggestions |
|
|
Réponse n° 1 -------- le 29/05/2011 : 21:46 par flomen
visiteur |
Je complète ma demande :
J'arrive à obtenir le contenu d'un mail (Body, SaveAs,...) ce qui me dérange c'est le message de sécurité outlook.
Merci pour vos réponses |
|
|
Réponse n° 2 -------- le 30/05/2011 : 16:50 par 3Stone
Administrateur
|
Bonjour,
Selon le cas, voir la sécurité Outlook et éventuellement dans Access, via le menu Outils, Macros, Sécurité.
Cordialement, Pierre(3stone) |
|
|
Réponse n° 3 -------- le 31/05/2011 : 09:53 par flomen
visiteur |
Bonjour,
Je n'ai pas trouvé d'option qui règle mon problème.
Avez-vous une solution pour controler le retour des mail :
Undelivered Mail Returned to Sender
Au retour de ce type de mail, je voudrai MAJ ma base de données
Cordialement |
|
|
Réponse n° 4 -------- le 31/05/2011 : 21:30 par 3Stone
Administrateur
|
Bonjour,
Pour une gestion poussée, tel que envisagée, il n'existe qu'une seule approche parfaite: l'automation... autrement dit, le pilotage de Outlook par Access en utilisant le VBA.
Dans un tel cas, on a accès à la majorité des champs et propriétés d'Outlook et contruire une véritable gestion.
Cordialement, Pierre(3stone) |
|
|
Réponse n° 5 -------- le 01/06/2011 : 10:33 par flomen
visiteur |
Bonjour,
Merci pour ta réponse, cependant je me heurte à un problème lorsque que je veux récupérer le contenu ex: Email.SaveAs ("C:\MailErr.txt") Outlook m'envoi un message : Un programme tente d'accéder à des données Outlook ......
Je n'ai pas trouvé de paramètre pour éviter d'avoir ce message.
Cordialement |
|
|
Réponse n° 6 -------- le 01/06/2011 : 13:56 par 3Stone
Administrateur
|
Bonjour,
Si tu es sur Vista ou Windows 7, fait un essai en désactivant l'UAC (User Account Control).
Cordialement, Pierre(3stone) |
|
|
Réponse n° 7 -------- le 01/06/2011 : 23:06 par flomen
visiteur |
Bonsoir,
Je suis en windows Xp
Voici le code que je n'arrive pas à faire fonctionner:
Code : xhtml</CODE></PRE></DIV>
<P>Function ReceptionMailErr() Dim myNameSpace As NameSpace, MyFolder, Folder, myItem As MailItem Set objOutlook = New Outlook.Application Set myNameSpace = objOutlook.GetNamespace("MAPI") Set MyFolder = myNameSpace.Folders("Dossiers Personnels") DoEvents Set Folder = MyFolder.Folders("Boîte de réception") NbMessages = Folder.Items.Count For i = NbMessages To 1 Step -1 DoEvents Set Email = Folder.Items(i) Email.SaveAs ("C:\MailErr.txt") Next End Function</P>
<DIV class=code><SPAN class=code>Code : xhtml</SPAN><PRE><CODE>
C'est sur sur cette instruction : Email.SaveAs ("C:\MailErr.txt") que je récupère le message de sécurité
Cordialement |
|
|
sujet actif
sujet clos
Important!
Nouveau message -
Rectifier message
Clôturer sujet
Remonter
|