请问如何将XML字符串转换成数据集，以便于绑定到DATAGRID？

Question

请问如何将XML字符串转换成数据集，以便于绑定到DATAGRID？

Answer 1

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Private Sub Command1_Click()
    rs.CursorLocation = adUseClient
    rs.Open "Select * from zone", cn, adOpenStatic, adLockBatchOptimistic
    MsgBox rs.RecordCount
    '保存为XML
    rs.Save "c:\bbb.xml", adPersistXML
    rs.Close
    读取XML文件
    rs.Open "c:\bbb.xml", cn, adOpenStatic, adLockReadOnly, adCmdFile
    Set DataGrid1.DataSource = rs
    DataGrid1.Refresh
    rs.Close
    Set rs = Nothing
End SubPrivate Sub Form_Load()
    If cn.State = 1 Then
        cn.Close
    End If
    Set cn = New ADODB.Connection '打开数据库
        sql = "Provider=SQLOLEDB.1;User ID=sa;password=;Initial Catalog=evaluate;Data Source=(local)"
        cn.ConnectionTimeout = 10
        cn.Open sql
    
End Sub

Answer 2

如果是一个RS保存的xml格式文本 我试过用ado.stream对象
streamobj.open
streamobj.writetext xmlstring
rs.open streamobj
这样可以从xml字符串恢复rs

Answer 3

谢谢各位，
但是，我要操作的原始XML字符串并不是RS从数据库中保存的XML文件，我试过 myhgyp(也许是这样的，信不信由你) ，是可以的，但是我看了那个生成的XML文件，很复杂的，记录了完整的数据库信息。要将简单的XML字串构造成那么复杂的XML好象也不容易。----------------------
时间啊流水它匆匆过，编码的你啊快不快乐？ ；）