Hallo liebes Forum,
ich möchte über eine Script-Schaltfläche in einer Ansicht folgendes erreichen:
1. Komprimieren aller Einträge
2. Auswahl eines bestimmten Dokumentes
Den Punkt 2 habe ich selber hinbekommen
Dim session As New NotesSession
Dim db As NotesDatabase
Dim workspace As New NotesUIWorkspace
Dim doc As NotesDocument
Dim uiview As NotesUIView
Dim view As NotesView
Set db = session.CurrentDatabase
Set uiview = workspace.CurrentView
Set view = db.GetView("ResByDate")
Set doc = view.GetDocumentByKey(Today)
Call uiview.SelectDocument(doc)
Aber zu Punkt 1 gehen mir die Ideen aus. In der Formelsprache ist's ja simpel mit @Command( [ViewCollapseAll] )
zu realisieren. Ich dachte erst an EVALUATE, aber das geht nicht >:( (siehe auch http://atnotes.de/index.php?topic=28334.msg179174#msg179174)
Wie kann ich es noch versuchen?