vb 6中，有哪些方法生成xml文档

Question

我公司的业务系统（vb开发）要和用友的NC通过文件交换数据（凭证数据），用友的接口文件要求XML格式。
请问，使用vb 6，有哪些方法可生成xml文档

Answer 1

Option ExplicitDim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Private Sub Command1_Click()
    rs.CursorLocation = adUseClient
    rs.Open "Select * from students", 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
    MsgBox rs.RecordCount
    rs.Close
End SubPrivate Sub Form_Load()
    If cn.State = 1 Then
        cn.Close
    End If
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\db1.mdb"
End Sub

Answer 2

xml其实是纯文本文件，生成只要用String写文本文件就可以了读取的时候可以用XML的对象

Answer 3

而且XML是自定义格式的，用别的方法生成的XML未必是妳所需的格式，自己按照自己的格式写文本文件，也是很简单的呀~