Domino 9 und frühere Versionen > Entwicklung

Problem mit Responses

<< < (2/2)

klaussal:
....ungefähr so:

Sub Queryclose(Source As Notesuidocument, Continue As Variant)
  Dim doc As NotesDocument
 Set doc = source.document
 doc.FLAGDELETE = "1"
 Call doc.save (True, True)
End Sub
-----------------------------------------------------
'in der view sind alle docs mit flagdelete = "1"

Set view = db.getView(".DELETEVIEW")
 Call view.Refresh
 Set doc = view.getFirstDocument
 Do While Not doc Is Nothing
  Call doc.remove(True)   
  Call view.refresh
  Set doc = view.getFirstDocument
 Loop
Call ws.viewRefresh
Exit Sub

TomLudwig:
Ich habe das Flag auf 1 gesetzt. Es ist somit in meiner Ansicht.
Nun möchte ich alle Dokumente in der Ansicht löschen. Das funktioniert aber erst, wenn ich das Hauptdokument geschlossen habe.

Wo kann ich das löschen aller Dokumente implementieren? Es gibt meineswissens keine Ereignisroutine "PostClose" oder der gleichen.

Bitte um Hilfe....

klaussal:
im querysave abfragen, ob doc gespeichert werden soll oder nicht. wenn "nein", dann alle antwort-docs löschen, wenn "ja", dann eben nicht löschen.

Navigation

[0] Themen-Index

[*] Vorherige Sete