Метод Application.CreateAdditionalData (Access)

Создает объект AdditionalData , который можно использовать для добавления дополнительных таблиц и запросов в родительскую таблицу, экспортируемую методом ExportXML .

Синтаксис

expression. CreateAdditionalData

выражение: переменная, представляющая объект Application.

Возвращаемое значение

Дополнительные данные

Пример

В следующем примере содержимое таблицы Customers в образце базы данных Northwind Traders, а также содержимое таблиц Orders и Orders Details экспортируются в XML-файл данных с именем 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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.