Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: inu am 11.10.07 - 10:20:14

Titel: Orderstruktur abfragen
Beitrag von: inu am 11.10.07 - 10:20:14
Hallo Leute,

ich möchte gern folgendes umsetzen:
Ein Benutzer klickt in seiner Mailbox auf eine noch zu definierenden Schaltfläche. Nach dem Anklicken soll der Benutzer von einer Zieldatenbank die Orderstruktur (inkl. Unterordner) angezeigt bekommen und einen Ordner auswählen können.

Kann so etwas umgesetzt werden? Wenn ja, welche Befehle sind mir hier behilflich?

Vielen Dank
Titel: Re: Orderstruktur abfragen
Beitrag von: Glombi am 11.10.07 - 10:35:23
Zum Verständnis: Die auszuwählenden Ordnernamen sind NICHT in der Maildatenbank, sondern in einer anderen DB !?
Titel: Re: Orderstruktur abfragen
Beitrag von: inu am 11.10.07 - 10:39:48
Ja, die Ordnernamen sind nicht in der Quelldatenbank (Benutzermailbox), sondern in einer Zieldatenbank (ebenfalls eine Mailbox).

Ziel ist es übrigends, das Mail auf der Quell-DB in die Ziel-DB zu verschieben. Und zwar genau in den ausgewählten Ordner.
Titel: Re: Orderstruktur abfragen
Beitrag von: koehlerbv am 11.10.07 - 11:43:16
Da wird die NotesNoteCollection class zu Deinem Freund werden (das ist auch das schnellste Verfahren).

Bernhard
Titel: Re: Orderstruktur abfragen
Beitrag von: inu am 11.10.07 - 13:16:38
... und wie kann ich dort die Ordnertiefe/-verschachtelung "abbilden"?
Titel: Re: Orderstruktur abfragen
Beitrag von: koehlerbv am 11.10.07 - 13:35:21
Das musst Du selber nachbauen.

Bernhard
Titel: Re: Orderstruktur abfragen
Beitrag von: inu am 11.10.07 - 13:41:15
Hast Du evtl. irgend ein Beispiel, da ich nicht mal einen Idee zum Nachbau habe. Sicher spielt hier irgendwie die Rekursion eine Rolle...
Titel: Re: Orderstruktur abfragen
Beitrag von: koehlerbv am 11.10.07 - 13:49:03
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)

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
Titel: Re: Orderstruktur abfragen
Beitrag von: inu am 11.10.07 - 13:52:43
und das sortierte Array biete ich mit einem Prompt an. Richtig?

Titel: Re: Orderstruktur abfragen
Beitrag von: koehlerbv am 11.10.07 - 14:14:44
Prompt ist eine Variante. Ich mache das mit einer Dialogbox mit Layout-Bereich.

Bernhard
Titel: Re: Orderstruktur abfragen
Beitrag von: inu am 11.10.07 - 14:22:03
mit dem Layoutbereich? Und wie machst Du das dort mit der Auswahl?
Titel: Re: Orderstruktur abfragen
Beitrag von: koehlerbv am 11.10.07 - 15:46:54
Ich fülle ein Item in der Maske. Ein Listenfeld zieht sich ein Listenfeld seine möglichen Werte aus diesem Item.

Bernhard
Titel: Re: Orderstruktur abfragen
Beitrag von: inu am 11.10.07 - 16:43:46
okay, ich versuche das mal in den nächsten Tagen mit umzusetzen. Sollte ich nicht weiter kommen, würde ich dich gern noch einmal kontaktieren.
Titel: Re: Orderstruktur abfragen
Beitrag von: koehlerbv am 11.10.07 - 16:52:36
You're invited ...

Bernhard