Microsoft Access（2010）无法导出数据使用导出查询xml

Question

您好我想在MS Access中使用ExportXML方法导出带有用户输入查询使用窗体。

我得到的错误： 运行 - 时间错误“31532” 的Microsoft Access无法导出数据

这是我使用的代码。

Private Sub Command9_Click() 
Application.ExportXML ObjectType:=acExportQuery, DataSource:="eparcelorder", _ 
DataTarget:="C:\XML\" + tmpWorkOrderNo.Caption + ".xml", _ 
WhereCondition:="dbo_eParcel.workorderno = '" & Forms!frmMainForm![tmpWorkOrderNo]. [Caption] & "'" 
End Sub 

MS Access 2010有什么限制可以阻止在要求用户输入或使用标准时导出数据吗？

非常感谢您的帮助！我一直在为此工作了一个星期，这是一个非常简单的功能

Answer 1

我使用附件在约五分钟内生成一个300万行嵌套xml。

有两个关键项目，

1）一段简单的VB，

公共功能Export_ListingData（）

Dim objOtherTbls As AdditionalData 

On Error GoTo ErrorHandle 
Set objOtherTbls = Application.CreateAdditionalData 
objOtherTbls.Add "ro_address" 
objOtherTbls.Add "ro_buildingDetails" 
objOtherTbls.Add "ro_businessDetails" 
objOtherTbls.Add "ro_businessExtras" 
objOtherTbls.Add "ro_businessExtrasAccounts" 
objOtherTbls.Add "ro_businessExtrasAccom" 
objOtherTbls.Add "ro_businessExtrasAccom2" 

Application.ExportXML ObjectType:=acExportTable, _ 
      DataSource:="ro_business", _ 
      DataTarget:="C:\Users\Steve\Documents\Conversions\ListData.xml", _ 
      AdditionalData:=objOtherTbls 

Exit_Here： MSGBOX “Export_ListingData完成” 退出功能 ErrorHandle： MsgBox Err.Number &“：”& Err.Description Resume Exit_Here End Function

2）在关系管理器中使用从主键到外键的连接链接表。

如果没有关系，代码将产生一个连续的xml文件，如果主键之间存在 关系，您将得到31532错误并且数据导出将失败。

亲切的问候

史蒂夫