Connaître comment appeler une procédure stockée Microsoft SQL Server à partir de Microsoft Office Access en utilisant Visual Basic pour Applications ( VBA ) peut vous faire gagner du temps lorsque vous devez exécuter la procédure stockée . Serveur SQL est un système de gestion de base de données relationnelle utilisée pour les grandes bases de données . L'accès est également un système de gestion de base de données relationnelle mais couramment utilisé pour les petites bases de données . VBA est un langage de programmation informatique utilisé pour automatiser des tâches de routine dans les applications Microsoft Office telles que Access. Instructions
1

Démarrer Microsoft Office Access 2007 et sélectionnez « Nouvelle base de données ", puis cliquez sur " Créer". Cliquez sur " Database Tools " puis sélectionnez " Visual Basic ". Cliquez sur le champ "Insérer" et sélectionner "Module ".
2

Sélectionnez le menu " Outils " et cliquez sur "Références ... " Cochez la case à côté de " Microsoft ActiveX Data Objects Library . " Cliquez sur « OK ».
3

Tapez la commande suivante pour créer un nouveau sous-programme et déclarer des variables :

publique createDataToAnalyze Sub ( )

objConnection As New ADODB.Connection

objCom As ADODB.Command

provstr Dim As String
4

Tapez la commande suivante pour définir la connexion à votre serveur SQL : < br >

Set objCom = New ADODB.Command

objConnection.Provider = " sqloledb "

provstr = "Data Source = SERVERNAME ; " & " initial Catalog = Nom de la base ; User Id = ID de l'utilisateur, mot de passe = mot de passe; ».

Modifier la " chaîne de provstr "et entrez vos informations de connexion , telles que le nom du serveur, nom de base de données , l'ID utilisateur et mot de passe
5

type suivantes pour définir les informations de votre procédure stockée: . .

objConnection.Open provstr

objCom

ActiveConnection = objConnection

CommandText = " spCreateUserTbl «

CommandType = adCmdStoredProc

Exécuter

End With End Sub

Modifier la ligne suivante, tapez votre nom de la procédure stockée . . : Photos

. CommandText = " spCreateUserTbl "
6

Appuyez sur " F5 " pour exécuter le sous-programme.