Comment exécuter des requêtes Access dans Visual Basic

Étape 1

Exécutez Microsoft Office Access et sélectionnez "Base de données vide". Nommez la base de données comme "QueryTest" et cliquez sur "Créer".

Étape 2

Créez une nouvelle table et nommez-la "Table1". Dans la première ligne, écrivez "John" sous "Champ1" et "Smith" sous "Champ2".

Ajoutez une autre ligne en tapant "James" sous "Champ1" et "Gonzalez" sous "Champ2". Enregistrez la table "Table1" et fermez-le.

Étape 3

Exécutez Microsoft Visual Basic 2010 Express et sélectionnez "Nouveau projet" dans le menu "Fichier". Choisissez "Application Windows Forms" et cliquez sur "OK".

Cliquez sur "Barre d'outils" dans le volet gauche de votre fenêtre et double-cliquez sur "Bouton" pour ajouter un bouton à votre formulaire. Double-cliquez sur "Button1" pour ouvrir le module "Form1.vb", qui est l'endroit où vous allez écrire votre code.

Étape 4

Tapez "Imports System.Data.OleDb" en haut de votre module "Form1.vb". Cliquez à l'intérieur de "Private Sub Button1_Click" pour commencer à écrire votre code Visual Basic.

Étape 5

Écrivez ce qui suit pour déclarer vos connexions et vos variables de commande:

Dim myConnToAccess As OleDbConnection Dim mySQLCommand As OleDbCommand Dim mySQLStrg As String

Étape 6

Tapez ce qui suit pour ouvrir une connexion à votre base de données Access appelée "TestQuest":

myConnToAccess = New OleDbConnection ("Fournisseur = Microsoft.Jet.OLEDB.4.0; Source de données = C: \ QueryTest.mdb;") myConnToAccess.Open ()

Editez la partie du code "Source = C: \ QueryTest.mdb" et écrivez le chemin où vous avez enregistré votre base de données Access.

Étape 7

Ecrivez ce qui suit pour exécuter une requête "Supprimer" dans votre base de données:

mySQLStrg = "DELETE Table1.Field1 FROM Table1 WHERE (((Table1.Field1) = 'John')); mySQLCommand = New OleDbCommand (mySQLStrg, myConnToAccess) mySQLCommand.ExecuteNonQuery ()

Grâce à cette requête, vous supprimerez l'enregistrement dans lequel "Champ1" est égal à "Jean".

Appuyez sur "F5" pour exécuter votre programme et cliquez sur "Button1".