Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > IHM
IHM Ce forum est dédié aux questions relatives à la création de formulaires et d'états, avec ou sans code VBA, et macros.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 25/11/2010, 14h07   #1
Invité de passage
 
Inscription : novembre 2010
Messages : 13
Détails du profil
Informations forums :
Inscription : novembre 2010
Messages : 13
Points : 3
Points : 3
Par défaut Formulaire de sélection d'enregistrements à valider

Bonjour à tous,

Je crée actuellement une base de gestion de commandes d'items. J'ouvre un formulaire en mode continu qui affiche l'ensemble des items à commander (contenus dans la table "Items List"). Chaque item a un statut qui lui est propre.

J'aimerais créer un bouton de sélection au bout de chaque ligne d'enregistrement pour sélectionner un à un les items voulus. Ensuite, le clic sur un bouton de commande viendrait effectuer les deux actions suivantes :
- passage de chaque item en statut "commandé"
- mise à jour du champs "n° de commande" de chacun de ces items avec le numéro de référence de la commande.

Quelle est la meilleure solution ?

Merci d'avance pour tous vos conseils,
Thomas.
Thomas75005 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/11/2010, 18h51   #2
Rédacteur/Modérateur

 
Avatar de loufab
 
Homme Fabrice CONSTANS
Ingénieur développement logiciels
Inscription : avril 2005
Messages : 7 079
Détails du profil
Informations personnelles :
Nom : Homme Fabrice CONSTANS
Localisation : France, Haute Garonne (Midi Pyrénées)

Informations professionnelles :
Activité : Ingénieur développement logiciels

Informations forums :
Inscription : avril 2005
Messages : 7 079
Points : 11 620
Points : 11 620
Bonjour,

Pour créer une sélection de ce type il faut un champ booléen pour déterminer la sélection ou non.

Une fois tout ce petit monde sélectionné, une simple requete update fait l'affaire.

Code :
Update .... Where Status;
ou Status est le nom du champ booléen. Note qu'il est inutile de mettre =true c'est implicite.

Sans booléen il faut travailler à la ligne. Chaque action (clic sur le bouton) le N° de commande est rempli ce qui passe le status à Commandé. Dans ce cas un appel au record peut faire l'affaire.

Code :
Me.numCommande = varNumeroCde
Donc 2 solutions comme tu le vois :
- traitement global avec l'obligation d'avoir un booléen.
- traitement ligne à ligne en complétant le N° de commande.

Cordialement,
__________________
Classe MELA(CRUD) Opérateur IN et zone de liste
MsGraph et VBA - 1e Partie 2e partie
Entête d'états-Opérateur LIKE-Evénements formulaires-Cours 2010
Complément :Générateur de msgbox
Visitez mon Blog
Les questions techniques par MP ne sont pas lues et je ne pratique pas l'extispicine
loufab est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 29/11/2010, 09h47   #3
Invité de passage
 
Inscription : novembre 2010
Messages : 13
Détails du profil
Informations forums :
Inscription : novembre 2010
Messages : 13
Points : 3
Points : 3
Par défaut pb recordset

Bonjour,

Merci beaucoup pour les deux pistes que tu me proposes. Malheureusement, la première ne peut pas fonctionner compte-tenu que mon formulaire est issu d'une requête multi-table, impossible donc de sélectionner/désélectionner l'enregistrement voulu... il me semble qu'il n'y a pas de solution à ce pb, n'est-ce pas ?

Je vais donc opter pour la deuxième solution. Cela dit, j'avais pensé utilisé aussi un bouton à bascule, mais lorsqu'on l'appuie, il est appuyé pour tous les enregistrements (de même pour une case à cocher indépendante)...

Frédéric
Thomas75005 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 29/11/2010, 10h23   #4
Rédacteur

 
Avatar de ClaudeLELOUP
 
Homme Claude LELOUP
Chercheur de loisirs (ayant trouvé !)
Inscription : novembre 2006
Messages : 5 237
Détails du profil
Informations personnelles :
Nom : Homme Claude LELOUP
Âge : 66
Localisation : Belgique

