Output data in database to XML directly : Database to XML « Database ADO.net « VB.Net






Output data in database to XML directly

Output data in database to XML directly
 
Imports System
Imports System.Collections
Imports System.Data
Imports System.IO
Imports System.Xml.Serialization
Imports System.Xml
Imports System.Windows.Forms
Imports System.Data.SqlClient


Public Class MainClass
    Shared Dim WithEvents con As SqlConnection

    Shared Sub Main()
        con = New SqlConnection("Server=(local)\SQLEXPRESS;Initial Catalog=MyDatabase;Integrated Security=SSPI") 

        Dim cmd As New SqlCommand()

        cmd.CommandText = "SELECT * FROM Employee FOR XML AUTO, XMLDATA"
        cmd.Connection = con

        Try
            con.Open()
            Dim reader As XmlReader = cmd.ExecuteXmlReader()
            While reader.Read()
                Console.WriteLine(reader.ReadOuterXml())
            End While
            reader.Close()
        Finally
            con.Close()
        End Try
    End Sub
End Class
           
         
  








Related examples in the same category

1.Save result from 'select' command directly to a XML file
2.Serializing DataSet into an XML DOM
3.Save data from database table directly to XML documentSave data from database table directly to XML document
4.Create and configure a new command that includes the FOR XML AUTO clause