@Dialogbox-Werte in computed Felder übernehmen

[case]

Hi,

ich habe nun wohl alle Threads mit Dialogbox durch - ohne Lösung  

Gegeben:
 - eine Maske mit 2 berechneten Feldern
 - Durch folgenden Code (der via Button in der Maske aufgerufen wird) wird eine Dialogbox geöffnet:

Code

Sub Click(Source As Button)
   Dim oWorkspace As New NotesUIWorkspace   
   Dim oSession As NotesSession
   Dim dbCurrent As NotesDatabase  
   Dim docHaupt As NotesDocument
   Dim docDialog As NotesDocument
   Dim nDialog As Variant
   
   Set oSession = New NotesSession
   Set dbCurrent = oSession.CurrentDatabase
   Set docHaupt = oWorkspace.CurrentDocument.Document
   Set docDialog = dbCurrent.CreateDocument
   
   nDialog = oWorkspace.Dialogbox("frm_Freigeber",True,True,False,False,False,False,"Ich bin ein Titel",docDialog)
   
   If nDialog Then
      docHaupt.Freigabe = docDialog.Freigabe(0)
      docHaupt.F_Dat = docDialog.F_Dat(0)
      
   End If
   
End Sub

Durch Klick auf "OK" sollen die Werte an das Dok übergeben werden.
Das klappt auch wunderbar, allerdings wenn ich nun das Dok speichere sind die Felder leer  


Habs sowohl mit Formelsprache als auch jetzt mit Script probiert, jedesmal dasselbe Problem.....


Case

[Glombi]

Hi case,

mach die Felder "Berechnet beim Anlegen" dann sollte es gehen. Aus Performancegründen sollte man das immer so machen, denn dann werden die Felder beim Speichern nicht neu berechnet. Die Formel für das Berechnet beim Anlegen Feld kann = "" ,wenn die per Dialogbox gesetzt werden.

Alternativ könntest Du auch das Feld Berechnet machen und als Formel den Feldnamen. Das ist aber wie gesagt nicht meine Empfehlung. Man denke z.b. auch an die Möglichkeit, Dokumente bei der Replikation zu mischen. Das geht dann mit Berechneten Feldern nie!

Andreas

[case]

Hi Andreas,

cool das wars, vielen Dank !!!!
Hat mich glatt 1 Stunde Zeit gekostet, das Problem. Aber wenigstens werde ich Deine Tipps zu berechneten Feldern nicht so schnell mehr vergessen  

bye,
Case

[Glombi]

Hi case,
gern geschehen. Ich muss schon sagen, das Forum ist echt genial. Man stellt was rein und es dauert kaum ein paar Minuten und schon hat man (meistens) die Antwort!

Nur auf mein HTTP_Referer meldet sich keiner  
Aber das ist ein anderes Thema.

Andreas

P.S.: Kannst Du den Thread noch auf erledigt setzen.