VBSCRIPT的记录集对象，呼出一个XML文件有错。

[aaaa811216]

下面是我写的代码。

Dim objRec
Dim tempfile
On Error resume next
Set objRec = CreateObject("ADODB.Recordset")
objRec.Open "D:\a.xml"
if Err.Number <> 0 then
Call MsgBox(Err.Number)
end if
上面的代码执行后又错误。Err.Number = 3709
到底是怎么回事啊，弄一下午了，请大家帮帮忙。

[wtogether]

Msgbox Err.Description
可以看到原因
这个错误的原因应该是:该xml文件不是一个有效的adPersistXML格式的文件
D:\a.xml必须用adodb.recordset.save保存,而且属性必须是adPersistXML
例如
rs.save "D:\a.xml", 1
然后你才能用rs.open打开

[笨笨兔兔兔兔兔]

你用ie或记事本或editplus打开,看看是不是xml格式的,还有是不是save的固定格式的

[砸死牛顿的苹果]

asp 和 vbs 不是一回事吧 虽然语法基本一致

[lzflove120]

欢迎新老高手加入群17844273

[smartcatiboy]

recordset的xml有自己的格式

[椅子]

ado的结果集save成的xml

需要用ado的stream来load，然后将stream转换成recordset

[aaaa811216]

问题是怎么解决啊，拜托大家了。主要是我们公司电脑有的就好用，有的就不好用，感觉像是系统配置的问题。

[椅子]

mdac_typ，去找这个安装程序

是因为ado的版本不同造成的。