Bonjour,
pour ajouter les article comme vous désirez le faire il faut proceder de la facon suivante:
vous devez disposer d'une table ici nommé '
Table'
puis d'au moins 3 colonnes nommés par exemple comme ceci
- Colonne Article : colArticle
- Colonne Quantité : colQte
- Colonne Total : colTotalensuite il vous faux au moins 2 champs de saisie :
- txtArticle : Chaine de caractères
- txtTotal : NumériquePuis enfin un bouton qui va permettre d'ajouter les informations à votre table.
- cmdAjouteLe code va donc se trouver dans le bouton cmdAjoute.
//Clic sur cmdAjoute
//On test pour savoir si les champs ont été renseignés
Si SansEspace(txtArticle) = "" Alors Retour
Si txtTotal = 0 Alors Retour
//On recherche pour savoir si le produit existe dans la table
Indice est un entier
Indice = TableCherche(colArticle,txtArticle,Vrai)
//Vrai permet une recherche à l'indentique
Si Indice <> -1 Alors
//L'article existe dans la table
//On va ajouter quantité et valeur
TableSelectPlus(Table,Indice) //On se positionne sur la ligne
colQte += 1
colTotal += txtTotal
Sinon
//L'article n'existe pas on l'ajoute
TableAjoute(Table,txtArticle + TAB + "1" + TAB + txtTotal)
Fin
//Maintenant on tri la table
//Tri Croissant sur la colonne Article
TableTri(Table,"+colArticle")
Code Saisi à la volée et peut comporter des erreurs.