SqlDataAdapter.WriteXml : SqlDataAdapter « System.Data.SqlClient « VB.Net by API

1. VB.Net by API
2. System.Data.SqlClient
3. SqlDataAdapter

SqlDataAdapter.WriteXml

  
Imports System
Imports System.Data
Imports System.Data.SqlClient


public class MainClass
   Shared Sub Main()
      Dim thisConnection As New SqlConnection("server=(local)\SQLEXPRESS;" & _
          "integrated security=sspi;database=MyDatabase")
      ' Sql Query 
      Dim sql As String = _
         "SELECT * FROM Employee"

      Try
         ' Create Data Adapter
         Dim da As New SqlDataAdapter
         da.SelectCommand = New SqlCommand(sql, thisConnection)

         ' Create and fill Dataset
         Dim ds As New DataSet
         da.Fill(ds, "Employee")

         ' Extract DataSet to XML file
         ds.WriteXml("Employee.xml")

      Catch ex As SqlException
         ' Display error
         Console.WriteLine("Error: " & ex.ToString())
      Finally
         ' Close Connection
         thisConnection.Close()
         Console.WriteLine("Connection Closed")
      End Try
   End Sub
End Class

   
    
  

Related examples in the same category