Access (AdditionalData)，代表由 ExportXML 方法导出的父表中所包含的表和查询的集合。


注解
若要创建一个 AdditionalData 对象，请使用 CreateAdditionalData 应用程序 对象的方法。


若要将表添加到现有的 AdditionalData 对象，使用 Add 方法。


--------------------------------分割线---------------------------------------------------------------
Application.ExportXML 方法 (Access)


ExportXML 方法允许开发人员将 XML 数据、 架构和演示文稿信息导出从 Microsoft SQL Server 2000年桌面引擎 (MSDE 2000)，Microsoft SQL Server 6.5 版或更高版本，或者 Microsoft Access 数据库引擎。


语法
表达式。ExportXML (ObjectType、 DataSource、 DataTarget、 SchemaTarget、 PresentationTarget、 ImageTarget、 Encoding、 OtherFlags、 WhereCondition、 AdditionalData)


expression：表示 Application 对象的变量。

参数

注解
尽管 DataTarget、 SchemaTarget 和 PresentationTarget 参数都是可选的，但使用此方法时必须至少指定一个。 从 AccessObject 对象中调用 ExportXML 方法时，默认行为是覆盖任何现有任何的文件参数中指定。
--------------------------------分割线---------------------------------------------------------------
示例
下面的示例将 Northwind Traders 示例数据库的 Customers 表格的内容连同 orders 和 orders Details 表的内容一起导出到名为 Customer orders.xml 的 XML 数据文件中。


Sub ExportCustomerOrderData()
    Dim objOrderInfo As AdditionalData
    Set objOrderInfo = Application.CreateAdditionalData() '创建附加数据
    ' 将 orders 和 orderDetails 表添加到要导出的数据中。
    objOrderInfo.Add "Orders"
    objOrderInfo.Add "OrderDetails"


    ' 导出客户表的内容。 订单与订单明细
     ' 详细信息表将包含在 XML 文件中。
    Application.ExportXML ObjectType:=acExportTable, DataSource:="Customers", DataTarget:=Access.CurrentProject.Path & "\Customer orders.xml", AdditionalData:=objOrderInfo
End Sub