以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助：想了解system.xml.dll中的相关命名及调用使用方法  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=92058)
--  作者：李孝春
--  发布时间：2016/10/25 11:24:00
--  求助：想了解system.xml.dll中的相关命名及调用使用方法
求助：想了解system.xml.dll中的相关命名及调用使用方法
用来实现自定义的XML数据输出

图片点击可在新窗口打开查看此主题相关图片如下：11.png
图片点击可在新窗口打开查看
--  作者：blackzhu
--  发布时间：2016/10/25 15:46:00
--  
 写了一个函数:

    Private Function ConvertXMLToDataSet(xmlData As String) As DataSet
        Dim stream As StringReader = Nothing
        Dim reader As XmlTextReader = Nothing
        Try
            Dim xmlDS As New DataSet()
            stream = New StringReader(xmlData)
            reader = New XmlTextReader(stream)
            xmlDS.ReadXml(reader)
            Return xmlDS
        Catch ex As Exception
            Dim strTest As String = ex.Message
            Return Nothing
        Finally
            If reader IsNot Nothing Then
                reader.Close()
            End If
        End Try
    End Function


执行是这样的:


   Dim mystr As New DataSet()
        mystr = ConvertXMLToDataSet("E:\\xxxx\\AUTHORS.XML")
        DataGridView1.DataSource = mystr.Tables(0)

执行后会崩溃! 


--  作者：blackzhu
--  发布时间：2016/10/25 16:11:00
--  
Dim filePath As String
        filePath = "E:\\360云盘\\Visual Basic.NET\\第5章\\实例100-将XML数据读入数据集\\AUTHORS.XML"
        \'将XML文件的完整路保存到filePath变量中()
        Dim mystr As New DataSet()
        mystr.ReadXml(filePath)
        With DataGridView1
            .DataSource = mystr.Tables(0)
            \'  .DataMember = "authors"
            \'   .CaptionText = .DataMember
        End With

 这样写也错误!
--  作者：李孝春
--  发布时间：2016/10/25 16:35:00
--  回复：（blackzhu） 写了一个函数:  &...
朱老师 有没有完美解决办法呢?
--  作者：有点蓝
--  发布时间：2016/10/25 16:57:00
--  
回1楼：https://www.baidu.com/baidu?word=system.xml+msdn&ie=utf-8&tn=myie2dg&ch=6