_Views.Add(String, OlViewType, OlViewSaveOption) Метод

Определение

Пространство имен:

Microsoft.Office.Interop.Outlook

Сборка:

Microsoft.Office.Interop.Outlook.dll

Создает новое представление в Views коллекции.

public Microsoft.Office.Interop.Outlook.View Add (string Name, Microsoft.Office.Interop.Outlook.OlViewType ViewType, Microsoft.Office.Interop.Outlook.OlViewSaveOption SaveOption);

Public Function Add (Name As String, ViewType As OlViewType, Optional SaveOption As OlViewSaveOption) As View

Параметры

Name

String

Имя нового представления.

ViewType

OlViewType

Тип нового представления.

SaveOption

OlViewSaveOption

Параметр сохранения, указывающий разрешения для нового представления. olViewSaveOptionAllFoldersOfType Доступ к представлению можно получить во всех папках этого типа. olViewSaveOptionThisFolderEveryOne Доступ к представлению могут получить только все пользователи в этой папке. olViewSaveOptionThisFolderOnlyMe Доступ к представлению в этой папке может получить только пользователь.

Возвращаемое значение

View

Объект View , представляющий новое представление.

Комментарии

При добавлении представления в коллекцию Views папки, которая не является текущей папкой, необходимо сначала сохранить копию объекта коллекции Views , а затем добавить представление в этот объект коллекции, как показано в примере кода ниже. Это решение для существующей проблемы, которая в противном случае приведет к Apply() сбою вызова для добавленного представления .

Sub CalendarView()
    Dim calView As Outlook.View
    Dim vws As Outlook.Views

    Application.ActiveExplorer.CurrentFolder = _
        Application.Session.GetDefaultFolder( _
        Outlook.OlDefaultFolders.olFolderInbox)

    ' Current folder is Inbox; add a View to the Calendar folder which 
    ' is not the current folder. Keep a copy of the object for the 
    ' Views collection for the Calendar
    vws = Application.Session.GetDefaultFolder( _
        Outlook.OlDefaultFolders.olFolderCalendar).Views

    ' Add the View to this Views collection object
    calView = vws.Add("New Calendar", _
        Outlook.OlViewType.olCalendarView, _
        Outlook.OlViewSaveOption.olViewSaveOptionThisFolderEveryone)
    calView.Save()
    ' This Apply call will be fine.
    calView.Apply()
End Sub

private void CalendarView()
{
    Outlook.View calView;
    Outlook.Views vws;

    Application.ActiveExplorer().CurrentFolder = 
        Application.Session.GetDefaultFolder( 
        Outlook.OlDefaultFolders.olFolderInbox);

    // Current folder is Inbox; add a View to the Calendar folder which 
    //is not the current folder. Keep a copy of the object for the 
    //Views collection for the Calendar
    vws = Application.Session.GetDefaultFolder( 
        Outlook.OlDefaultFolders.olFolderCalendar).Views;

    //Add the View to this Views collection object
    calView = vws.Add("New Calendar",
        Outlook.OlViewType.olCalendarView, 
        Outlook.OlViewSaveOption.olViewSaveOptionThisFolderEveryone);
    calView.Save();
    // This Apply call will be fine.
    calView.Apply();
}