Описание
Задает или возвращает значение, указывающее владельца объекта (только в рабочей области Microsoft Jet).
Значение
Задаваемое или возвращаемое значение является выражением типа String, значением которого является либо имя объекта User в семействе Users, либо имя объекта Group в семействе Groups.
Замечания
Владелец объекта имеет особые привилегии, которыми не обладают другие пользователи. Значение свойства Owner (владелец) может быть изменено в любой момент времени с помощью любой учетной записи пользователя (представляемой объектом User) или учетной записи группы (представляемой объектом Group), для которых определены соответствующие разрешения.
Пример
Следующая программа использует свойства Owner и SystemDB, чтобы показать владельцев разных объектов Document.
Sub OwnerX()
' Проверяет, доступен ли файл системной
' базы данных Microsoft Jet.
DBEngine.SystemDB = "system.mdw"
Dim dbsNorthwind As Database
Dim ctrLoop As Container
Set dbsNorthwind = OpenDatabase("Борей.mdb")
With dbsNorthwind
Debug.Print "Владельцы документов:"
' Отображает семейство Containers и показывает
' владельца первого объекта Document в семействе
' Documents каждого контейнера.
For Each ctrLoop In .Containers
With ctrLoop
Debug.Print " [" & .Documents(0).Name & _
"] в контейнере [" & .Name & _
"] имеет владельца [" & _
.Documents(0).Owner & "]"
End With
Next ctrLoop
.Close
End With
End Sub