Application.ExportXML メソッド (Access)
ExportXML メソッドを使用すると、Microsoft SQL Server 2000 Desktop Engine (MSDE 2000)、Microsoft SQL Server 6.5 以降、または Microsoft Office Access データベース エンジンから XML データ、XML スキーマ、およびプレゼンテーション情報をエクスポートできます。
構文
式。ExportXML (ObjectType、 DataSource、 DataTarget、 SchemaTarget、 PresentationTarget、 ImageTarget、 Encoding、 OtherFlags、 WhereCondition、 AdditionalData)
expressionApplication オブジェクトを 表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
ObjectType | 必須 | AcExportXMLObjectType | エクスポートする AccessObject オブジェクトの種類を表す AcExportXMLObjectType。 |
DataSource | 必須 | String | エクスポートする AccessObject オブジェクトの名前を指定します。 既定値は、引数 ObjectType で指定した種類の、現在開いているオブジェクトです。 |
DataTarget | 省略可能 | String | エクスポートされるデータのファイル名とパスを指定します。 この引数を指定しないと、データはエクスポートされません。 |
SchemaTarget | 省略可能 | String | エクスポートされるスキーマ情報のファイル名とパスを指定します。 この引数を指定しないと、スキーマ情報は別の XML ファイルにエクスポートされません。 |
PresentationTarget | 省略可能 | String | エクスポートされるプレゼンテーション情報のファイル名とパスを指定します。 この引数を指定しないと、プレゼンテーション情報はエクスポートされません。 |
ImageTarget | 省略可能 | String | エクスポートされるイメージのパスを指定します。 この引数を指定しないと、イメージはエクスポートされません。 |
Encoding | Optional | AcExportXMLEncoding | エクスポートされた XML に使用するテキスト エンコードを指定する AcExportXMLEncoding 定数。 既定値は acUTF8 です。 |
OtherFlags | 省略可能 | AcExportXMLOtherFlags | XML のエクスポートに関連する動作を指定するビット マスクを指定します。 AcExportXMLOtherFlags クラスの定数を組み合わせて指定できます。 |
WhereCondition | 省略可能 | String | エクスポートされるレコードのサブセットを指定します。 |
AdditionalData | 省略可能 | バリアント型 (Variant) | エクスポートする追加テーブルを指定します。 OtherFlags 引数が acLiveReportSource に設定されている場合、この引数は無視されます。 |
戻り値
なし
解説
DataTarget、SchemaTarget、PresentationTarget の各引数はすべて省略可能ですが、このメソッドを使用する場合は、少なくとも 1 つを指定する必要があります。 AccessObject オブジェクトで ExportXML メソッドが呼び出されるときは、これらの引数で指定された既存のファイルが、既定の動作によって上書きされます。
例
次の例では、ノースウィンド サンプル データベースの [得意先] テーブルの内容を、[受注] および [受注明細] テーブルの内容と一緒に Customer Orders.xml という名前の XML データ ファイルにエクスポートします。
Sub ExportCustomerOrderData()
Dim objOrderInfo As AdditionalData
Dim objOrderDetailsInfo As AdditionalData
Set objOrderInfo = Application.CreateAdditionalData
' Add the Orders and Order Details tables to the data to be exported.
Set objOrderDetailsInfo = objOrderInfo.Add("Orders")
objOrderDetailsInfo.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 のサポートおよびフィードバックを参照してください。