lire les info d'un compte de Hotmail Connector lié à Outlook

[toss.net]

Bonjour,
J'ai un problème similaire et le lien de WyLLoU m'a aider. Je cherche à lire les info d'un compte de Hotmail Connector lié à Outlook.

Code :

1
2
3
4
5
6
7
8
9
' Automation code example.
Set ol = New Outlook.Application
Set olns = ol.GetNameSpace("MAPI")
Set myRecipient = olns.CreateRecipient("John Smith")
myRecipient.Resolve
If myRecipient.Resolved Then
   Set JohnFolder=olns.GetSharedDefaultFolder _
      (myRecipient, olFolderContacts)
End If

A la place de John Smith j'ai mis l'email du compte trucmachin@hotmail.fr.

myRecipient.Resolved passe bien à TRUE mais
une erreur survient à la ligne Set JohnFolder=olns.GetSharedDefaultFolder (myRecipient, olFolderContacts)
Erreur d'éxécution '-2146664191 (8ààc8101)': Echec de l'opération

Bon je ne sais pas si quelqu'un sais connait car on trouve quasi rien sur le net, mais avez vous peut être une piste ?