PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

|
|
|
FR
Accueil → WINDEV 2024 → Modification d'un interrupteur
Modification d'un interrupteur
Débuté par robert.delaunois, 02 mar. 2006 19:08 - 2 réponses
#1
Posté le 02 mars 2006 - 19:08
Bonsoir,

J'ai créé une table requête liée à un fichier "Membres"incluant un interrupteur permettant de sélectionner ou non un membre.
Question:
Comment enregistrer la modification au départ de cette table et envoyer les membres "cochés" dans un fichier connexe appelé "Privilégiés"

Merci d'avance,

Françoise
#2
Posté le 02 mars 2006 - 22:34
Je vois ceci...

i est un entier
Pour i=1 a tableoccurence(Table_membres)
tableselectplus(Membres,<clé ???>,i)
si Membres.<coché> = 1 alors
Privilégiés.Nom=Table_membres.Nom
...
...
HModifie(Privilégiés)
sinon
Privilégiés.Nom=Table_membres.Nom
...
...
Hajoute(Privilégiés)
Fin
Fin

Bon dev, Samifred.
#3
Posté le 02 mars 2006 - 22:34
Pardon, un peu rapide dans ma première réponse.
Voici le bon code:

I est un entier
Pour i = 1 A tableoccurence(Table_Membres)
Tableselectplus(Table_Membres,i)
Si Table_Membres.<Rubrique_cochée> = 1 Alors
hlitrecherchepremier(Privilégiés,<ta clé>,<Rubrique_recherchée>)
si Htrouve() Alors
Privilégiés.<Rubrique> = Table_Membres.<Rubrique>
...
...
...

Hmodifie(Privilégiés)

sinon

Privilégiés.<Rubrique> = Table_Membres.<Rubrique>
...
...
...

Hajoute(Privilégiés)
Fin
Fin
Fin


Bien entendu. il faut compléter le code (Intégrité, erreur, etc..)
Bon dev, Samifred. (CH)
→ Revenir à WINDEV 2024