Page 1 sur 1

Sous-Masque calcule Via Combobox

MessagePublié: 27 Sep 2010 à 17:56
par 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

MessagePublié: 27 Sep 2010 à 20:02
par Michael DELIQUE
salut

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

MessagePublié: 28 Sep 2010 à 08:52
par 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é

MessagePublié: 28 Sep 2010 à 11:09
par jfarissi
la solution pourra être un Masque Dialogue avec le combobox ?

MessagePublié: 28 Sep 2010 à 11:25
par abertisch
Tu fermes le document et tu le ré-ouvre dans la foulée. :wink:

MessagePublié: 28 Sep 2010 à 11:48
par jfarissi
dans quel evenement ?

MessagePublié: 28 Sep 2010 à 13:04
par 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

MessagePublié: 28 Sep 2010 à 13:12
par 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

MessagePublié: 28 Sep 2010 à 13:14
par jfarissi
externe au document ??

MessagePublié: 28 Sep 2010 à 13:15
par Michael DELIQUE
un agent !

MessagePublié: 28 Sep 2010 à 13:22
par jfarissi
Peux-tu me donne un exemple ?

MessagePublié: 28 Sep 2010 à 15:30
par 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)

MessagePublié: 28 Sep 2010 à 16:21
par jfarissi
Excellent ça marche Merci

MessagePublié: 28 Sep 2010 à 16:23
par Michael DELIQUE
autant pour moi, j'ai pas fait de client lourd depuis un momment