Outlook Objekte verwenden. Verfasst am: 10.09.2009, 10:36
Hallo,
habe vor mit Visual Studio 2008 ein Programm zu schreiben mit dem ich eine Verteilerliste in Outlook erstellen kann.
bis jetzt sieht der Code so aus.
Code:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myOlApp As New Microsoft.Office.Interop.Outlook.Application()
Dim neueliste As Microsoft.Office.Interop.Outlook.DistListItem()
Dim myMailItem As Microsoft.Office.Interop.Outlook.MailItem 'Stellt eine E-Mail-Nachricht in einem Ordner Posteingang dar.
Dim myRecipient As Microsoft.Office.Interop.Outlook.Recipient 'Stellt einen Benutzer oder eine Ressource in Outlook dar, in der Regel die Adresse einer E-Mail-Nachricht.
Dim mynamespace As Microsoft.Office.Interop.Outlook.NameSpace 'Stellt ein abstraktes Stammobjekt für eine beliebige Datenquelle dar
myOlApp = CreateObject("Outlook.Application")
mynamespace = myOlApp.GetNamespace("MAPI") 'Gibt ein NameSpace-Objekt des angegebenen Typs zurück.
myMailItem = myOlApp.CreateItem(olMailItem)
myRecipient = mynamespace.CreateRecipient("Hermann Mustermann[123@xyz.de]")
neueliste.DLname = InputBox("Geben Sie den Namen der neuen Verteilerliste ein")
myMailItem.Recipients.Add(myRecipient)
myMailItem.Recipients.ResolveAll() 'Versucht, alle Recipient-Objekte in der Recipients-Auflistung im Adressbuch aufzulösen.
neueliste.AddMembers(myMailItem.Recipients)
With neueliste
.AddMembers(myMailItem.Recipients)
.Save()
.Display()
End With
End Sub
End Class
Leider erkennt Visual Studio nicht alle Objekte.
Welche Verweise muss ich einfügen damit das Funktioniert?