Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: inu am 06.02.04 - 10:21:38
-
Hallo,
ich habe eine Ansicht mit 3 Spalten. Die erste Spalte ist kategorisiert. Die beiden anderen beinhalten jeweils die Anzeige einzelner Feldinhalte.
Ich benötige eine Funktion, mit der ich - ohne dass ich alle Dokumente anfassen muß - die Kategorien (namentlich) zurückerhalte.
???
-
... versteh ich nicht ganz :P
was möchtest du genau ?
-
willst du per LS die kategorien ermitteln, ohne die docs anzufassen ?
geht nicht !
-
Nunja, ich dachte ich kann da irgendwas mit der Klasse NotesView machen?
-
Meinst Du sowas ?
Returns the current category in the view for the current document.
Note This property is new with Release 5.
Defined in
NotesUIView
Data type
Variant
Syntax
To get: variant = notesUIView.CaretCategory
Usage
This property is mainly used for categorized views.
-
@glombi,
ich glaube, er möchte alle kategorien gelistet bekommen. und das geht m.w.n. nicht. :'(
-
... oder dieses script "aufbohren":
Sub Initialize
Dim db As NotesDatabase
Dim view As NotesView
Dim nav As NotesViewNavigator
Dim entry As NotesViewEntry
Dim count As Integer
Set db = New NotesDatabase( "", "Learning LotusScript.nsf" )
Set view = db.GetView( "By Category" )
Set nav = view.CreateViewNav( )
Set entry = nav.GetFirst
count = 0
' begin counting categories
' stop when there are no more categories
Do Until entry Is Nothing
count = count + 1
Set entry = nav.GetNextCategory( entry )
Loop
Messagebox "Number of categories = " & count,, "By Category"
End Sub
... stammt übrigens aus der designer-hilfe ;D
-
Doch, ganz einfach
Dim kategorie_Array as Variant
kategorie_Array = Evaluate(|@Unique(@DbColumn("";"";"Name der Ansicht";1))| )
liefert alle Kategorien als Array zurück.
Andreas
-
... naja, ist halt schon freitag :P
mann lernt eben nie aus ;D
-
Ja, sicher, ist die einfachste Lösung.
Danke :)
-
Ja, sicher, ist die einfachste Lösung.
Danke :)
und - noch wichtiger - die bei weitem schnellste.
Andreas
-
*BrettVorDemKopfAbschraub*
;)