如何将XML的数据导入ACCESS

Question

我现在要把INFORMIX的数据导入到ACCESS中。两个数据库的表的定义是一样的。原来的做法是把INFROMIX的数据读入到recordset中，然后再一条一条更新到ACCESS中。这样做的缺点是数据量大的时候，速度很慢。现在的想法是先把数据导出到XML文件中，recordset1.Save App.Path & "AA.xml", adPersistXML。
导出是比较快的。可是怎么批量导入到ACCESS中呢。找了很久都没有什么方法。请教各位大虾！

Answer 1

xml也需要用recordset全部读入啊

Answer 2

Recordset 还有一个load方法吧
  

Answer 3

'把XML读回到recordset中,然后更新到access.
'选中microsoft XML, version ... 数据库Dim objRS As New Recordset
Dim objXML As New DOMDocument'If objXML.loadXML(strCommandXML) = True Then
If objXML.load("C:A.XML") = True Then
    objRS.Open objXML
End If

Answer 4

如果是Delphi就方便了，adodataset就自带了savetofile和loadfromfile

Answer 5

已经解决了。
http://community.csdn.net/Expert/topic/5155/5155819.xml?temp=.2586023
用strSql = "select * into [text;database=d:\temp].123.txt from " & Talbe名
& "in [ODBC][ODBC;dsn=jbcmis;User Name=informix;password=informix;]"