XML达人请进,几个问题想请教一下

Question

网上有一则例子是这样写的:
写XML的方法:
        Dim   iRe   As   ADODB.Recordset
        Set   iRe   =   New   ADODB.Recordset
        With   iRe
                .Fields.Append   "Remote   Server",   adVarChar,   128
                .Fields.Append   "Remote   UID",   adVarChar,   128
                .Fields.Append   "Remote   PWD",   adVarChar,   128
                .Open
                .AddNew
                .Fields("Remote   Server")   =   "aa"
                .Fields("Remote   UID")   =   "sa"
                .Fields("Remote   PWD")   =   ""
                .Update
                .Save   "c:\aa.xml",   adPersistXML
        End   With
End   Sub我运行程序后得到如下的XML文档
<xml xmlns:s='uuid:BDC6E3F0-6DA3-11d1-A2A3-00AA00C14882'
xmlns:dt='uuid:C2F41010-65B3-11d1-A29F-00AA00C14882'
xmlns:rs='urn:schemas-microsoft-com:rowset'
xmlns:z='#RowsetSchema'>
<s:Schema id='RowsetSchema'>
<s:ElementType name='row' content='eltOnly' rs:updatable='true'>
<s:AttributeType name='c0' rs:name='Remote   Server' rs:number='1' rs:write='true'>
<s:datatype dt:type='string' rs:dbtype='str' dt:maxLength='128' rs:precision='0' rs:maybenull='false'/>
</s:AttributeType>
<s:AttributeType name='c1' rs:name='Remote   UID' rs:number='2' rs:write='true'>
<s:datatype dt:type='string' rs:dbtype='str' dt:maxLength='128' rs:precision='0' rs:maybenull='false'/>
</s:AttributeType>
<s:AttributeType name='c2' rs:name='Remote   PWD' rs:number='3' rs:write='true'>
<s:datatype dt:type='string' rs:dbtype='str' dt:maxLength='128' rs:precision='0' rs:maybenull='false'/>
</s:AttributeType>
<s:extends type='rs:rowbase'/>
</s:ElementType>
</s:Schema>
<rs:data>
<rs:insert>
<z:row c0='aa' c1='sa' c2=''/>
</rs:insert>
</rs:data>
</xml>
麻烦哪位达人给我解释一下这个文档的含义和格式,或者有这方面的资料也行.
另外,如果我想把一个xml文档存入access数据库,怎么做?
谢谢各位达人了

Answer 1

可以用流来保存文件到数据库：'引用 Microsoft ActiveX Data Objects 2.5 Library 或以上版本
'字段myFile为Ole对象类型(Access库)
'保存文件
Private Sub Command1_Click()
    Dim StmFile As ADODB.Stream
    '保存你所选择的文件
    Set StmFile = New ADODB.Stream
    StmFile.Type = adTypeBinary    '指定流是二进制类型
    CommonDialog1.ShowOpen
    StmFile.Open                     '将数据获取到Stream对象中
    StmFile.LoadFromFile (CommonDialog1.FileName) '将选择的文件加载到打开的StmFile中
    rs.AddNew
    rs.Fields("myFile").Value = StmFile.Read   '从StmFile对象中读取数据
    rs.Update
    StmFile.Close
End Sub
'读出文件
Private Sub Command2_Click()
    Dim StmFile As ADODB.Stream
    StrPicTemp = "c:\temp.xml"
    Set StmFile = New ADODB.Stream
    With StmFile
        .Type = adTypeBinary
        .Open
        .Write rs.Fields("myFile")       '数据库中的数据写入至Stream中
        .SaveToFile StrPicTemp, adSaveCreateOverWrite  '将Stream中数据写入临时文件中(C:\temp.xml)
        .Close
    End With
End Sub

Answer 2

我有一个XML指南的CHM..
可惜这里传不上来.

Answer 3

找到一个.
XML学习手册第二版
http://www.codechina.net/resource/html/2006-01/13/130367.html

Answer 4

如果把xml文件当stream去保存的话，太可惜了