acces outlook depuis page web

Question

Bonjour,
J'ai besoin de creer une page web qui appartiendra a un intranet ;
cette page doit afficher les contacts d'une base de donn&#233;es, afficher les contacts d'outlook, et synchroniser les 2.
Pour l'instant j'arrive seulement a afficher les contacts de base de donn&#233;es.
Et j'aimerais afficher ceux d'outlook (je m'occuperais de la synchronisation apr&#232;s).
Lorsque je clique sur le bouton dans la page web j'obtient ce message : (un programme essait d'acceder aux adresses enregistr&#233;es dans outlook --> autoriser oui-non) donc je mets oui mais ne se passe rien.
Je pense etre vraiment pr&#232;s du but mais l&#224; je coince.
En esperant une solution.
Merci.

Mon code source :

Sub AfficheContacts_onclick
    Set out = CreateObject("Outlook.Application")
    Set mapi = out.GetNameSpace("MAPI")
    For ctrlists = 1 To mapi.AddressLists.Count
        Set a = mapi.AddressLists(ctrlists)
        For X = 1 To a.AddressEntries.Count
            I = MAPIResolveName(0, 0, a.AddressEntries(X), 0, 0, info)
            document.write(info.Name)
            
        Next
       
    Next
    Set a = Nothing
    Set out = Nothing
    Set mapi = Nothing
End Sub

chicopelico · Answer

Bonjour, j'ai r&#233;ussis a afficher mes contacts sur ma page web par contre je n'arrive a creer des contacts .
j'ai l'erreur : Impossible de creer un objet ContactItem
Je ne comprends pas pourquoi car je cr&#233;&#233; un objet Application avant sans probleme.
Si quelqu'un peut &#233;clairer ma lenterne.
Merci.

Acces outlook depuis page web

1 réponse

Discussions similaires