Método Application.CreateAdditionalData (Access)

Crea un objeto AdditionalData que se puede usar para agregar tablas y consultas adicionales a la tabla primaria que exporta el método ExportXML .

Sintaxis

expresión. CreateAdditionalData

expresión Variable que representa un objeto Application.

Valor devuelto

AdditionalData

Ejemplo:

En el siguiente ejemplo se exporta el contenido de la tabla Customers de la base de datos de ejemplo Neptuno, junto con el contenido de las tablas Orders y Orders Details, a un archivo de datos 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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.