VB.Net by API/System.Xml/XmlReader
XmlReader.ReadOuterXml()
<source lang="vbnet"> 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.rumandText = "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
</source>