ADO Net Database ASP.Net Tutorial

<%@ Page Language="VB" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>

   dim Conn as new OleDbConnection( _
            "PROVIDER=Microsoft.Jet.OLEDB.4.0;" _
            & "DATA SOURCE=" _
            & Server.MapPath("EmployeeDatabase.mdb;"))
   
   sub InsertData(Sender as Object, e as EventArgs) 
      dim objCmd as OleDbCommand = new OleDbCommand _
         ("InsertUser", Conn)
      objCmd.CommandType = CommandType.StoredProcedure
      
      dim objParam as OleDbParameter
      objParam = objCmd.Parameters.Add("@FirstName", OleDbType.BSTR)
      objParam.Direction = ParameterDirection.Input
      objParam.Value = tbFName.Text
      
      objParam = objCmd.Parameters.Add("@LastName", OleDbType.BSTR)
      objParam.Direction = ParameterDirection.Input
      objParam.Value = tbLName.Text
      
      try
         objCmd.Connection.Open()
         objCmd.ExecuteNonQuery
      catch ex as OleDbException
         lblMessage.Text = ex.Message
      end try
      objCmd.Connection.Close()
      lblMessage.Text = "User successfully added."
   end sub


   
               maintainstate=false />

      
         
         
            
               First and last name: