Cómo llamar a un procedimiento almacenado de SQL Usando MS Access VBA

Conocer cómo llamar a un Microsoft SQL Server procedimiento almacenado en Microsoft Office Access utilizando Visual Basic para Aplicaciones ( VBA) que puede ahorrar tiempo en que usted necesita para ejecutar el procedimiento almacenado. SQL Server es un sistema de gestión de base de datos relacional utilizada para grandes bases de datos . El acceso es también un sistema de gestión de base de datos relacional , pero comúnmente utilizado para bases de datos más pequeñas . VBA es un lenguaje de programación utilizado para automatizar tareas rutinarias en las aplicaciones de Microsoft Office como Access . Instrucciones
1

Inicio Microsoft Office Access 2007 y seleccione "Base de datos en blanco ", y luego haga clic en " Crear". Haga clic en "Herramientas de base de datos" y seleccione "Visual Basic ". Haga clic en el campo " Insertar" y seleccione " Módulo ".
2

Seleccione el menú "Herramientas" y haga clic en "Referencias ... " Marque la casilla junto a " ActiveX Data Objects 3

Escriba lo siguiente para crear un nuevo subprograma y declarar variables:

Public Sub createDataToAnalyze ()

objConnection As New ADODB.Connection

objCom As ADODB.Command

provstr dévil como secuencia
4

Escriba lo siguiente para definir la conexión con el servidor SQL:

Set objCom = New ADODB.Command

objConnection.Provider = " sqloledb "

provstr = "Data Source = SERVERNAME , " & " Initial Catalog = nombre de la base ; User Id = uSER ID , contraseña = contraseña; ".

Editar el " "cadena provstr e ingrese su información de conexión , como el nombre del servidor, nombre de base de datos , ID de usuario y contraseña
5

Tipo el siguiente para definir la información de su procedimiento almacenado: . .

objConnection.Open provstr

objCom

ActiveConnection = objConnection

CommandText = " spCreateUserTbl "

CommandType = adCmdStoredProc

Ejecutar

extremo con

End sub ​​

Editar la línea siguiente y escriba el nombre del procedimiento almacenado . . :

. CommandText = " spCreateUserTbl "
6

Press "F5 " para ejecutar la subrutina.