Compartir a través de


Colección Documents (DAO)

Se aplica a: Access 2013, Office 2013

Una colección Documents contiene todos los objetos Document de un tipo de objeto específico (solo bases de datos del motor de base de datos de Microsoft Access).

Comentarios

Cada objeto Container tiene una colección Documents que contiene objetos Document que describen instancias de objetos integrados del tipo especificado por el objeto Container.

Para hacer referencia a un objeto Document en una colección mediante su número ordinal o mediante el valor de la propiedad Name, utilice una de las formas sintácticas siguientes:

  • Documents(0)

  • Documents("name")

  • ¡Documentos! [nombre]

Ejemplo

En este ejemplo se enumera la colección Documents del contenedor Tables y, a continuación, se enumera la colección Properties del primer objeto Document de la colección.

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