Page 1 sur 1

PB script simple

MessagePublié: 12 Mars 2003 à 19:12
par D.Faucon
Je voudrais interdire de modifier un document lorsque le champ BT5="1"J'ai donc mis le script suivant dans Querymodechange mais ça ne marche pas. Pourriez m'aider en corrigeant/complétant ce script ?MerciDFSub Querymodechange(Source As Notesuidocument, Continue As Variant) If Not ( source.EditMode ) And BT5="1" Then Messagebox("Cette fiche est validée, elle ne peut pas être modifiée.") continue = False End IfEnd Sub

Re: PB script simple

MessagePublié: 13 Mars 2003 à 10:37
par philippe
Bonjouressaye Sub Querymodechange(Source As Notesuidocument, Continue As Variant)If source.FiedGettext("BT5") = "1" thenMessagebox("Cette fiche est validée, elle ne peut pas être modifiée.")continue = FalseEnd IfEnd Sub le test du source.editMode me semble superflu car normalement ton document est en mode lecture

Re: PB script simple

MessagePublié: 13 Mars 2003 à 10:38
par philippe
Faute de frappeil faut lire If source.FieldGettext("BT5") = "1" thenetc...

Re: PB script simple

MessagePublié: 13 Mars 2003 à 13:05
par D.Faucon
c'est OK merci beaucoup