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






SqlDataAdapter.ReadXml

  


Imports System
Imports System.Xml
Imports System.Xml.Schema
Imports System.IO
Imports System.Data.SqlClient
Imports System.Collections
Imports System.Data


Public Class MainClass
    
    Shared Sub Main()
        Dim da As New SqlDataAdapter( _
                   "SELECT ID, FirstName, LastName FROM Employee", _
                   "Server=(local)\SQLEXPRESS;Initial Catalog=MyDatabase;Integrated Security=SSPI")

        Dim ds As New DataSet("Employee")
        da.FillSchema(ds, SchemaType.Source)
        ds.ReadXml("Employee.xml")

        Dim Table As DataTable = ds.Tables(0)
        Dim numCols As Integer = Table.Columns.Count

        Dim Row As DataRow
        For Each Row In Table.Rows
            Dim i As Integer
            For i = 0 To numCols - 1
                Console.WriteLine(Table.Columns(i).ColumnName & " = " & Row(i))
            Next
            Console.WriteLine()
        Next
    End Sub
End Class

   
    
  








Related examples in the same category

1.SqlDataAdapter.FillSchema
2.SqlDataAdapter.RowUpdated
3.SqlDataAdapter.RowUpdating
4.SqlDataAdapter.SelectCommand
5.SqlDataAdapter.TableMappings.Add
6.SqlDataAdapter.WriteXml