L'exportation Datatable à xml

J'ai quelques DataTables que je veux exporter vers un xml fichier. Je peux utiliser DataTable.WriteXml() à sortir le contenu de la DataTables à XML.

J'ai besoin d'utiliser un Response object comme indiqué. J'ai besoin d'ajouter des attributs à la racine de la sortie xml. Merci de m'aider. voici le code qui je travaille.

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    Dim FileName1 As String = "Sheet1.xml"
    Response.Clear()
    Response.AddHeader("Content-Disposition", "attachment; filename=" & FileName1)
    Response.ContentType = "text/xml"
    Dim ds As New DataSet("BuildingGroups")
    ds.EnforceConstraints = False
    Dim dtBuildingGroup As DataTable = Pipeline.Products.Components.BuildingGroupManager.GetBuildingGroupsToXML
    Dim result As String
    Dim sw As New StringWriter()
    dtBuildingGroup.TableName = "BuildingGroup"
    ds.Tables.Add(dtBuildingGroup)
    'Dim doc As New XmlDataDocument(ds)
    ds.WriteXml(sw)
    result = sw.ToString()
    Response.Write(result)
    Response.End()
End Sub
Quelle est la version de .NET vous aide?
Je suis l'aide de la version 2.0

OriginalL'auteur user1707572 | 2013-06-17

  1. 2

    Vous avez besoin pour obtenir un string de la XML afin de l'utiliser dans Response.Write(result), voici quelques façons:

    Supposons un petit DataSet créé comme ceci:

    Dim dt As New DataTable 
dt.Columns.Add(New DataColumn("Column1"))
dt.Columns.Add(New DataColumn("Column2"))
Dim r = dt.NewRow
r.Item(0) = "Value1"
r.Item(1) = "Value2"
dt.Rows.Add(r)
r = dt.NewRow
r.Item(0) = "Value3"
r.Item(1) = "Value4"
dt.Rows.Add(r)
Dim ds As New DataSet
ds.Tables.Add(dt)

    • Vous pouvez utiliser GetXml méthodes de la DataSet.

      Dim simpleresult As String = ds.GetXml

      De sortie:

      <NewDataSet>
  <Table1>
    <Column1>Value1</Column1>
    <Column2>Value2</Column2>
  </Table1>
  <Table1>
    <Column1>Value3</Column1>
    <Column2>Value4</Column2>
  </Table1>
</NewDataSet>

    • Vous pouvez utiliser WriteXml méthodes de la DataSet ou un DataTable si vous voulez contrôler XmlWriteMode. Vous obtenez le String à l'aide d'un MemoryStream.

      Dim result As String
Using ms As New IO.MemoryStream()
    ds.WriteXml(ms, System.Data.XmlWriteMode.WriteSchema)
    result = System.Text.Encoding.UTF8.GetString(ms.ToArray)
End Using

      De sortie:

      <NewDataSet>
  <xs:schema id="NewDataSet" xmlns="" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
    <xs:element name="NewDataSet" msdata:IsDataSet="true" msdata:UseCurrentLocale="true">
      <xs:complexType>
        <xs:choice minOccurs="0" maxOccurs="unbounded">
          <xs:element name="Table1">
            <xs:complexType>
              <xs:sequence>
                <xs:element name="Column1" type="xs:string" minOccurs="0" />
                <xs:element name="Column2" type="xs:string" minOccurs="0" />
              </xs:sequence>
            </xs:complexType>
          </xs:element>
        </xs:choice>
      </xs:complexType>
    </xs:element>
  </xs:schema>
  <Table1>
    <Column1>Value1</Column1>
    <Column2>Value2</Column2>
  </Table1>
  <Table1>
    <Column1>Value3</Column1>
    <Column2>Value4</Column2>
  </Table1>
</NewDataSet>

    OriginalL'auteur Chris