projet de création de base de donnée SUR ACCESS. OBJET:CREATION D’UNE BASE DE DONNÉE ACCESS POUR LA GESTION D’UNE SUPERETTE.projet de base de donnée.
OBJET:CREATION D’UNE BASE DE DONNÉE ACCESS POUR LA GESTION D’UNE SUPERETTE.Préparé par les étudiants du licence LaCFA:Mahamoud HOUSSEIN TOUKALEMOUHYADINe abdillahi YoussoufALI ABDOULKADER ABDIMAHAD IBRAHIM AhmedANNEE UNIVERSITAIRE 2022-2023La SuperetteGestion des Approvisionnements (Fournisseurs)Gestion des Commandes (clients)Ceux deux axes sont au …afficher plus de contenu…

?- x
ACCUEIL CREER --DONNEES EXTERNES UTILS DE BASE DE DONNEES. crEER Connexion
: © «|| BF Detaircatalooue x . .
Tous les objets Access = Feuille de propriétés x
[Rechercher é Type de sélection: Propriétés du champ

Detail_commandes

Tables a Général Liste de choi
EE catalogue * Description num_det
& cients ~ Format. com_det Légende
EL commandes ref det
EE petail_commandes qute_det
EEL etail temp Catalogue
Requétes & 7
BF ciient-commandes ¥ Code arti
Designation
Fi Detait-catalogue Prix_unitaire_ HT
Formulaires a Quantite

Ea] Entrees_magasin

EB) validation commande
Etats

»

| qute_det ‘Code article Designation Prix_unitaire …afficher plus de contenu…

Hx ter Eton atichoge Inston Débogage Exéiton Qutls Compliments Fenéue 2 -ex
A*e-a a > ou a 1S Fe &1O us con Yl

Projet-facturation-stocks >| | Tyouter fecure am =

Private Sub ajouter_facture Click() |

Dim base As Database: Dim ligne As Recordset
Dim requete As String

Dim total As Integer: Dim total_achat As Integer

Tf (IsNumeric (qte_commandee.Value) And gte_commandee.Value > 0 And ref_produit.Value <> "") Then
If (Int (qte_commandee.Value) <= Int (Qte_stock.Value)) Then total = Int (prix_unitaire.Value) * Int (qte_commandee.Value)
‘cotal_achat = 0
Set base = Application.CurrentDb requete = "INSERT INTO Detail_temp (ref_det, qute_det, Designation, Prix unitaire HT,Prix_total_HT) VALUES (' base.Execute requete

©