Domino 9 und frühere Versionen > ND7: Entwicklung

Frage zum Querydocumentdelte

(1/2) > >>

jimmyone:
Hallo zusammen,

ich muss gestehen, mit der Formelsprache gehts inzwischen ganz gut...
Aber ich möchte auch versuchen, in LotusScript reinzukommen...
Ist zwar eigentlich nicht mein Job, aber ich finde es hochspannend.

Ich versuche so eine Art Delte Sicherung aufzubauen...
Aber ich bekomme immer wieder die Meldung "Object variable not set"


--- Code: --- Dim Session As New NotesSession
Dim db As NotesDatabase
Dim ui As New NotesUIWorkspace
Dim uidoc As NotesUIDocument

Set db=Session.CurrentDatabase
Set uidoc=ui.CurrentDocument

If uidoc.FieldGetText("n_sw_del_safe") = 1 Then
Messagebox "Document is delteable"
Else
Messagebox "Document is not delteable"
End If
--- Ende Code ---

Also man geht quasi hin und selektiert ein Document in einer View und drückt auf Entf.
Zum Test soll dann erst mal diese Messagebox erscheinen...

Ich bin in LS wirklich Anfänger...

Grüße,
Jimmy

dirk_2909:
Wo ist das Script untergebracht? Im entsprechenden Event des DB-Scripts?

Dann kannst Du nicht auf das UI-Dok zugreifen. Du musst das Backend-Dokument nehmen...

jimmyone:
Richitg, im Database Script soll das passieren, im Event
querydocumentdelete.

Das ganze soll ja nur auf ein ausgewähltes Dokument stattfinden...
Ich hatte gedacht, man muss das Dokument also über seine UNID angeben.

Aber wie komme ich dann an das Dokument ran, wenn ich kein UI nutzen kann?

Also wie soll man spezifizieren, das es sich gerade um Document X handelt und nicht um das erste etc.

Also wie soll ich an die UNID kommen? Oder ist der Weg ganz falsch?

Axel:
So kommst du an die Dokumente ran:

Sub Querydocumentdelete(Source As Notesuidatabase, Continue As Variant)
 
  Dim collection As NotesDocumentCollection

  Set collection = Source.Documents
  'In der Collection sind nun alle zum Löschen markierten Dokumente enthalten
...

End Sub


Axel

jimmyone:
Vielen Dank, das hat funktioniert.
NotesDocumentCollection taucht zwar in der Help auf, aber Source.Documents konnte ich da nicht finden...

Klar, das ergibt einen Sinn aber wo kommt das Command her?

Navigation

[0] Themen-Index

[#] Nächste Seite