Read from database and fill DataTable

ado.net, datatable, vb.net

Solution

Connection object is for illustration only. The DataAdapter is the key bit:

Dim strSql As String = "SELECT EmpCode,EmpID,EmpName FROM dbo.Employee"
Dim dtb As New DataTable
Using cnn As New SqlConnection(connectionString)
  cnn.Open()
  Using dad As New SqlDataAdapter(strSql, cnn)
    dad.Fill(dtb)
  End Using
  cnn.Close()
End Using

Problem

I'm getting a set of data by a `DataReader` and assigning to a string. Now I need to fill the `DataTable` columns with the query fields. The `DataTable` is connected to a grid to display the filled data. query is : ``` strSQL = "SELECT EmpCode,EmpID,EmpName FROM dbo.Employee ``` `DataTable` columns are `EmpCode, EmpID, EmpName`. I need to read the query and assign to the columns of `DataTable` and fill the table. I have tried as below but i dont get the proper output, ``` Me.DtShifts.Tables("NonAllocated").Clear() Me.DtShifts.Tables("NonAllocated").Load(dr) ```

Original source