Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: zeeboo am 29.07.03 - 09:11:21
-
hola
ich möchte darauf reagieren wenn documente in meiner db gelöscht werden.
habe dazu das "postdocumentdelete" event im Database Script implementiert.
num möchte ich auch feststellen aus welchen view das document gelöscht wurde und mit welcher maske das document geöffnet wird.
gibs da möglichkeiten?
mfg & greeeeeetz
-
Hi,
das geht wie folgt:
Sub Postdocumentdelete(Source As Notesuidatabase)
Dim ws As New NotesUIWorkspace
Dim uiview As NotesUIView
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Set uiview = ws.CurrentView
Set dc = Source.Documents
Msgbox "Aus folgender Ansicht wurde gelöscht: " & uiview.Viewname
Set doc = dc.GetFirstDocument
While Not (doc Is Nothing)
if doc.HasItem("Form") then
Msgbox "Folgende Maske: " & doc.Form(0)
elseif doc.HasItem("$Title") then
Msgbox "Folgende Maske: " & doc.GetItemValue("$Title")(0)
end if
Set doc = dc.GetNextDocument(doc)
Wend
End Sub
Andreas
-
super!
-
@zeeboo :
interessehalber : wozu braucht man sowas ?
gruss