Guten Morgen,
ich habe eine Maske, in der eine eingebettete Ansicht integriert ist.
In der eingeb. Ansicht habe ich die Option "Aktionsleiste anzeigen" gewählt,
so dass ich die Aktionsschaltflächen der Ansicht habe.
In einer Aktion habe ich ein "entfernen" von Dokumenten realisiert. D.h. es wird u.a. ein Flag gesetzt, dass in der Auswahlformel abgefragt wird.
Wenn ich die Schaltfläche jetzt auf ein Dokument anwende, wird zwar das Flag in dem Dokument gesetzt, aber die Ansicht nicht automatisch aktualisiert. Erst wenn ich F9 drücke "verschwindet" das Dokument.
Ich habe schon im Script der Aktion versucht die aktuelle Ansicht zu aktualisieren funktioniert leider nicht.
Hat jemand eine Idee ???
Hier der Code der Aktion
Dim session As New NotesSession
Dim ws As New NotesUIWorkspace
Dim db As NotesDatabase
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Dim uiview As NotesUIView
Dim view As NotesView
Set db = session.CurrentDatabase
Set collection = db.UnprocessedDocuments
Set doc = collection.GetFirstDocument()
Set uiview =ws.CurrentView
Set view = uiview.View
'Abfrage auf das Dokument
If ((collection.Count <> 1) Or (doc Is Nothing)) Then
Msgbox "Bitte wählen Sie nur ein Dokument aus.",64,"Info"
Exit Sub
End If
doc.DelFlag="1"
doc.DelDat=Now
doc.DelUser=session.UserName
Call doc.Save(True,True,False)
Call view.Refresh