Avatar billede hyber Nybegynder
19. maj 2004 - 16:11 Der er 5 kommentarer og
1 løsning

Lave egen Outlook kontaktpersoner.

Normalt bruger jeg et kalender system der er baseret på noget der hedder eGroupWare, hvilket er et php baseret system. Men jeg ville gerne kunne bruge den som en Exchange server, dvs at kunne overføre kontaktpersoner, kalenderen og opgaver over fra eGW til min outlook. Jeg kan hive data ud af serveren ved hjælp af XML-RPC, hvilket der er blevet skrevet et VB6 modul til.

Nu er det så bare, hvordan kan jeg i outlook realtime smide de informationer ind der i. Jeg har set flere gøre det, dog ingen der er OpenSource.
Der må være et "plugin/opjekt" til outlook hvor det er muligt via VB at indsætte data til en mappe (kontaktpersoner/opgaver/kalender). Er der nogen der kan hjælpe mig til hvordan det kan gøres?

Det er måske noget med et COM eller activeX halløj? eller hvordan?

Jeg håber i forstår hvad jeg mener og kan hjælpe mig i den rigtige retning, jeg er ikke nogen ørn til VB endnu, men den eneste måde er jo ved at læse/rode med det.

--
Esben
Avatar billede terry Ekspert
19. maj 2004 - 16:16 #1
You canautomate Outlook from VB

Public Function StartOutlook()
        On Error GoTo StartOutLook_Error
        Dim spObj As Object
        Dim OlContact As ContactItem

        'opretter et nyt objekt af outlook.
        Set spObj = CreateObject("Outlook.Application")
        'opretter en nyt objekt af "opret ny kontaktperson"
        Set OlContact = spObj.CreateItem(olContactItem)
       
    With OlContact
   
        .FullName = Me.navn
        .BusinessAddress = Me.adresse
        .BusinessAddressPostalCode = Me.postnr
        .BusinessAddresscity = Me.by
       
        .Save
        .Display

    End With
 
          Set OlContact = spObj.CreateItem(olContactItem)
          OlContact.Display
       
        'Afslut Microsoft Outlook.
          Set spObj = Nothing
    Exit Function

StartOutLook_Error:
        MsgBox "Error: " & Err & " " & Error
        Exit Function
End Function
Avatar billede terry Ekspert
19. maj 2004 - 16:16 #2
You will need a reference to Outlook in your project.
Avatar billede terry Ekspert
19. maj 2004 - 16:18 #3
and here is an example where the contacts are made in a sub folder

Function OutlContact (cFolder as String)

Dim oApp As Outlook.Application
Dim oNameSpace As Outlook.NameSpace
Dim oFolder As MAPIFolder
Dim oWorkFolder  As MAPIFolder
Dim oItem As Outlook.ContactItem

   
    Set oApp = CreateObject("Outlook.Application")
    Set oNameSpace = oApp.GetNamespace("MAPI")
    Set oFolder = oNameSpace.GetDefaultFolder(olFolderContacts)
   
    Set oWorkFolder = oFolder.Folders(cFolder)
   
    Set oItem = oWorkFolder.Items.Add(olContactItem)

    oItem.FullName = "Your Contacts Full Name"
       

    oItem.Save
       
     
    Set oItem = Nothing
    Set oWorkFolder = Nothing
    Set oFolder = Nothing
    Set oNameSpace = Nothing
    Set oApp = Nothing

End Function
Avatar billede kedde65 Praktikant
19. maj 2004 - 16:27 #4
Jjeg giver naturligvis Terry ret, men det kommer meget an på hvordan din XML fil ser ud til at begynde med. Jeg vil anbefale dig at lave en Add-In til Outlook. Det kan du også gøre vha. VB 6.0/.net

VH CK
Avatar billede hyber Nybegynder
19. maj 2004 - 16:30 #5
Hej kedde65..

Jeg har aldig arbejdet med at lave plugins til andre programmer, de programmer jeg har lavet i VB har altid være standalone programmer.. Kan du give et lille hint til hvor der findes noget doc på emnet?

--
Esben
Avatar billede kedde65 Praktikant
19. maj 2004 - 17:41 #6
Du kan starte med at bruge VB's egen skabelon for Add-in. Den findes i opstarts billedet, der vælger du istedet for at vælge standalone - den "guide/skabelon" der hedder Addin.

Herefter vil jeg anbefale dig at søge på nettet efter dokumentation på emnet. eg kan ikke ummidelbart give dig noget dok, men jeg skal prøve at finde det.

VH CK
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester