Compartilhar via


Coleção de documentos (DAO)

Aplica-se ao: Access 2013, Office 2013

Uma coleção Documents contém todos os objetos Document para um tipo específico de objeto (bancos de dados de mecanismo de banco de dados do Microsoft Access apenas).

Comentários

Cada objeto Container tem uma coleção Documents contendo objetos Document que descrevem instâncias de objetos internos do tipo especificado pelo Container.

Para fazer referência a um objeto Document em uma coleção por seu número ordinal ou por sua configuração de propriedade Name, use uma das seguintes formas de sintaxe:

  • Documents(0)

  • Documentos("nome")

  • Documentos! [nome]

Exemplo

Este exemplo enumera a coleção Documents do contêineer Tables e enumera a coleção Properties do primeiro objeto Document na coleção.

Sub DocumentX() 
 
 Dim dbsNorthwind As Database 
 Dim docLoop As Document 
 Dim prpLoop As Property 
 
 Set dbsNorthwind = OpenDatabase("Northwind.mdb") 
 
 With dbsNorthwind.Containers!Tables 
 Debug.Print "Documents in " & .Name & " container" 
 ' Enumerate the Documents collection of the Tables 
 ' container. 
 For Each docLoop In .Documents 
 Debug.Print " " & docLoop.Name 
 Next docLoop 
 With .Documents(0) 
 ' Enumerate the Properties collection of the first. 
 ' Document object of the Tables container. 
 Debug.Print "Properties of " & .Name & " document" 
 On Error Resume Next 
 For Each prpLoop In .Properties 
 Debug.Print " " & prpLoop.Name & " = " & _ 
 prpLoop 
 Next prpLoop 
 On Error GoTo 0 
 End With 
 End With 
 
 dbsNorthwind.Close 
 
End Sub