|
Structured Query Language (SQL ) est le langage informatique utilisé pour la gestion des bases de données relationnelles . Visual Basic pour Applications ( VBA ) est le langage de programmation développé par Microsoft pour une utilisation 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 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. Instructions
1 Ouvrez la base de données que vous souhaitez travailler dans Microsoft Access. Ouvrez Visual Basic Editor en cliquant sur l'onglet "Outils de base de données », puis « Visual Basic ».
2 Cliquez sur " Insérer" puis "Module" dans l'éditeur Visual Basic .
3 type de dans le code pour se connecter à la base de données . Vous aurez à établir une connexion afin d' utiliser des instructions SQL à la base de données.
Sous SQLTutorial ()
' Configurez votre variables pour contenir les informations
Dim Conn comme ADODB.Connection " c'est la connexion
rsSelect Dim réelle ADODB.Recordset « c'est là que vous allez enregistrer les données
rsDelete As ADODB.Recordset
Dim rsInsert comme ADODB.Recordset
rsUpdate As ADODB.Recordset
strSelectQuery As String ' c'est le SQL SELECT commande
strDeleteQuery Dim réelle String' Cette tiendra le SQL DELETE
strInsertQuery As String ' Il s'agit de la déclaration INSERT
strUpdateQuery Dim SQL As String' Cette tiendra le UPDATE
type ' dans les détails pour vous connecter à la base de données que vous souhaitez
Set Conn = New ADODB.Connection
Conn
ConnectionString = " Provider = Microsoft.Jet.OLEDB.4.0; " . & _
" Data Source = C: \\ Documents \\ SampleDatabase.mdb " .
Open
End With
votre connexion à la base de données a été faite. Ensuite, vous allez assigner des instructions SQL pour les variables déjà mentionnées ci-dessus .
4 Type de dans une instruction SQL "SELECT" pour sélectionner les données de la base de données. Une requête SELECT est généralement constitué comme ceci: " Sélectionner des colonnes dans la table" . Vous pouvez ajouter des critères à l'instruction SELECT en ajoutant dans la clause "WHERE" . Par exemple, vous avez une table appelée «clients» que vous souhaitez rechercher tous les clients dont le nom de " Smith ". Le code VBA et SQL ressemblera à ceci :
strSelectQuery = "SELECT * FROM WHERE tblCustomers 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 n'importe qui avec le nom de famille " . Smith" Pour sélectionner certaines colonnes , nous utiliserons:
strSelectQuery = " SELECT FirstName , LastName FROM tblCustomers WHERE LastName = 'Smith' " .
5 Saisissez la déclaration "DELETE" si vous souhaitez supprimer des lignes de données d'une table le code pour cela est :
strDeleteQuery = " DELETE FROM tblCustomers WHERE LastName = 'Smith' "
Cette déclaration permet de supprimer toutes les lignes où le client dispose d'un nom de " Smith " à partir de " clients " table. la syntaxe de base pour une instruction DELETE " DELETE FROM table WHERE de la valeur de la colonne = ' »
6 type dans la syntaxe pour insérer une nouvelle ligne dans une table . Utilisez le " INSERT " déclaration.
strInsertQuery =" . INSERT INTO VALUES tblCustomers ( John , Smith , 123, rue Main, Cleveland , Ohio ) "
Si vous aviez une table Customers qui a Prénom, Nom , adresse, ville et des colonnes de l'Etat, cette déclaration va insérer les données dans la colonne de droite . l' virgule raconte le code pour passer à la colonne suivante avant d'entrer dans les valeurs . Assurez-vous que vous tapez les valeurs dans le bon ordre des colonnes dans la table afin que vos données sont cohérentes.
7 Tapez l'instruction SQL pour modifier une ligne de données . Ceci est la déclaration "UPDATE" .
strUpdateQuery = "UPDATE tblCustomers SET NOM = ' Jones' , Prénom =" Jim "WHERE LastName = 'Smith' " Photos Cette instruction modifie tout le monde qui a un nom de "Smith" à " 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 avec virgules. La syntaxe de base pour une mise à jour est " tableau UPDATE SET column1 = valeur1 , column2 = valeur2, column3 = value3 , ... WHERE colonne = valeur ».
8 Type de dans le code VBA qui va exécuter la requête et enregistrer les résultats dans les jeux d'enregistrements . Fermez le code VBA.
Set rsSelect = New ADODB . enregistrements
rsSelect
Set. ActiveConnection = Conn
. CursorType = adOpenStatic
. Source = strSelectQuery
. Ouvert
End With
Set rsDelete = New ADODB.Recordset
rsDelete
Set. ActiveConnection = Conn
. CursorType = adOpenStatic
. Source = strDeleteQuery
. Open
End With
Set rsInsert = New ADODB.Recordset
rsInsert
< p> Set. ActiveConnection = Conn
. CursorType = adOpenStatic
. Source = strInsertQuery
. Open
End With
Set rsUpdate = New ADODB.Recordset
rsDelect
Set. ActiveConnection = Conn
. CursorType = adOpenStatic
. Source = strUpdateQuery
. Open
End With
' Entrez 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 pour poster dans les formes , dans d'autres tableaux ou dans les rapports.
« Fermez les enregistrements et la connexion avec vous sont faites
rsSelect.Close
rsDelete.Close
rsInsert.Close
rsUpdate.Close
End Sub
|
