Sous-Masque calcule Via Combobox

[jfarissi]

Bonjour,

Je veux afficher le sous-masque adéquat via la valeur du combo box que je choisie sur mon formulaire principale.
Mon combo box contient 4 valeurs.

Mais le sous masque retourne toujours le vide

Une idée ?

Cordialement

[Michael DELIQUE]

salut

pas possible, le sous masque calculé est sélectionné via la formule à l'affichage du document et et pas au refresh

[mike76]

salut,

essaie de repasser le document en lecture puis en écriture après ton changement de valeur dans la combo pour que le sous-masque soit recalculé

[jfarissi]

la solution pourra être un Masque Dialogue avec le combobox ?

[abertisch]

Tu fermes le document et tu le ré-ouvre dans la foulée.

[jfarissi]

dans quel evenement ?

[jfarissi]

est ce c'est possible avec un bouton ?

Dim s As New NotesSession
Dim db As NotesDatabase
Dim uiwks As New notesuiworkspace
Dim uicurdoc As notesuidocument
Set uicurdoc=uiwks.CurrentDocument
Set db = s.CurrentDatabase
Call uicurdoc.save
Call uicurdoc.Close
db.GetDocumentByUNID(uicurdoc.Document.DocID(0))

DocID = @Text(@DocumentUniqueID)

cordialement

[Michael DELIQUE]

salut

non, parceque au

Call uicurdoc.Close

ton masque ce ferme et tchao fin du code, le traitement doit être externe au document

[jfarissi]

externe au document ??

[Michael DELIQUE]

un agent !

[jfarissi]

Peux-tu me donne un exemple ?

[abertisch]

Oui oui tu peux le faire dans un bouton :

Code : Tout sélectionner

Dim ws As New notesuiworkspace()
dim uidoc as NotesUIDocument
dim doc as notesdocument

set uidoc = ws.currentdocument
set doc = uidoc.document

set uiDoc.save()
uidoc.EditMode=False

'Ton traitement

Call doc.Save(True, False)
Call uidoc.Close(True)
Call ws.EditDocument(True, doc)

[jfarissi]

Excellent ça marche Merci

[Michael DELIQUE]

autant pour moi, j'ai pas fait de client lourd depuis un momment