xml 嵌套表保存

         Dim ds As New CIDP   ''cidp是我定义的xml文档
            Dim dr As DataRow
            For i As Short = 0 To no - 1
                dr = ds.Tables("控制方案").NewRow
                dr(0) = v_控机构名称(i)
                dr(1) = v_控制方案名称(i)
                ds.Tables("控制方案").Rows.Add(dr)
            Next
        ds.WriteXml(FileAddress)
   我有一个表格，tablename控制方案，控制方案表嵌套表生产厂家，我想保存为xml格式。不会写，怎么弄啊！！！
   我对xml 不同，请明白的人好好讲讲可以么？？？？请把程序写出来。 --------------------编程问答-------------------- 你循环把表遍历下，生成XML格式的内容，然后再保存XML格式文档！
  dim i as integer
  dim str as string
  str="<tablename>"'
  for i=0 to ds.Tables("控制方案").rows.count-1
    dim dr  as datarow
    dr=ds.Tables("控制方案").rows(i)
    str&="<row" & i+1 & ">" & dr(i)(0) & "</row>" & i+1 & ">"
next i
   str=str & "</tablename>"
   dim XmlDoc as Xml.XmlDocument
   XmlDoc.Load(str)
   XmlDoc.save(path)'path为你保存的路径

希望对楼主有帮助 --------------------编程问答--------------------    XmlDoc.save(path & "\tmp.xml")'path为你保存的路径 --------------------编程问答--------------------
YourDataSet.WriteXml("C:\123.xml", XmlWriteMode.WriteSchema)

补充：.NET技术 ,  VB.NET

xml 嵌套表 保存

xml 嵌套表保存