Domino 9 und frühere Versionen > ND6: Entwicklung
Felder setzen
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