TP
Pour créer une application complète avec Microsoft Access et Visual Studio en
utilisant Visual Basic .NET, je vais vous détailler un projet de gestion avec 3
tables (Clients, Commandes, et Produits). Je vais également vous guider sur le
développement des boutons pour ajouter, modifier, et supprimer des
enregistrements, ainsi que sur la gestion de la base de données à travers ces
tables.
1. Création de la Base de Données Access
Nous allons créer une base de données Access avec trois tables : Clients,
Commandes, et Produits. Voici comment les définir dans Access :
1.1 Table Clients
ClientID (Clé primaire, type Autonuméro)
Nom (type Texte)
Prenom (type Texte)
Email (type Texte)
1.2 Table Produits
ProduitID (Clé primaire, type Autonuméro)
NomProduit (type Texte)
Prix (type Monétaire)
1.3 Table Commandes
CommandeID (Clé primaire, type Autonuméro)
ClientID (clé étrangère liée à [Link])
ProduitID (clé étrangère liée à [Link])
DateCommande (type Date/Heure)
Quantité (type Entier)
Assurez-vous de créer des relations entre les tables :
Reliez [Link] à [Link].
Reliez [Link] à [Link].
2. Création du Projet Visual Studio ([Link])
Ouvrez Visual Studio et suivez les étapes pour créer une nouvelle application
Windows Forms en Visual Basic :
2.1 Configuration du Projet
Allez dans Fichier -> Nouveau projet -> Application Windows Forms
(.NET Framework).
Choisissez Visual Basic comme langage.
2.2 Ajouter la Référence à [Link]
Dans le Gestionnaire de références, ajoutez la bibliothèque
[Link] pour pouvoir interagir avec la base de données
Access.
2.3 Ajouter les Contrôles au Formulaire
Sur le formulaire principal de l'application, vous allez ajouter plusieurs contrôles
pour gérer les clients, les produits et les commandes. Voici les contrôles à
ajouter :
TextBox pour saisir les informations sur les clients (Nom, Prenom, Email).
ComboBox pour sélectionner les produits et les clients (liens avec les
tables).
DataGridView pour afficher les données des clients, produits et
commandes.
Button pour les actions : Ajouter, Modifier, Supprimer.
3. Écriture du Code
Nous allons créer les boutons pour ajouter, modifier, supprimer des
enregistrements et gérer les interactions avec la base de données.
3.1 Connexion à la Base de Données
Tout d'abord, créez une fonction pour connecter l'application à la base de
données Access.
vb
CopierModifier
Imports [Link]
Public Class Form1
' Définir la connexion à la base de données Access
Dim conn As New
OleDbConnection("Provider=[Link].12.0;Data Source=C:\
chemin\vers\votre\base\de\[Link]")
' Ouverture de la connexion à la base de données
Private Sub OpenConnection()
Try
If [Link] = [Link] Then
[Link]()
End If
Catch ex As Exception
[Link]("Erreur de connexion : " & [Link])
End Try
End Sub
End Class
3.2 Ajouter un Client
Créez un bouton pour ajouter un client à la table Clients.
vb
CopierModifier
Private Sub btnAjouterClient_Click(sender As Object, e As EventArgs) Handles
[Link]
OpenConnection()
Dim cmd As New OleDbCommand("INSERT INTO Clients (Nom, Prenom,
Email) VALUES (?, ?, ?)", conn)
[Link]("?", [Link])
[Link]("?", [Link])
[Link]("?", [Link])
Try
[Link]()
[Link]("Client ajouté avec succès.")
LoadClients() ' Actualiser l'affichage
Catch ex As Exception
[Link]("Erreur : " & [Link])
End Try
End Sub
3.3 Modifier un Client
Créez un bouton pour modifier un client existant.
vb
CopierModifier
Private Sub btnModifierClient_Click(sender As Object, e As EventArgs) Handles
[Link]
OpenConnection()
Dim cmd As New OleDbCommand("UPDATE Clients SET Nom = ?, Prenom = ?,
Email = ? WHERE ClientID = ?", conn)
[Link]("?", [Link])
[Link]("?", [Link])
[Link]("?", [Link])
[Link]("?", [Link]) ' Assurez-vous que
ClientID est sélectionné
Try
[Link]()
[Link]("Client modifié avec succès.")
LoadClients() ' Actualiser l'affichage
Catch ex As Exception
[Link]("Erreur : " & [Link])
End Try
End Sub
3.4 Supprimer un Client
Créez un bouton pour supprimer un client de la table Clients.
vb
CopierModifier
Private Sub btnSupprimerClient_Click(sender As Object, e As EventArgs)
Handles [Link]
OpenConnection()
Dim cmd As New OleDbCommand("DELETE FROM Clients WHERE ClientID
= ?", conn)
[Link]("?", [Link]) ' Assurez-vous que
ClientID est sélectionné
Try
[Link]()
[Link]("Client supprimé avec succès.")
LoadClients() ' Actualiser l'affichage
Catch ex As Exception
[Link]("Erreur : " & [Link])
End Try
End Sub
3.5 Charger les Clients dans un DataGridView
Créez une fonction pour charger les clients dans un DataGridView.
vb
CopierModifier
Private Sub LoadClients()
OpenConnection()
Dim da As New OleDbDataAdapter("SELECT * FROM Clients", conn)
Dim dt As New DataTable()
[Link](dt)
[Link] = dt
End Sub
3.6 Gestion des Produits et Commandes
De la même manière, vous pouvez ajouter des boutons pour gérer les produits
et les commandes.
Ajouter un produit : Ajoutez un bouton pour insérer un produit dans la
table Produits.
Ajouter une commande : Ajoutez un bouton pour insérer une
commande dans la table Commandes.
Voici un exemple pour ajouter une commande :
vb
CopierModifier
Private Sub btnAjouterCommande_Click(sender As Object, e As EventArgs)
Handles [Link]
OpenConnection()
Dim cmd As New OleDbCommand("INSERT INTO Commandes (ClientID,
ProduitID, DateCommande, Quantité) VALUES (?, ?, ?, ?)", conn)
[Link]("?", [Link]) ' Client
sélectionné
[Link]("?", [Link]) ' Produit
sélectionné
[Link]("?", [Link])
[Link]("?", [Link])
Try
[Link]()
[Link]("Commande ajoutée avec succès.")
LoadCommandes() ' Actualiser l'affichage
Catch ex As Exception
[Link]("Erreur : " & [Link])
End Try
End Sub
4. Création de l'Exécutable (.exe)
1. Construire le projet : Allez dans Build -> Build Solution.
2. Vous pouvez trouver le fichier .exe dans le dossier bin\Debug de votre
projet.
3. Distribution : Vous pouvez distribuer ce fichier exécutable ou créer un
programme d'installation.
Conclusion
Vous avez maintenant une application de gestion des Clients, Produits, et
Commandes en utilisant Microsoft Access et Visual Studio avec [Link]. Le
code couvre les opérations principales de gestion (ajouter, modifier, supprimer)
et l'affichage des données dans des contrôles DataGridView. Vous pouvez
ajuster l'interface utilisateur et ajouter des fonctionnalités supplémentaires en
fonction des besoins.
