System.Xml.XmlDocument”的值无法转换为“System.Xml.XmlReader？

        Dim ds As DataSet

        ds = AmpApplication.AppStatistic.RPTStats(AppYear, selectedID)

        Dim inputXML As XmlDocument

        Dim outputXML As New XmlDocument

        Dim inputXSL As XslCompiledTransform

        Dim xWriter As XmlTextWriter

        Dim strOutput As String

        Dim so = New StatsObjects



        Using ms = New MemoryStream

            xWriter = New XmlTextWriter(ms, System.Text.UnicodeEncoding.UTF8)

            inputXML = New XmlDocument

            inputXML.InnerXml = ds.GetXml

            inputXSL = New XslCompiledTransform

            inputXSL.Load(Server.MapPath("~\Admin\utils\xslt\mainStatistics_scores.xslt"))

            inputXSL.Transform(inputXML, Nothing, xWriter, Nothing)

            strOutput = System.Text.UnicodeEncoding.UTF8.GetString(ms.ToArray())

            ms.Position = 0

            Using sr As StreamReader = New StreamReader(ms)

                so.scores = sr.ReadToEnd()

            End Using

        End Using



        Using ms = New MemoryStream

            xWriter = New XmlTextWriter(ms, System.Text.UnicodeEncoding.UTF8)

            inputXML = New XmlDocument

            inputXML.InnerXml = ds.GetXml

            inputXSL = New XslCompiledTransform

            inputXSL.Load(Server.MapPath("~\Admin\utils\xslt\mainStats_gender.xslt"))

            inputXSL.Transform(inputXML, Nothing, xWriter, Nothing)

            strOutput = System.Text.UnicodeEncoding.UTF8.GetString(ms.ToArray())

            ms.Position = 0

            Using sr As StreamReader = New StreamReader(ms)

                so.gender = sr.ReadToEnd()

            End Using

        End Using



        Using ms = New MemoryStream

            xWriter = New XmlTextWriter(ms, System.Text.UnicodeEncoding.UTF8)

            inputXML = New XmlDocument

            inputXML.InnerXml = ds.GetXml

            inputXSL = New XslCompiledTransform

            inputXSL.Load(Server.MapPath("~\Admin\utils\xslt\mainStats_degree.xslt"))

            inputXSL.Transform(inputXML, Nothing, xWriter, Nothing)

            strOutput = System.Text.UnicodeEncoding.UTF8.GetString(ms.ToArray())

            ms.Position = 0

            Using sr As StreamReader = New StreamReader(ms)

                so.degree = sr.ReadToEnd()

            End Using

        End Using



        Using ms = New MemoryStream

            xWriter = New XmlTextWriter(ms, System.Text.UnicodeEncoding.UTF8)

            inputXML = New XmlDocument

            inputXML.InnerXml = ds.GetXml

            inputXSL = New XslCompiledTransform

            inputXSL.Load(Server.MapPath("~\Admin\utils\xslt\mainStats_college.xslt"))

            inputXSL.Transform(inputXML, Nothing, xWriter, Nothing)

            strOutput = System.Text.UnicodeEncoding.UTF8.GetString(ms.ToArray())

            ms.Position = 0

            Using sr As StreamReader = New StreamReader(ms)

                so.college = sr.ReadToEnd()

            End Using

        End Using



        Using ms = New MemoryStream

            xWriter = New XmlTextWriter(ms, System.Text.UnicodeEncoding.UTF8)

            inputXML = New XmlDocument

            inputXML.InnerXml = ds.GetXml

            inputXSL = New XslCompiledTransform

            inputXSL.Load(Server.MapPath("~\Admin\utils\xslt\mainStats_geo.xslt"))

            inputXSL.Transform(inputXML, Nothing, xWriter, Nothing)

            strOutput = System.Text.UnicodeEncoding.UTF8.GetString(ms.ToArray())

            ms.Position = 0

            Using sr As StreamReader = New StreamReader(ms)

                so.geo = sr.ReadToEnd()

            End Using

        End Using

补充：.NET技术 ,  ASP.NET

上一个：关于ACCESS数据库中存取二进制文件的问题
下一个：viewstate 記錄多項紀錄