Méthode Application.CreateAdditionalData (Access)

Crée un objet AdditionalData qui peut être utilisé pour ajouter des tables et des requêtes supplémentaires à la table parente exportée par la méthode ExportXML .

Syntaxe

expression. CreateAdditionalData

expressionUne variable qui représente un objetApplication.

Valeur renvoyée

AdditionalData

Exemple

L'exemple suivant exporte le contenu de la table Customers (Clients) dans la base de données exemple Les Comptoirs, conjointement au contenu des tables Orders et Orders Details (Commandes et Détails commandes), dans un fichier de données XML nommé 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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.