Binding Datagrid to Access Database

Taken from an old project, an illustration of binding a DataGrid to an Access database.

Sub BindDataGrid()
  Dim MyCommand As OleDbCommand
  Dim myConnection as OLEDBConnection
  Dim myDatareader as OLEDBDataReader
  Dim myAdapter as OLEDBDataAdapter
  Dim myDataSet As DataSet
  Dim sqlString As String
  myConnection = New oleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE="&server.mappath("/myDatabase.mdb"))
  sqlString = "SELECT * FROM myTable
  myAdapter = New OLEDBDataAdapter(sqlstring, myConnection)
  myDataSet = new DataSet myAdapter.fill(myDataSet, "pictures")
  myDataGrid.DataSource = myDataSet
  myDataGrid.Databind()
  myConnection.Close()
  MyCommand = Nothing
  myConnection = Nothing
  myDatareader = Nothing
  myAdapter = Nothing myDataSet = Nothing
  sqlString = Nothing
End Sub