如何将ADO导出的XML(没有持久 Recordset 文件名)导入ADO中
vrych 2003-11-26 11:15:20 我的程序如下:
Dim rs As ADODB.Recordset
Dim doc As New DOMDocument
Dim str_Conn As String
Dim str_sql As String
str_Conn = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=test;Data Source=vr"
Set rs = New ADODB.Recordset
str_sql = "select * from aa"
rs.Open str_sql, str_Conn, adOpenStatic, adLockBatchOptimistic
rs.Save doc, adPersistXML
rs.Close
在此处出错
rs.Open doc, str_Conn
MsgBox rs.Fields(1).Value