Manipulación De Una Base De Datos Desde Asp

Manipulación de una Base de datos desde ASP
1. Genere un Website con un Webform con el siguiente aspecto:
PanEliminar
PanSeleccionar
PanRegistro
PanMenu

Controles:
Tipo | Nombre |Valor |
Table | | |
Panel | PanMenu | |
Colocar estos controles en el panel |
Button | BtnmenuAgregar | Agregar |
| BtnmnuEliminar | Eliminar |
| BtnmnuModificar | Modificar |
Panel |PanRegistro | |
Colocar estos controles en el panel |
texto | | Nombre |
texto | | Apellidos |
Textbox | txtNombre | Nombre |
| Txt Apellidos | Apellidos |
Button |btnRegistroAccion | Acción |
| btnRegistroCancelar | Cancelar |
Panel | PanSeleccion | |
Colocar estos controles en el panel |
DropDownList | Cboempleados | |
Button | BtnSelAccion | Acción |
|BtnSelCancelar | Cancelar |
Panel | PanEliminar | |
Colocar estos controles en el panel |
texto | | Desea eliminar el siguiente registro? |
label | Lblinfo | |
button | BtnEliminar |Eliminar |
| BtnCancelarEliminar | Cancelar |
2. El ejemplo está usando una base de datos diseñada en Ms Access, para agregar la BD al WebSite primero agregue con el explorador de soluciones unacarpeta ASP.net llamada App_Data y en ella ubique la BD llamada curso:

3. Inserte los códigos correspondientes
Se utilizan las siguientes librerías para el manejo de la Base de Datos:
ImportsSystem.Data
Imports System.Data.OleDb

Variables:
Private con As OleDbConnection
Private cmd As OleDbCommand
Public registros As OleDbDataReader
Private da As New OleDbDataAdapter
Public dsAs New DataSet

Dim objLista As ListItem
Dim strSql As String

Funciones:
Public Sub Conectar()
con = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;DataSource=|Datadirectory|\curso.accdb")
con.Open()
End Sub

Public Sub Consulta(ByVal strSql As String)
Try
Conectar()
cmd = New OleDbCommand(strSql, con)...