Cómo llamar a procedimientos almacenados en Visual Basic

Visual Basic proporciona a los desarrolladores un lenguaje de alto nivel para crear aplicaciones de escritorio de Windows. El lenguaje Visual Basic se integra perfectamente con los servidores de bases de datos, por lo que puede recuperar la información de tablas y mostrarlos en sus aplicaciones dinámicas. Visual Basic llama a un procedimiento almacenado, y almacena los resultados en un conjunto de datos. Este conjunto de datos se utiliza para manipular y editar los datos almacenados.

Instrucciones

1 Crear las variables de Visual Basic. Hay tres variables necesarias para llamar a un procedimiento almacenado: una conexión con la base de datos, un conjunto de registros que almacena los resultados y el objeto de comando que se ejecuta el procedimiento. El siguiente código crea las variables:

Dim conn As New ADODB.Connection
registros Dim como nuevo ADODB.Recordset
Como ADODB.Command comando de graduación

2 Crear la conexión de base de datos. La conexión a la base lleva el nombre de base de datos, su nombre de usuario y la contraseña y el nombre del servidor y se abre una conexión. El siguiente es un ejemplo de una conexión de Visual Basic a una base de datos de SQL Server:

conn.Open "Provider = SQLOLEDB; Data Source = theserver; Initial Catalog = thedatabase", "usuario", "contraseña"

3 Configurar el objeto de comando procedimiento almacenado. Este objeto se utiliza el objeto conexión creada en el paso 2 y ejecuta el procedimiento almacenado. El código siguiente es un ejemplo de cómo configurar el comando:

command.ActiveConnection conn =
command.CommandType = adCmdStoredProc
command.CommandText = "sel_GetCustomers"

La propiedad "ActiveConnection" está ajustado a su objeto de conexión. El "CommandType" es un valor constante llamado "adCmdStoredProc." Esto le indica al comando que se trata de un procedimiento almacenado. Los "sel_GetCustomers" es el nombre del procedimiento almacenado.

4 Asignar los resultados de procedimiento almacenado en el objeto de conjunto de registros. El código siguiente recupera todos los resultados y los almacena:

Establecer registros = Command.Execute

5 Imprima un registro. Para garantizar que el proceso completado con éxito, imprimir el primer registro a su ventana del depurador. El siguiente código pone a prueba sus resultados de procedimiento almacenado:

Records.Fields de impresión (0)