Gewusst wie: Zuordnen einer Webseite zu einem Outlook-Ordner

Aktualisiert: November 2007

Betrifft
Die Informationen in diesem Thema gelten nur für die angegebenen Visual Studio Tools for Office-Projekte und Versionen von Microsoft Office. Projekttyp Projekte auf Anwendungsebene Microsoft Office-Version Outlook 2003 Outlook 2007 Weitere Informationen hierzu finden Sie unter Verfügbare Features nach Anwendung und Projekttyp.

In diesem Beispiel wird in Microsoft Office Outlook nach einem Ordner mit dem Namen HtmlView gesucht. Wenn der Ordner noch nicht vorhanden ist, erstellt der Code den Ordner und weist diesem eine Webseite zu. Ist der Ordner bereits vorhanden, wird der Ordnerinhalt angezeigt.

Beispiel

Private Sub CreateHtmlView()
    Dim newView As Outlook.MAPIFolder = Nothing
    Dim viewName As String = "HtmlView"
    Dim inBox As Outlook.MAPIFolder = Me.Application.ActiveExplorer(). _
        Session.GetDefaultFolder(Outlook.OlDefaultFolders _
        .olFolderInbox)
    Dim searchFolders As Outlook.Folders = inBox.Folders()
    Dim foundView As Boolean = False
    For Each searchFolder As Outlook.MAPIFolder In searchFolders
        If searchFolder.Name = viewName Then
            newView = inBox.Folders(viewName)
            foundView = True
        End If
    Next
    If foundView = False Then
        newView = inBox.Folders.Add(viewName, _
        Outlook.OlDefaultFolders.olFolderInbox)
        newView.WebViewURL = "https://www.microsoft.com"
        newView.WebViewOn = True
    End If
    Application.ActiveExplorer.SelectFolder(newView)
    Application.ActiveExplorer.CurrentFolder.Display()
End Sub

private void CreateHtmlFolder()
{
    Outlook.MAPIFolder newView = null;
    string viewName = "HtmlView";
    Outlook.MAPIFolder inBox = (Outlook.MAPIFolder)
        this.Application.ActiveExplorer().Session.GetDefaultFolder(Outlook
        .OlDefaultFolders.olFolderInbox);
    Outlook.Folders searchFolders = (Outlook.Folders)inBox.Folders;
    bool foundView = false;
    foreach (Outlook.MAPIFolder searchFolder in searchFolders)
    {
        if (searchFolder.Name == viewName)
        {
            newView = inBox.Folders[viewName];
            foundView = true;
        }
    }
    if (!foundView)
    {
        newView = (Outlook.MAPIFolder)inBox.Folders.
            Add("HtmlView", Outlook.OlDefaultFolders.olFolderInbox);
        newView.WebViewURL = "https://www.microsoft.com";
        newView.WebViewOn = true;
    }
    Application.ActiveExplorer().SelectFolder(newView);
    Application.ActiveExplorer().CurrentFolder.Display();
}

Siehe auch

Aufgaben

Gewusst wie: Abrufen eines Ordners anhand des Namens

Gewusst wie: Erstellen von benutzerdefinierten Ordnerelementen

Konzepte

Arbeiten mit Ordnern