Export Datatable xml

Habe ich einige DataTables dass ich exportieren möchten, um eine xml - Datei. Ich kann verwenden DataTable.WriteXml() für die Ausgabe der Inhalte der DataTables zu XML.

Ich ein Response object wie gezeigt. Ich muss hinzufügen von Attributen, die die Wurzel der xml-Ausgabe. Bitte helfen Sie mir mit, dass. hier ist der code, mit dem ich arbeite.

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
Welche version von .NETZ verwenden Sie?
Ich bin mit der version 2.0

InformationsquelleAutor user1707572 | 2013-06-17

  1. 2

    Müssen Sie ein string von der XML um es in Response.Write(result), hier sind einige Möglichkeiten:

    Angenommen, eine kleine DataSet wie folgt erstellt:

    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)

    • Können Sie GetXml Methoden aus der DataSet.

      Dim simpleresult As String = ds.GetXml

      Ausgabe:

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

    • Können Sie WriteXml Methoden aus der DataSet oder eine DataTable wenn Sie Steuern möchten XmlWriteMode. Erhalten Sie die String mit einem 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

      Ausgabe:

      <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>

    InformationsquelleAutor Chris

Schreibe einen Kommentar