没有带参数!查看一下帮忙,有关XML读写的问题。

解决方案 »

  1.   

    im filePath As String
                Dim data_send As New DataSet
                filePath = CurDir() & "\ini\sys_state.xml"
                data_send.ReadXml(filePath)            data_send.Tables("Head").Rows(0).Item("TranCode") = TranCode
                data_send.Tables("Head").Rows(0).Item("DevNo") = DevNo
                data_send.Tables("Head").Rows(0).Item("FlowNo") = FlowNo
                
                data_send.WriteXml(CurDir() & "\temp.xml")
                data_send.Clear()
                data_send.Dispose()
      

  2.   

    Dim fs As New FileStream("aa.xml", FileMode.OpenOrCreate)
            Dim sw As New StreamWriter(fs)
            ds.WriteXml(sw)我这样一下子就成功了.