Informations professionnelles :
Activité : Chercheur de loisirs (ayant trouvé !)
Secteur : Finance

Informations forums :
Inscription : novembre 2006
Messages : 5 237
Points : 11 023
Points : 11 023
Bonjour,

Citation:
Malheureusement, la première ne peut pas fonctionner compte-tenu que mon formulaire est issu d'une requête multi-table

Avec des In(select...), il y a peut-être moyen de transformer ta requête.
Peux-tu poster le sql de ta requête?
ClaudeLELOUP est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 29/11/2010, 10h51   #5
Invité de passage
 
Inscription : novembre 2010
Messages : 13
Détails du profil
Informations forums :
Inscription : novembre 2010
Messages : 13
Points : 3
Points : 3
Le voici, merci d'avance pour tes commentaires.

Code :
1
2
3
SELECT Kit_lists.booleen_validation_rdp, Kit_lists.criticite_ENG, Kit_lists.statut_item, Kit_lists.module, Kit_lists.ATA_ssATA, Kit_lists_AP.pn_AP, Kit_lists_AP.designation_pn_ap, Kit_lists_AP.PT_retenu_ap, Kit_lists_AP.devise_ap, Kit_lists_AP.delai_retenu_ap, Kit_lists.matricule, Kit_lists.OSM, Referentiel_PN.Part_Number, Referentiel_PN.designation_pn, Kit_lists.quantite_par_avion_ENG, Kit_lists.unite_ENG, Cotations_HA.fournisseur_HA, Cotations_HA.prix_total_HA, Cotations_HA.devise_HA, Cotations_HA.delai_HA
 
FROM ((Kit_lists LEFT JOIN Referentiel_PN ON Kit_lists.code_pn_ENG = Referentiel_PN.Ref) LEFT JOIN Cotations_HA ON Kit_lists.ref_cotation_HA = Cotations_HA.ref_cotation) LEFT JOIN Kit_lists_AP ON Kit_lists.ref_item_AP = Kit_lists_AP.pn_AP;
Thomas75005 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 29/11/2010, 11h09   #6
Rédacteur

 
Avatar de ClaudeLELOUP
 
Homme Claude LELOUP
Chercheur de loisirs (ayant trouvé !)
Inscription : novembre 2006
Messages : 5 237
Détails du profil
Informations personnelles :
Nom : Homme Claude LELOUP
Âge : 66
Localisation : Belgique

Informations professionnelles :
Activité : Chercheur de loisirs (ayant trouvé !)
Secteur : Finance

Informations forums :
Inscription : novembre 2006
Messages : 5 237
Points : 11 023
Points : 11 023
Utilise les balises, à l'avenir.

Code sql :
1
2
3
SELECT Kit_lists.booleen_validation_rdp, Kit_lists.criticite_ENG, Kit_lists.statut_item, Kit_lists.module, Kit_lists.ATA_ssATA, Kit_lists_AP.pn_AP, Kit_lists_AP.designation_pn_ap, Kit_lists_AP.PT_retenu_ap, Kit_lists_AP.devise_ap, Kit_lists_AP.delai_retenu_ap, Kit_lists.matricule, Kit_lists.OSM, Referentiel_PN.Part_Number, Referentiel_PN.designation_pn, Kit_lists.quantite_par_avion_ENG, Kit_lists.unite_ENG, Cotations_HA.fournisseur_HA, Cotations_HA.prix_total_HA, Cotations_HA.devise_HA, Cotations_HA.delai_HA
 
FROM ((Kit_lists LEFT JOIN Referentiel_PN ON Kit_lists.code_pn_ENG = Referentiel_PN.Ref) LEFT JOIN Cotations_HA ON Kit_lists.ref_cotation_HA = Cotations_HA.ref_cotation) LEFT JOIN Kit_lists_AP ON Kit_lists.ref_item_AP = Kit_lists_AP.pn_AP;

Même avec les balises, ce n'est pas évident à lire.

Peux-tu poster une BDD réduite, compatible Access2000 avec un extrait des tables en jeu ?
ClaudeLELOUP est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 18h39.


 
 
 
 
Partenaires

Hébergement Web