Domino 9 und frühere Versionen > ND6: Entwicklung

Orderstruktur abfragen

<< < (2/3) > >>

koehlerbv:
Das musst Du selber nachbauen.

Bernhard

inu:
Hast Du evtl. irgend ein Beispiel, da ich nicht mal einen Idee zum Nachbau habe. Sicher spielt hier irgendwie die Rekursion eine Rolle...

koehlerbv:

--- Code: --- Set nncOfDBToAnalyse = dbToAnalyse.CreateNoteCollection (False)
nncOfDBToAnalyse.SelectFolders = True
Call nncOfDBToAnalyse.BuildCollection

szNoteID = nncOfDBToAnalyse.GetFirstNoteId
For iLoop = 1 To nncOfDBToAnalyse.Count
Set docDesign = dbToAnalyse.GetDocumentByID (szNoteID)
If (Instr (docDesign.~$Flags (0), "F") > 0) And (Left$ (docDesign.~$Title (0),1) <> "(")  Then
vFoldersFound = ArrayAdd (vFoldersFound, docDesign.~$Title (0))
End If
szNoteID = nncOfDBToAnalyse.GetNextNoteId (szNoteID)
Next

'Remove empty values, sort the array "vFoldersFound":
vFoldersFound = ArrayRemoveValue (vFoldersFound, "")
vFoldersSorted = ArraySort (vFoldersFound)

--- Ende Code ---

Das ganze ergibt ein Array aller Foldernames. ArrayRemoveValue und ArraySort musst Du selber schreiben. Du kannst SubFolders auch durch Einzüge darstellen und und und - Deienr Phantasie sind da keine Grenzen gesetzt.

Bernhard

inu:
und das sortierte Array biete ich mit einem Prompt an. Richtig?

koehlerbv:
Prompt ist eine Variante. Ich mache das mit einer Dialogbox mit Layout-Bereich.

Bernhard

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete