Метод Table.Restrict (Outlook)
Применяет фильтр к строкам в таблице и получает новый объект Table .
Синтаксис
выражение. Restrict
( _Filter_
)
Выражение Переменная, представляющая объект Table .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
Фильтр | Обязательный | String | Задает условия для строк в объекте Table . |
Возвращаемое значение
Объект Table , возвращаемый путем применения фильтра к строкам в родительском объекте Table .
Замечания
Table.Restrict можно использовать только для применения другого фильтра к этой таблице, если родительский объект Таблицы является объектом Folder. Если родительский объект является объектом поиска , функция Restrict вернет ошибку.
Так как фильтр применяется к строкам в объекте Table , это эквивалентно применению фильтра, который является логическим Ифильтра фильтра и всех предыдущих фильтров, примененных к одному объекту Table .
Фильтр — это запрос на указанные свойства элементов, представленных в виде строк в родительской таблице. В запросе используется синтаксис Microsoft Jet или синтаксис ПОИСКА и поиска DAV (DASL). Например, следующий фильтр Jet и фильтр DASL указывают те же критерии для элементов с LastModificationTime до 3:30 вечера 12 июня 2005 г.:
criteria = "[LastModificationTime] < '" & Format$("6/12/2005 3:30PM","General Date") & "'"criteria = "@SQL=" & Chr(34) & "DAV:getlastmodified" & Chr(34)
& " < '" & Format$("6/12/2005 3:30PM","General Date") & "'"
Дополнительные сведения об указании фильтров для объекта Table см. в разделе Фильтрация элементов.
Если фильтр содержит настраиваемые свойства, эти свойства должны находиться в родительской папке объекта Table , чтобы ограничение работало правильно. Некоторые свойства не поддерживаются в фильтре таблицы , включая двоичные свойства, вычисляемые свойства и содержимое текста HTML или RTF. Дополнительные сведения см. в разделе Неподдерживаемые свойства в объекте таблицы или фильтре таблиц.
Если Filter — пустая строка, функция Restrict возвращает объект Table , идентичный родительскому объекту Table .
Пример
В следующем примере кода фильтр Jet применяется к элементам в папке "Входящие" для получения элементов с значением LastModificationTime больше 1 ноября 2005 г. Затем он выводит значения свойств по умолчанию для этих элементов в папке "Входящие": EntryID, Subject, CreationTime, LastModificationTime и MessageClass.
Примечание.
Так как разнородные элементы могут находиться в одной папке в Outlook, элементы, возвращенные при применении фильтра к папке "Входящие", могут быть разных типов. Как правило, перед доступом к свойствам, которые не входят в число свойств по умолчанию для элементов в папке "Входящие", следует проверить MessageClass элемента.
Sub RestrictTable()
'Declarations
Dim Filter As String
Dim oRow As Outlook.Row
Dim oTable As Outlook.Table
Dim oFolder As Outlook.Folder
'Get a Folder object for the Inbox
Set oFolder = Application.Session.GetDefaultFolder(olFolderInbox)
'Define Filter to obtain items last modified after November 1, 2005
Filter = "[LastModificationTime] > '11/1/2005'"
'Restrict with Filter
Set oTable = oFolder.GetTable(Filter)
'Enumerate the table using test for EndOfTable
Do Until (oTable.EndOfTable)
Set oRow = oTable.GetNextRow()
Debug.Print (oRow("EntryID"))
Debug.Print (oRow("Subject"))
Debug.Print (oRow("CreationTime"))
Debug.Print (oRow("LastModificationTime"))
Debug.Print (oRow("MessageClass"))
Loop
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.