Nur fürs Archiv eine Möglochkeit mit Dataset und Adapter auf eine Datenbank zuzugreifen und die Daten an ein Control zu binden.
Sub Page_Load(ByVal Sender As Object, ByVal E As EventArgs)
Dim objDataSet As DataSet = New DataSet
Dim StrConnect, StrSelect As String
StrConnect = "..."
Dim objConnection As OleDbConnection = New OleDbConnection
objConnection.ConnectionString = StrConnect
StrSelect = "Select *..."
Dim objCommand As OleDbCommand = objConnection.CreateCommand()
objCommand.CommandText = StrSelect
Dim objAdapter As OleDbDataAdapter = New OleDbDataAdapter
Dim objDataTable As New DataTable
objAdapter.SelectCommand = New OleDbCommand(StrSelect, objConnection)
objAdapter.SelectCommand.Connection.Open()
objAdapter.Fill(objDataset, "name")
Grid1.DataSource = objDataSet
Page.DataBind()
End Sub