Domino 9 und frühere Versionen > ND6: Entwicklung

Felder setzen

<< < (6/6)

Glombi:
Sorry, in der Klasse NotesUIView gibt es gar kein Refresh - das haben die glatt bei IBM vergessen  :o

Also evtl. so:
Sub Queryopendocument(Source As Notesuiview, Continue As Variant)
   
   Dim s As NotesSession              
   Set s = New NotesSession
   Dim db As notesdatabase
   Set db = s.CurrentDatabase
dim view as NotesView
   Dim docs As NotesDocumentCollection
   Dim doc As NotesDocument
   Set docs = Source.Documents
   Set doc = docs.GetFirstDocument
   
   
   Call doc.ReplaceItemValue("Status","bereit")
   Call doc.Save(True,True)

set view = Source.View
   Call view.Refresh
End Sub

Ob sich das allerdings gleich auf die bereits geöffnete Ansicht auswirkt, weiß ich nicht.

Andreas

Glombi:
oder

Sub Queryopendocument(Source As Notesuiview, Continue As Variant)
dim ws as New NotesUIWorkspace  
   Dim s As NotesSession              
   Set s = New NotesSession
   Dim db As notesdatabase
   Set db = s.CurrentDatabase
   Dim docs As NotesDocumentCollection
   Dim doc As NotesDocument
   Set docs = Source.Documents
   Set doc = docs.GetFirstDocument
   
   
   Call doc.ReplaceItemValue("Status","bereit")
   Call doc.Save(True,True)

   Call ws.ViewRebuild
End Sub

koehlerbv:
NotesUIWorkspace.ViewRefresh heisst die erforderliche Methode ;-)

Bernhard

Glombi:

--- Zitat von: koehlerbv am 12.01.04 - 17:23:28 ---NotesUIWorkspace.ViewRefresh heisst die erforderliche Methode ;-)

--- Ende Zitat ---
Hi Bernhard,
das hatten wir schon - laut TripleH stürzt Notes dabei ab...

Andreas

animate:
ich zitiere nochmal mich:

--- Zitat ---Du könntest versuchen, die ComputeWithForm-Methode deines Document-Objekts aufzurufen, bevor du es speicherst, vielleicht ändert das was an dem Verhalten.
--- Ende Zitat ---

hat bei mir in einem ähnlichen Fall funktioniert.

Navigation

[0] Themen-Index

[*] Vorherige Sete

Zur normalen Ansicht wechseln