[vb.net] Add-in voor Outlook

[Tinuske]

Ik heb een add-in project voor Outlook , welke een button creeert in outlook en bij het klikken op de button verschijnt er een messagebox met een tekst .

code:

Private Sub MyButton_Click(ByVal Ctrl As CommandBarButton,
ByRef CancelDefault As Boolean) Handles MyButton.Click
        MsgBox("Commandobutton!")

    End Sub

Nu wil ik er onderstaande code inzetten (puur om te testen)

code:

        Dim objOutlook As Outlook._Application
        objOutlook = New Outlook.Application
        Dim objSelection As Outlook.Selection = _
            objOutlook.ActiveExplorer.Selection
        Dim iCount As Int16 = objSelection.Count
        Dim i As Int16
        For i = iCount To 1 Step -1
            Msgbox(objSelection.Item(i).Subject)
        Next

Nu is het zo , dat als ik bovenstaande code onder de button zet, de addin vastloop bij de 2e regel. Als ik de code uitvoer bij een console application en msgbox vervang door console.write, werkt het wel goed.

Het creeeren van de button is gebaseerd op :
http://support.microsoft.com/?kbid=302896

Iemand een idee , wat ik fout doe onder de addin button ?

[ Voor 16% gewijzigd door Tinuske op 13-10-2004 15:53 ]

[Elissen]

Je moet geen nieuwe Outlook-sessie starten, maar verbinden met de instantie die reeds actief is. De OnConnection-event heeft als parameter een Applicatie object of interface. Bewaar deze in een variabele. Dat doen ze in de voorbeeldcode op de pagina waar je naar verwijst ook.