如何从Access VBA导出大量具有不同名称的XML文件？

我正在用这段代码从access导出一个XML文件。我必须将许多xml文件导出到同一块地毯中，而且它们不必被替换。但是，在代码中，我不知道如何在DataTarget上编写它

Application.ExportXML ObjectType:=acExportTable, DataSource:="Customers", _
                      DataTarget:="Customer Orders.xml", _
                      AdditionalData:=objOrderInfo
End Sub

---

您只需检索用户输入的文件名，然后将其传递给

Application.ExportXML

，如下所示：

选项比较数据库
选项显式
专用子cmdPerformExport_Click（）
作为字符串的Dim fname
'文本框控件名为“txtExportFileName”
如果为空（Me.txtExportFileName.Value），则
MsgBox“您没有输入文件名。”
出口接头
如果结束
fname=txexportfilename.Value
Application.ExportXML_
ObjectType:=acExportTable_
数据源：=“客户”_
DataTarget:=fname&IIf（右（fname，4）=“.xml”、”、“.xml”）_
其他数据：=objOrderInfo
端接头

---

如果您需要额外的错误检查（例如，文件名仅包含有效字符、驱动器/路径存在等），您也需要添加该错误检查。

请回答您的问题，以便更好地解释您的问题。您当前的代码在做什么？其行为与您期望的行为有何不同？代码能工作吗？这会给你一个错误吗？请具体说明。我当前的代码是将表Customers导出到一个名为“Customers Orders”的XML文件中，是的，它可以工作。但是，我真正需要的是用户可以指定我要创建的XML的名称。例如，我有一个带有文本命令的表单，他们可以在其中写入“T3362”，然后在按钮上单击clic并用该名称保存XML文件。如果他们想要另一个名字，再写一次并点击按钮。那么，我该怎么做呢？我要在代码中说什么？太好了！但是“数据目标表示导出数据的文件名和路径。如果省略此参数，则不会导出数据”。所以，我需要写这两个。真正的问题是如何编写名称“fname”和类似“C:/XML\u文件”的路径。请帮帮我。