ADO Database ASP.Net

<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.Oledb" %>

Sub Page_Load()
  Dim strConnection as String = "Provider=Microsoft.Jet.OLEDB.4.0;"
    strConnection += "Data Source=Northwind.mdb"
    data_src.text = strConnection
  Dim strSQL as string = "SELECT FirstName, LastName FROM Employees"
  Dim strResultsHolder as string
  Dim objConnection as New OledbConnection(strConnection)
  Dim objCommand as New OledbCommand(strSQL, objConnection)
  Dim objDataReader as OledbDataReader
  try
    objConnection.Open()
    con_open.text="Connection opened successfully."
  objDataReader = objCommand.ExecuteREader()
  Do While objDataReader.Read()=True
    strResultsHolder +=objDataREader("FirstName")
    strResultsHolder +=" "
    strResultsHolder +=objDataREader("LastName")
    strResultsHolder +="
"
  Loop
  objDataReader.Close()
    objConnection.Close()
    con_close.text="Connection closed.
"
  divListEmployees.innerHTML = strResultsHolder
  catch e as Exception
    con_open.text="Connection failed to open successfully.
"
    con_close.text=e.ToString()
  end try
end Sub


  
  

Reading data from the connection 
   with the DataReader object.


  

  list will go here