Viewing Data in a DataGrid Control in ADO.NET

Imports System

Imports System.Collections

Imports System.Configuration

Imports System.Data

Imports System.Linq

Imports System.Web

Imports System.Web.Security

Imports System.Web.UI

Imports System.Web.UI.HtmlControls

Imports System.Web.UI.WebControls

Imports System.Web.UI.WebControls.WebParts

Imports System.Xml.Linq

Imports System.Data.OleDb

Namespace DataGrid

    Partial Public Class _Default

        Inherits System.Web.UI.Page

        Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)

        End Sub

        Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)

            ' Create  a Connection object

            Dim ConnectionString As String = " provider = Microsoft.Jet.OLEDB.4.0; " & "Data Source=C:/Northwind.mdb"

            Dim conn As New OleDbConnection(ConnectionString)

            ' open the connection

            If conn.State <> ConnectionState.Open Then

                conn.Open()

            End If

            ' Create a data adapter

            Dim da As New OleDbDataAdapter("SELECT CustomerID,CompanyName,Address,City FROM  customers", conn)

            ' Create and fill a dataset

            Dim ds As New DataSet()

            da.Fill(ds)

            ' Bind dataset to the control

            DataGrid1.DataSource = ds

            DataGrid1.DataBind()

            ' Close the connection

            If conn.State = ConnectionState.Open Then

                conn.Close()

            End If

        End Sub

    End Class