cs_Jaxom
Messages postés29Date d'inscriptionlundi 13 mai 2002StatutMembreDernière intervention22 mars 2013
-
17 mai 2011 à 16:34
Calade
Messages postés1207Date d'inscriptiondimanche 20 avril 2003StatutMembreDernière intervention 4 juin 2016
-
18 mai 2011 à 11:02
Bonjour,
Déjà, dsl si je ne suis pas au bon endroit; mais là, j'ai pas trouvé d'endroit plus approprié.
Cela étand dit, j'ai une application en vba qui tourne sous Outlook 2007 et 2010. Cette application compare le nom du sender d'un mail au différents comptes existant afin de déterminer si on a affaire à un mail Reçu ou envoyé:
Private Function DetecteDirection(message As String) As String
DetecteDirection = "IN"
For i = 1 To Application.ActiveExplorer.Session.Accounts.Count
If message = Application.ActiveExplorer.Session.Accounts.Item(i).SmtpAddress Then
DetecteDirection = "OUT"
End If
Next
End Function
La fonction reprise ci-dessus fonctionne donc très bien en 2007 et 2010.
Par contre, en 2003, l'object ActiveExplorer.session ne contient pas Accounts...
Or, dans mon parc, j'ai encore plein de 2003. Quelqu'un aurait-il une idée sur le comment faire en 2003? Pour info une recherche dans l'explorateur d'objets sur Accounts ou SmtpAddress ne donne rien de probant.
Merci d'avance pour toute suggestion.
Jaxom
-Perdu dans les méandres de la création virtuelle-
Calade
Messages postés1207Date d'inscriptiondimanche 20 avril 2003StatutMembreDernière intervention 4 juin 201610 18 mai 2011 à 11:02
Bonjour,
Le développement avec l'objet Outlook inclus est souvent galère. De plus l'objet ne permet pas l'accès à toutes les fonctionnalités de la messagerie.
Il existe une DLL tierce nommée Redemption (tout un programme) qui simplifie et complète l'utilisation native. Cette DLL est gratuite pour un usage non commerciale et se trouve ici.
Désolé, mais comme (très) souvent dans ce cas, c'est tout en anglais dans le texte.