关于XML问题

Question

我想把数据库中检索出来的记录写成一个XML文件（方便以某种形式现示）我想请教一个问题：结构当然已想好，那么把数据写入XML文件时是否当它为一个文本文件那样写（即：每一行都要组合字符串，包括结构），有没有一个函数是当写XML文件时不用关心结构，只关心数据的呢？谢谢！！

Answer 1

sqlserver数据库？可以这样：
select * from departments for xml auto最终查询的结果就是xml的格式了

Answer 2

以下直接将查询结果导出为xml格式的txt文件
EXEC master..xp_cmdshell 'bcp "select * from pubs..authors for xml auto" queryout c:\DT.txt -c -Syoki -Usa -P123456'

Answer 3

小马哥的第一个回答需要SQL2000以上版本。
我的一个办法是把记录读出来，保存成xml各式的文件。代码：
    Dim Conn As New ADODB.Connection
    Dim RS As New ADODB.Recordset
    Dim QueryString As String
    Dim XmlDoc As MSXML2.DOMDocument40
    Conn.ConnectionString = ConnString
    Conn.Open
    Set RS = Conn.Execute(QueryString)
    'On Error Resume Next
    Kill App.Path & "\output\rec.xml"
    RS.Save App.Path & "\output\rec.xml", adPersistXML然后你还可以用xsl文件来格式划他：
    XslDoc.async = False
    XslDoc.Load (App.Path & "\output\FormatFile.xsl")
    
    XmlDoc.transformNodeToObject XslDoc, ResultDoc
    On Error Resume Next
    Kill App.Path & "\output\" & FileName & ".xml"
    ResultDoc.Save (App.Path & "\output\" & FileName & ".xml")

Answer 4

当然你也可以用recordset对象本身的save方法

Answer 5

例如：Dim rs As New ADODB.Recordsetrs.Open "select * from departments", cnDatabase
rs.Save "d:\zz.xml", adPersistXML
rs.Close
Set rs = Nothing

Answer 6

一个字：强！！！大家可以说说关于使用XML的心得吗？或者说说使用XML的案例吗？谢谢！！

Answer 7

如果rs保存了一个xml文件，那么要想追加这个文件怎么办？谢谢！！