Try Dim conn As New OleDbConnection(CnString) conn.Open() Dim cmd As New OleDbCommand(Query, conn) Dim ada As New OleDbDataAdapter(cmd) Dim dt As DataTable = New DataTable ada.Fill(dt) grd.DataSource = Nothing grd.DataSource = dt grd.AutoGenerateColumns = False conn.Close() Catch ex As Exception End Try
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)