Ordner auslesen

[TomLudwig]

Hallo zusammen,

ich möchte Mails von einer Datenbank in eine andere über eine Aktion verschieben.
Und das gleich in einen vorhandenen Ordner, den sich der User auswählen kann?

Wie kann ich alle Ordner einer Datenbank auslesen? Anzeigen kann ich das ganze ja dann mit einer Art Dialogbox oder der gleichen...
Oder gibts für mein Problem vielleicht schon eine Fertige Klasse? 

Gruß Tom

[umi]

Hi
Ich denke da an folgendes:
Via NotesDatabase.views kommst Du an alle Views. Mit NotesView.isFolder prüfst Du ob es ein Ordner ist. Die Ordner kannst Du ja via NotesUiWorkspace.picklistStrings() dem User zur Auswahl präsentieren.

Gruss

umi

[TomLudwig]

JA wunderbar...

Bekomm ich die Ordnerstruktur auch noch irgendwie hin, das man so ein Art Baum-Menü basteln kann???

[umi]

Ist mir keine Lösung bekannt. Allerdings steckt die Ordnerstruktur im Namen der Folder.

[TomLudwig]

stimmt... ok. Werd ich ausprobieren und schaffen

Vielen Dank für deine Hilfe...

[0xse]

Du kannst doch auch einfach auf den "View" zugreifen, in dem sich der User grad befindet.

Dim wks As New NotesUIworkspace
Dim view As NotesUIView

Set view = wks.currentview

Ich vermute mal das ein Ordner in dieser Hinsicht genauso wie ein "View" behandelt wird.

Einfach mal ausprobieren

[Semeaphoros]

Ich vermute mal das ein Ordner in dieser Hinsicht genauso wie ein "View" behandelt wird.

Ja, tut er