Partilhar via


Objeto AdditionalData (Access)

Representa a coleção de tabelas e consultas que será incluída com a tabela pai exportada pelo método ExportXML.

Comentários

Para criar um objeto AdditionalData, use o CreateAdditionalData método do objeto Application.

Para adicionar uma tabela a um objeto AdditionalData existente, use o método Add.

Exemplo

O exemplo a seguir exporta o conteúdo da tabela Customers no banco de dados de exemplo da Northwind Traders, juntamente com o conteúdo das tabelas Orders e Orders Details para um arquivo de dados XML denominado Customer Orders.xml.

Sub ExportCustomerOrderData() 
 Dim objOrderInfo As AdditionalData 
 
 Set objOrderInfo = Application.CreateAdditionalData 
 
 ' Add the Orders and Order Details tables to the data to be exported. 
 objOrderInfo.Add "Orders" 
 objOrderInfo.Add "Order Details" 
 
 ' Export the contents of the Customers table. The Orders and Order 
 ' Details tables will be included in the XML file. 
 Application.ExportXML ObjectType:=acExportTable, DataSource:="Customers", _ 
 DataTarget:="Customer Orders.xml", _ 
 AdditionalData:=objOrderInfo 
End Sub

Métodos

Propriedades

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.