Structured Query Language (SQL) est le langage informatique utilisé pour la gestion de bases de données relationnelles. Visual Basic pour Applications (VBA) est le langage de programmation développé par Microsoft pour utiliser avec les applications Microsoft Office pour créer du contenu dynamique. Microsoft Access est le programme de base de données à l`intérieur de la suite Microsoft Office qui utilise à la fois SQL et VBA pour gérer les données et de fournir l`automatisation des fonctions de base de données systématiques. Utilisation du shell de programmation derrière Microsoft Access, vous pouvez vous connecter à la base de données principale, la recherche de données, ajouter de nouvelles données et de suppression des données en combinant SQL et le code de programmation VBA.
Ouvrez la base de données que vous voulez travailler avec dans Microsoft Access. Ouvrez Visual Basic Editor en cliquant sur le "Database Tools" onglet, puis "Visual Basic."
Cliquer sur "Insérer" et alors "Module" dans l`éditeur Visual Basic.
Tapez le code pour se connecter à la base de données. Vous devrez établir une connexion afin d`utiliser des instructions SQL à la base de données.
Sous SQLTutorial ()
«Mettre en place vos variables pour contenir les informationsDim Conn ADODB.Connection `Ceci est la connexion réelle
Dim rsSelect comme ADODB.Recordset `Ceci est où vous enregistrerez les données
Dim rsDelete comme ADODB.Recordset
Dim rsInsert comme ADODB.Recordset
Dim rsUpdate comme ADODB.Recordset
Dim strSelectQuery as String `Ceci est la commande SQL SELECT réelle
Dim strDeleteQuery comme String `Celle-ci contiendra l`instruction SQL DELETE
Dim strInsertQuery as String `Ceci est l`instruction SQL INSERT
Dim strUpdateQuery comme String `Cette tiendra l`instruction UPDATE
`Type dans les détails pour se connecter à la base de données que vous voulez
Set Conn = New ADODB.Connection
Avec Conn
.ConnectionString ="Provider = Microsoft.Jet.OLEDB.4.0-" &_
"Data Source = C: Documents SampleDatabase.mdb"
.Ouvrir
Terminer par
Maintenant, votre connexion à la base de données a été faite. Ensuite, vous allez assigner des instructions SQL aux variables que vous avez déjà mentionnées ci-dessus.
Tapez un "SÉLECTIONNER" instruction SQL pour sélectionner les données de la base de données. Une requête SELECT est généralement constitué comme suit: "colonnes SELECT de table". Vous pouvez ajouter des critères à l`instruction SELECT en ajoutant dans le "OÙ" clause. Par exemple, vous avez une table appelée "Les clients" que vous souhaitez rechercher tous les clients avec le nom de famille "Forgeron." Le code VBA et SQL ressemblera à ceci:
strSelectQuery = "* SELECT FROM tblCustomers WHERE LastName = `Smith`
L`astérisque (*) est un caractère générique, ce qui signifie que vous voulez tirer toutes les informations, ou des colonnes, sur toute personne ayant le nom de famille "Forgeron." Pour sélectionner certaines colonnes, vous pouvez utiliser:
strSelectQuery = "SELECT FirstName, LastName DE tblCustomers WHERE LastName = `Smith`"
Tapez le "EFFACER" déclaration si vous souhaitez supprimer des lignes de données à partir d`une table. Le code pour cela est:
strDeleteQuery = "DELETE FROM tblCustomers WHERE LastName = `Smith`"
Cette déclaration va supprimer toutes les lignes où le client a un nom de famille "Forgeron" de "Les clients" table. La syntaxe de base pour une instruction DELETE est "DELETE FROM table WHERE colonne = `valeur`."
Tapez dans la syntaxe pour insérer une nouvelle ligne dans une table. Utilisez le "INSÉRER" déclaration.
strInsertQuery = "VALEURS INSERT INTO tblCustomers (John, Smith, 123 Main Street, Cleveland, Ohio)"
Si vous aviez une table de clients qui a FirstName, LastName, Adresse, Ville et les colonnes de l`Etat, cette déclaration va insérer dans les données dans la colonne de droite. La virgule indique le code pour passer à la colonne suivante avant d`entrer dans les valeurs. Assurez-vous que vous tapez dans les valeurs dans le bon ordre des colonnes dans la table afin que vos données sont cohérentes.
Tapez l`instruction SQL pour modifier une ligne de données. C`est le "METTRE À JOUR" déclaration.
strUpdateQuery = "UPDATE tblCustomers SET LastName = `Jones`, FirstName ="Jim" WHERE LastName = `Smith`"
Cette modification du compte tout le monde qui a un nom de famille "Forgeron" à "Jones" et leurs prénoms à "Jim." Vous pouvez modifier plusieurs colonnes de données à la fois dans une instruction UPDATE en séparant les colonnes par des virgules. La syntaxe de base pour une mise à jour est "UPDATE Table SET column1 = valeur1, column2 = valeur2, column3 = value3, ... WHERE colonne = valeur."
Tapez le code VBA qui exécutera la requête et enregistrer les résultats à recordsets. Fermez le code VBA.
Set rsSelect = New ADODB.Recordset
Avec rsSelect
Set .ActiveConnection = Conn.CursorType = adOpenStatic
.Source = strSelectQuery
.Ouvrir
Terminer par
Set rsDelete = New ADODB.Recordset
Avec rsDelete
Set .ActiveConnection = Conn.CursorType = adOpenStatic
.Source = strDeleteQuery
.Ouvrir
Terminer par
Set rsInsert = New ADODB.Recordset
Avec rsInsert
Set .ActiveConnection = Conn.CursorType = adOpenStatic
.Source = strInsertQuery
.Ouvrir
Terminer par
Set rsUpdate = New ADODB.Recordset
Avec rsDelect
Set .ActiveConnection = Conn.CursorType = adOpenStatic
.Source = strUpdateQuery
.Ouvrir
Terminer par
`Tapez le code VBA pour faire le travail avec les données que vous avez recueillies à travers les instructions SQL.
`Vous pouvez utiliser les données à afficher dans les formes, dans d`autres tables ou dans des rapports.
«Fermez les enregistrements et la connexion avec vous avez terminé
rsSelect.Close
rsDelete.Close
rsInsert.Close
rsUpdate.Close
End Sub
