Foxtable(狐表)用户栏目专家坐堂 → 求助:想了解system.xml.dll中的相关命名及调用使用方法


  共有1932人关注过本帖树形打印复制链接

主题:求助:想了解system.xml.dll中的相关命名及调用使用方法

帅哥哟,离线,有人找我吗?
blackzhu
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9876 积分:57613 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By: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
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9876 积分:57613 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By: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

 这样写也错误!

 回到顶部