bonjour,
effectivement, j'ai créé un fichier de droits en modification et suppression
par fichier.
J'ai déclaré un trigger avant qui détecte si le user peut ou non effectuer
l'opération.
je constate que, effectivement, même avec le RAD, c'est un peu bordélique :(
je modifie le champ d'un enregistrement
je clique sur Appliquer : le prog fait un écranversfichier : pas de problème
le prog fait un hmodifie : le trigger remplit son office, et refuse le
hmodifie
la fenêtre conserve la modif. :((
j'ai essayé dans le trigger de mettre la variable ErreurDétectée à vrai, ça
ne marche pas.
j'ai dons ajouté une globale au projet nommée interdit.(booléen)
dans mon trigger, je met la variable H.Afaire = "A", ET interdit à vrai
et je modifie le code de modif de la façon suivante :
// Modification de l'enregistrement
HModifie(CLIENTS)
SI ErreurDétectée OU interdit ALORS
Info("Impossible de modifier l'enregistrement"+RC+HErreurInfo())
// je relis l'enregistrement en cours et je le réaffiche :))
HLit(CLIENTS,gNumEnr)
RADEfface()
RADAffiche()
MaFenêtre..Modifié=Faux
SI ChampExiste("GP_APPLIQUER") ALORS GP_APPLIQUER..Etat = Grisé
RETOUR
FIN
voila
@+
--
Jacques TREPP
LCM
9 rue jean Mermoz
81160 ST JUERY
Jacques.trepp@wanadoo.fr
http://www.lcm81.com
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.518 / Virus Database: 316 - Release Date: 11/09/2003
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Fabrice Burghgraeve
bonjour.
"jacques trepp" a écrit dans le message de news:bkcj0l$qah$ (...)
// Modification de l'enregistrement HModifie(CLIENTS) SI ErreurDétectée OU interdit ALORS Info("Impossible de modifier l'enregistrement"+RC+HErreurInfo()) // je relis l'enregistrement en cours et je le réaffiche :)) HLit(CLIENTS,gNumEnr) RADEfface() RADAffiche() MaFenêtre..Modifiéúux SI ChampExiste("GP_APPLIQUER") ALORS GP_APPLIQUER..Etat = Grisé RETOUR FIN
(...)
ca fait quoi si : 2 utilisateurs (qui ont le droit) appelent le meme CLIENT chacun sur son poste. le premier utilisateur supprime le client (pour peu que ce soit possible dans votre appli) le deuxieme utilisateur, sur son poste, le modifie, puis veut enregistrer ses modifs ?
(Je pense que ca va pas donner grand chose de bon... he he he... c'est a tester)
-- Fabrice Burghgraeve Computer & Services
(enlevez le _pas_de_spam_ pour me répondre en privé)
bonjour.
"jacques trepp" <jacques.trepp@wanadoo.fr> a écrit dans le message de
news:bkcj0l$qah$1@news-reader2.wanadoo.fr...
(...)
// Modification de l'enregistrement
HModifie(CLIENTS)
SI ErreurDétectée OU interdit ALORS
Info("Impossible de modifier l'enregistrement"+RC+HErreurInfo())
// je relis l'enregistrement en cours et je le réaffiche :))
HLit(CLIENTS,gNumEnr)
RADEfface()
RADAffiche()
MaFenêtre..Modifiéúux
SI ChampExiste("GP_APPLIQUER") ALORS GP_APPLIQUER..Etat = Grisé
RETOUR
FIN
(...)
ca fait quoi si :
2 utilisateurs (qui ont le droit) appelent le meme CLIENT chacun sur son
poste.
le premier utilisateur supprime le client (pour peu que ce soit possible
dans votre appli)
le deuxieme utilisateur, sur son poste, le modifie, puis veut enregistrer
ses modifs ?
(Je pense que ca va pas donner grand chose de bon... he he he... c'est a
tester)
--
Fabrice Burghgraeve
Computer & Services
f_pas_de_spam_burghgraeve@computeretservices.com
(enlevez le _pas_de_spam_ pour me répondre en privé)
"jacques trepp" a écrit dans le message de news:bkcj0l$qah$ (...)
// Modification de l'enregistrement HModifie(CLIENTS) SI ErreurDétectée OU interdit ALORS Info("Impossible de modifier l'enregistrement"+RC+HErreurInfo()) // je relis l'enregistrement en cours et je le réaffiche :)) HLit(CLIENTS,gNumEnr) RADEfface() RADAffiche() MaFenêtre..Modifiéúux SI ChampExiste("GP_APPLIQUER") ALORS GP_APPLIQUER..Etat = Grisé RETOUR FIN
(...)
ca fait quoi si : 2 utilisateurs (qui ont le droit) appelent le meme CLIENT chacun sur son poste. le premier utilisateur supprime le client (pour peu que ce soit possible dans votre appli) le deuxieme utilisateur, sur son poste, le modifie, puis veut enregistrer ses modifs ?
(Je pense que ca va pas donner grand chose de bon... he he he... c'est a tester)
-- Fabrice Burghgraeve Computer & Services
(enlevez le _pas_de_spam_ pour me répondre en privé)
farplus
Bonjour, ça à l'air d'être une bonne solution, tu peux essayer d'accelerer le processus en mettant ton ecranversfichier dans ton triggeravant après le test des droits si positif, cela t'évitera la relecture.
A+
Bonjour,
ça à l'air d'être une bonne solution, tu peux essayer d'accelerer le
processus en mettant ton ecranversfichier
dans ton triggeravant après le test des droits si positif, cela t'évitera la
relecture.
Bonjour, ça à l'air d'être une bonne solution, tu peux essayer d'accelerer le processus en mettant ton ecranversfichier dans ton triggeravant après le test des droits si positif, cela t'évitera la relecture.
A+
Eric Déclais
> ca fait quoi si : 2 utilisateurs (qui ont le droit) appelent le meme CLIENT chacun sur
son
poste. le premier utilisateur supprime le client (pour peu que ce soit
possible
dans votre appli) le deuxieme utilisateur, sur son poste, le modifie, puis veut
enregistrer
ses modifs ?
(Je pense que ca va pas donner grand chose de bon... he he he... c'est
a
tester)
On peut lui faire confiance pour avoir bloqué le 2e utilisateur en amont (lors du clic sur un bouton "modifier").
> ca fait quoi si :
2 utilisateurs (qui ont le droit) appelent le meme CLIENT chacun sur
son
poste.
le premier utilisateur supprime le client (pour peu que ce soit
possible
dans votre appli)
le deuxieme utilisateur, sur son poste, le modifie, puis veut
enregistrer
ses modifs ?
(Je pense que ca va pas donner grand chose de bon... he he he... c'est
a
tester)
On peut lui faire confiance pour avoir bloqué le 2e utilisateur en amont
(lors du clic sur un bouton "modifier").
> ca fait quoi si : 2 utilisateurs (qui ont le droit) appelent le meme CLIENT chacun sur
son
poste. le premier utilisateur supprime le client (pour peu que ce soit
possible
dans votre appli) le deuxieme utilisateur, sur son poste, le modifie, puis veut
enregistrer
ses modifs ?
(Je pense que ca va pas donner grand chose de bon... he he he... c'est
a
tester)
On peut lui faire confiance pour avoir bloqué le 2e utilisateur en amont (lors du clic sur un bouton "modifier").
jacques trepp
Fabrice Burghgraeve wrote:
bonjour.
"jacques trepp" a écrit dans le message de news:bkcj0l$qah$ (...)
// Modification de l'enregistrement HModifie(CLIENTS) SI ErreurDétectée OU interdit ALORS Info("Impossible de modifier l'enregistrement"+RC+HErreurInfo()) // je relis l'enregistrement en cours et je le réaffiche :)) HLit(CLIENTS,gNumEnr) RADEfface() RADAffiche() MaFenêtre..Modifiéúux SI ChampExiste("GP_APPLIQUER") ALORS GP_APPLIQUER..Etat = Grisé RETOUR FIN
(...)
ca fait quoi si : 2 utilisateurs (qui ont le droit) appelent le meme CLIENT chacun sur son poste. le premier utilisateur supprime le client (pour peu que ce soit possible dans votre appli) le deuxieme utilisateur, sur son poste, le modifie, puis veut enregistrer ses modifs ?
(Je pense que ca va pas donner grand chose de bon... he he he... c'est a tester)
salut, ça n'est pas mon code, mais celui de windev (rad sur le bouton Appliquer) le code original est :
// Modification de l'enregistrement HModifie(CLIENTS) SI ErreurDétectée ALORS Info("Impossible de modifier l'enregistrement"+RC+HErreurInfo()) RETOUR FIN
La solution de farplus (voir plus bas) est encore mieux, puisqu'elle évite la relecture. on ajoute le écranversfichier dans le trigger, pour l'exécuter uniquement si on a les droits, et on supprime l'appel à la procédure RADEnregistre() Encore une fois, tout ça, c'est du RAD. Pourquoi ? Parce que je voulais voir comment windev gérait ses triggers avant : J'ai vu ;))
A+ -- Jacques TREPP LCM 9 rue jean Mermoz 81160 ST JUERY
http://www.lcm81.com
--- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.518 / Virus Database: 316 - Release Date: 11/09/2003
Fabrice Burghgraeve wrote:
bonjour.
"jacques trepp" <jacques.trepp@wanadoo.fr> a écrit dans le message de
news:bkcj0l$qah$1@news-reader2.wanadoo.fr...
(...)
// Modification de l'enregistrement
HModifie(CLIENTS)
SI ErreurDétectée OU interdit ALORS
Info("Impossible de modifier l'enregistrement"+RC+HErreurInfo())
// je relis l'enregistrement en cours et je le réaffiche :))
HLit(CLIENTS,gNumEnr)
RADEfface()
RADAffiche()
MaFenêtre..Modifiéúux
SI ChampExiste("GP_APPLIQUER") ALORS GP_APPLIQUER..Etat = Grisé
RETOUR
FIN
(...)
ca fait quoi si :
2 utilisateurs (qui ont le droit) appelent le meme CLIENT chacun sur
son poste.
le premier utilisateur supprime le client (pour peu que ce soit
possible dans votre appli)
le deuxieme utilisateur, sur son poste, le modifie, puis veut
enregistrer ses modifs ?
(Je pense que ca va pas donner grand chose de bon... he he he...
c'est a tester)
salut,
ça n'est pas mon code, mais celui de windev (rad sur le bouton Appliquer) le
code original est :
// Modification de l'enregistrement
HModifie(CLIENTS)
SI ErreurDétectée ALORS
Info("Impossible de modifier l'enregistrement"+RC+HErreurInfo())
RETOUR
FIN
La solution de farplus (voir plus bas) est encore mieux, puisqu'elle évite
la relecture. on ajoute le écranversfichier dans le trigger, pour l'exécuter
uniquement si on a les droits, et on supprime l'appel à la procédure
RADEnregistre()
Encore une fois, tout ça, c'est du RAD. Pourquoi ? Parce que je voulais voir
comment windev gérait ses triggers avant : J'ai vu ;))
A+
--
Jacques TREPP
LCM
9 rue jean Mermoz
81160 ST JUERY
Jacques.trepp@wanadoo.fr
http://www.lcm81.com
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.518 / Virus Database: 316 - Release Date: 11/09/2003
"jacques trepp" a écrit dans le message de news:bkcj0l$qah$ (...)
// Modification de l'enregistrement HModifie(CLIENTS) SI ErreurDétectée OU interdit ALORS Info("Impossible de modifier l'enregistrement"+RC+HErreurInfo()) // je relis l'enregistrement en cours et je le réaffiche :)) HLit(CLIENTS,gNumEnr) RADEfface() RADAffiche() MaFenêtre..Modifiéúux SI ChampExiste("GP_APPLIQUER") ALORS GP_APPLIQUER..Etat = Grisé RETOUR FIN
(...)
ca fait quoi si : 2 utilisateurs (qui ont le droit) appelent le meme CLIENT chacun sur son poste. le premier utilisateur supprime le client (pour peu que ce soit possible dans votre appli) le deuxieme utilisateur, sur son poste, le modifie, puis veut enregistrer ses modifs ?
(Je pense que ca va pas donner grand chose de bon... he he he... c'est a tester)
salut, ça n'est pas mon code, mais celui de windev (rad sur le bouton Appliquer) le code original est :
// Modification de l'enregistrement HModifie(CLIENTS) SI ErreurDétectée ALORS Info("Impossible de modifier l'enregistrement"+RC+HErreurInfo()) RETOUR FIN
La solution de farplus (voir plus bas) est encore mieux, puisqu'elle évite la relecture. on ajoute le écranversfichier dans le trigger, pour l'exécuter uniquement si on a les droits, et on supprime l'appel à la procédure RADEnregistre() Encore une fois, tout ça, c'est du RAD. Pourquoi ? Parce que je voulais voir comment windev gérait ses triggers avant : J'ai vu ;))
A+ -- Jacques TREPP LCM 9 rue jean Mermoz 81160 ST JUERY
http://www.lcm81.com
--- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.518 / Virus Database: 316 - Release Date: 11/09/2003
jacques trepp
farplus wrote:
Bonjour, ça à l'air d'être une bonne solution, tu peux essayer d'accelerer le processus en mettant ton ecranversfichier dans ton triggeravant après le test des droits si positif, cela t'évitera la relecture.
A+
excellent ! bonne journée
-- Jacques TREPP LCM 9 rue jean Mermoz 81160 ST JUERY
http://www.lcm81.com
--- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.518 / Virus Database: 316 - Release Date: 11/09/2003
farplus wrote:
Bonjour,
ça à l'air d'être une bonne solution, tu peux essayer d'accelerer le
processus en mettant ton ecranversfichier
dans ton triggeravant après le test des droits si positif, cela
t'évitera la relecture.
A+
excellent !
bonne journée
--
Jacques TREPP
LCM
9 rue jean Mermoz
81160 ST JUERY
Jacques.trepp@wanadoo.fr
http://www.lcm81.com
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.518 / Virus Database: 316 - Release Date: 11/09/2003
Bonjour, ça à l'air d'être une bonne solution, tu peux essayer d'accelerer le processus en mettant ton ecranversfichier dans ton triggeravant après le test des droits si positif, cela t'évitera la relecture.
A+
excellent ! bonne journée
-- Jacques TREPP LCM 9 rue jean Mermoz 81160 ST JUERY
http://www.lcm81.com
--- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.518 / Virus Database: 316 - Release Date: 11/09/2003
farplus
Bonjour Jacques, bonjour à tous,
Encore une fois, tout ça, c'est du RAD. Pourquoi ? >Parce que je voulais
voir
comment windev gérait ses triggers avant : J'ai vu ;))
Le RAD en principe ce n'est pas si mauvais que ça dans sa réalisation, quelque part on peux même féliciter PCSoft: les bugs y sont rares (mais hélas jamais ou très peu corrigés), en comparaison par ex. des exemples fournis (qui en regorgitent). Ce qu'il faudrait également ce serait 2 ou 3 outils: 1) pouvoir personnaliser les routines, les appels et les liaisons ou mieux 2) avoir un utilitaire qui, sur la base d'un simple fichier (soit à balise soit de type ini) puisse construire entièrement une fenêtre (et inversement).
Cette possibilité ouvrirait les portes, avec le concours de tout le monde, à un vrai AGL performant.
A+
Bonjour Jacques, bonjour à tous,
Encore une fois, tout ça, c'est du RAD. Pourquoi ? >Parce que je voulais
voir
comment windev gérait ses triggers avant : J'ai vu ;))
Le RAD en principe ce n'est pas si mauvais que ça dans sa réalisation,
quelque part on peux même féliciter PCSoft: les bugs y sont rares (mais
hélas jamais ou très peu corrigés), en comparaison par ex. des exemples
fournis (qui en regorgitent).
Ce qu'il faudrait également ce serait 2 ou 3 outils:
1) pouvoir personnaliser les routines, les appels et les liaisons
ou mieux
2) avoir un utilitaire qui, sur la base d'un simple fichier (soit à balise
soit de type ini) puisse construire entièrement une fenêtre (et
inversement).
Cette possibilité ouvrirait les portes, avec le concours de tout le monde, à
un vrai AGL performant.
Encore une fois, tout ça, c'est du RAD. Pourquoi ? >Parce que je voulais
voir
comment windev gérait ses triggers avant : J'ai vu ;))
Le RAD en principe ce n'est pas si mauvais que ça dans sa réalisation, quelque part on peux même féliciter PCSoft: les bugs y sont rares (mais hélas jamais ou très peu corrigés), en comparaison par ex. des exemples fournis (qui en regorgitent). Ce qu'il faudrait également ce serait 2 ou 3 outils: 1) pouvoir personnaliser les routines, les appels et les liaisons ou mieux 2) avoir un utilitaire qui, sur la base d'un simple fichier (soit à balise soit de type ini) puisse construire entièrement une fenêtre (et inversement).
Cette possibilité ouvrirait les portes, avec le concours de tout le monde, à un vrai AGL performant.
A+
jacques trepp
farplus wrote:
Bonjour Jacques, bonjour à tous,
Encore une fois, tout ça, c'est du RAD. Pourquoi ? >Parce que je voulais voir comment windev gérait ses triggers avant : J'ai vu ;))
Le RAD en principe ce n'est pas si mauvais que ça dans sa réalisation, quelque part on peux même féliciter PCSoft: les bugs y sont rares (mais hélas jamais ou très peu corrigés), en comparaison par ex. des exemples fournis (qui en regorgitent).
En fait, la fenètre que j'ai générée est le modèle fiche avec parcours, qui, à mon avis, est utilisable en monoposte uniquement. Je m'explique : le systus te laisse modifier tous les champs que tu veux, en marquant seulement fenetre..modifiee = vrai lorsque tu cliques sur appliquer (le bouton modification est absent), il essaie un HModifie. si ça foire (pas de droits ou fiche bloquée par un autre poste), tu as perdu toutes tes modifs. Un genre de RollBack, en quelque sorte ;) mais pas bien. Il vaut mieux utiliser des tables et un bouton Modif qui bloque le record : on sait tout de suite si quelqu'un est dessus, et on ne perd pas de temps à coder des modifs qu'on risque de perdre.
Voici le code du trigger : PROCEDURE VerifDroitUtilisateur() SELON H.FonctionTrigger CAS "HModifie" : SI Position(bModifInterdite,H.nomfichier)>0 ALORS H.afaire="A" Erreur("Désolé, vous n'avez pas les droits de modification.") SINON EcranVersFichier() FIN CAS "HSupprime" : SI Position(bSuppInterdite,H.nomfichier)>0 ALORS H.afaire="A" Erreur("Désolé, vous n'avez pas les droits de suppression.") FIN FIN bmodifinterdite et bsuppinterdite sortent du composant login que j'ai modifié pour ajouter dans le fichier des users 2 champs de 400 caractères chacunes (à ce propos, j'ai pas retrouvé les champs mémo texte. Si quelqu'un les a vus, il peut m'expliquer) J'ai ajouté une fenètre qui fait un HListeFichiers dans une table, dans laquelle on coche si on veut interdire la modif ou la suppression. La validation construit 2 chaines contenant les noms de fichiers cochés séparés par une virgule) Par contre, il faut ajouter un RADAffiche() dans le code de modif (sans relecture) pour voir les modifs effacées.
un bon week-end à tous -- Jacques TREPP LCM 9 rue jean Mermoz 81160 ST JUERY
http://www.lcm81.com
--- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.520 / Virus Database: 318 - Release Date: 18/09/2003
farplus wrote:
Bonjour Jacques, bonjour à tous,
Encore une fois, tout ça, c'est du RAD. Pourquoi ? >Parce que je
voulais voir comment windev gérait ses triggers avant : J'ai vu ;))
Le RAD en principe ce n'est pas si mauvais que ça dans sa réalisation,
quelque part on peux même féliciter PCSoft: les bugs y sont rares
(mais hélas jamais ou très peu corrigés), en comparaison par ex. des
exemples fournis (qui en regorgitent).
En fait, la fenètre que j'ai générée est le modèle fiche avec parcours, qui,
à mon avis, est utilisable en monoposte uniquement.
Je m'explique :
le systus te laisse modifier tous les champs que tu veux, en marquant
seulement fenetre..modifiee = vrai
lorsque tu cliques sur appliquer (le bouton modification est absent), il
essaie un HModifie.
si ça foire (pas de droits ou fiche bloquée par un autre poste), tu as perdu
toutes tes modifs.
Un genre de RollBack, en quelque sorte ;) mais pas bien.
Il vaut mieux utiliser des tables et un bouton Modif qui bloque le record :
on sait tout de suite si quelqu'un est dessus, et on ne perd pas de temps à
coder des modifs qu'on risque de perdre.
Voici le code du trigger :
PROCEDURE VerifDroitUtilisateur()
SELON H.FonctionTrigger
CAS "HModifie" :
SI Position(bModifInterdite,H.nomfichier)>0 ALORS
H.afaire="A"
Erreur("Désolé, vous n'avez pas les droits de modification.")
SINON
EcranVersFichier()
FIN
CAS "HSupprime" :
SI Position(bSuppInterdite,H.nomfichier)>0 ALORS
H.afaire="A"
Erreur("Désolé, vous n'avez pas les droits de suppression.")
FIN
FIN
bmodifinterdite et bsuppinterdite sortent du composant login que j'ai
modifié pour ajouter dans le fichier des users 2 champs de 400 caractères
chacunes (à ce propos, j'ai pas retrouvé les champs mémo texte. Si quelqu'un
les a vus, il peut m'expliquer)
J'ai ajouté une fenètre qui fait un HListeFichiers dans une table, dans
laquelle on coche si on veut interdire la modif ou la suppression. La
validation construit 2 chaines contenant les noms de fichiers cochés séparés
par une virgule)
Par contre, il faut ajouter un RADAffiche() dans le code de modif (sans
relecture) pour voir les modifs effacées.
un bon week-end à tous
--
Jacques TREPP
LCM
9 rue jean Mermoz
81160 ST JUERY
Jacques.trepp@wanadoo.fr
http://www.lcm81.com
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.520 / Virus Database: 318 - Release Date: 18/09/2003
Encore une fois, tout ça, c'est du RAD. Pourquoi ? >Parce que je voulais voir comment windev gérait ses triggers avant : J'ai vu ;))
Le RAD en principe ce n'est pas si mauvais que ça dans sa réalisation, quelque part on peux même féliciter PCSoft: les bugs y sont rares (mais hélas jamais ou très peu corrigés), en comparaison par ex. des exemples fournis (qui en regorgitent).
En fait, la fenètre que j'ai générée est le modèle fiche avec parcours, qui, à mon avis, est utilisable en monoposte uniquement. Je m'explique : le systus te laisse modifier tous les champs que tu veux, en marquant seulement fenetre..modifiee = vrai lorsque tu cliques sur appliquer (le bouton modification est absent), il essaie un HModifie. si ça foire (pas de droits ou fiche bloquée par un autre poste), tu as perdu toutes tes modifs. Un genre de RollBack, en quelque sorte ;) mais pas bien. Il vaut mieux utiliser des tables et un bouton Modif qui bloque le record : on sait tout de suite si quelqu'un est dessus, et on ne perd pas de temps à coder des modifs qu'on risque de perdre.
Voici le code du trigger : PROCEDURE VerifDroitUtilisateur() SELON H.FonctionTrigger CAS "HModifie" : SI Position(bModifInterdite,H.nomfichier)>0 ALORS H.afaire="A" Erreur("Désolé, vous n'avez pas les droits de modification.") SINON EcranVersFichier() FIN CAS "HSupprime" : SI Position(bSuppInterdite,H.nomfichier)>0 ALORS H.afaire="A" Erreur("Désolé, vous n'avez pas les droits de suppression.") FIN FIN bmodifinterdite et bsuppinterdite sortent du composant login que j'ai modifié pour ajouter dans le fichier des users 2 champs de 400 caractères chacunes (à ce propos, j'ai pas retrouvé les champs mémo texte. Si quelqu'un les a vus, il peut m'expliquer) J'ai ajouté une fenètre qui fait un HListeFichiers dans une table, dans laquelle on coche si on veut interdire la modif ou la suppression. La validation construit 2 chaines contenant les noms de fichiers cochés séparés par une virgule) Par contre, il faut ajouter un RADAffiche() dans le code de modif (sans relecture) pour voir les modifs effacées.
un bon week-end à tous -- Jacques TREPP LCM 9 rue jean Mermoz 81160 ST JUERY
http://www.lcm81.com
--- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.520 / Virus Database: 318 - Release Date: 18/09/2003