kommunikere med Outlook ?

Start med at lave en reference (under Project - References) til "Microsoft Outlook 9.0 Object Library" (eller hvilken version du nu har). Tryk F2, vælg Outlook i den øverste liste og tryk F1. Nu skulle du gerne få en hjælpefil der fortæller alt om programmering mod Outlook.

Det er faktisk forbavsende nemt.

/venne

Et lille eksempel:
Dim objOutlook As Outlook.Application
Dim objCalendar As Outlook.MAPIFolder
Dim objItem As Outlook.AppointmentItem
Dim objToDayItems As Outlook.Items

Set objOutlook = New Outlook.Application
objOutlook.Session.Logon
Set objCalendar = objOutlook.Session.GetDefaultFolder(olFolderCalendar)
Text1.Text = "[Start]>='" & Date & "' AND [Start]<'" & (Date + 2) & "'"
Set objToDayItems = objCalendar.Items.Restrict("[Start]>='" & Date & "' AND [Start]<'" & (Date + 2) & "'")
For Each objItem In objToDayItems
    Text1.Text = Text1.Text & vbCrLf & objItem.Subject & " - " & objItem.Start
Next objItem

Ok det virker jo let nok - så har jeg et lille tillægsspørgsmål, hvis i kigger på
http://cph.ing.dk/konf/root/pcit/html/7044.all.html

- ifølge den tråd kan dette slet ikke lade sig gøre på nyere versioner af outlook, eller har jeg misforstået noget ? Løsningen er jo ikke holdbar hvis kunden så ikke må opdatere outlook til en nyere version....

Chriscross

Du burde ikke få problemer når du blot kigger på kalenderdata.

Jo det er rigtigt at Outlook XP har en uheldig egenskab med at spørge om det kan have sin rigtighed at en bruger(vb) forsøger at tilgå data på Exchange. Dette er der endnu ikke noget kendt fix imod, men du kan sagtens gøre det, brugeren skal bare svare ja på en dialog boks hvergang dit VB prog. forsøger at tilgå Exchange/Outlook.
VH CK

Der er en måde at omgås outlook's security-patch:

http://www.dimastr.com/redemption/

Virker 110%, med de versioner af outlook, som jeg er stødt på.


MVH

JoBless

Kik engang på denne artikel, måske er den brugbar ?
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnsmart00/html/sa00h12.asp