Call stored procedure and pass in parameters (VB.net) : OleDBCommand « ADO.net Database « ASP.NET Tutorial





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

<script runat="server">
   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
</script>

<html><body>
   <form runat="server">
      <asp:Label id="lblMessage" runat="server"
         maintainstate=false /><br>
      <asp:Panel id="Panel1" runat="server">
         <table>
         <tr>
            <td width="100" valign="top">
               First and last name:
            </td>
            <td width="300" valign="top">
               <asp:TextBox id="tbFName" runat="server" />
               <asp:TextBox id="tbLName" runat="server" />
            </td>
         </tr>
         </table>
      </asp:Panel>
   </form>
</body></html>










18.12.OleDBCommand
18.12.1.Use OleDBCommand to read data returned from a select statement (C#)
18.12.2.Pass OleDbParameter to OleDbCommand (VB.net)
18.12.3.Call stored procedure and pass in parameters (VB.net)
18.12.4.Execcute delete statement
18.12.5.Create OleDbDataReader object from OleDbCommand