pokermaster2007
Goto Top

Ordnerstruktur von IMAP Server in Treeiew darstellen VB.NET

ich habe mir die IMAP dll von HelloWebApps heruntergeladen (http://hellowebapps.com/products/imapx/). die funktioniert soweit auch super. nur ich hab ein kleines problemchen mit dem auflisten der ordner auf dem imap server.

Die Ordner auf dem IMAP Server kann ich mit folder.subfolder(index) oder folder.subfolder(name as string) abrufen

sidebar ist der treeview

 Public client as New ImapX.Client(imap.domain.tld, 143, False)
 Public Sub buildfolders(ByVal client As ImapX.ImapClient)
        'Ordnersturktur vom Server auslesen udn in TreeView ausgeben  
        folders = client.Folders

        For Each Folder In folders

            foldername = Folder.Name

            If foldername = "Entw&APw-rfe" Then  
                FrmMain.sidebar.Nodes.Add("Entwürfe")  
            Else
                FrmMain.sidebar.Nodes.Add(foldername)
            End If

            If folders.Item(foldername).SubFolder.Count > 0 Then
                Call buildsubfolders(client, foldername)
            End If
        Next
    End Sub

    Public Sub buildsubfolders(ByVal Client As ImapX.ImapClient, ByVal foldername As String)
        index = 0

        Do
            Select Case folders.Item(foldername).SubFolder(i).ToString()
                Case "Papierkorb"  
                Case "Entw&APw-rfe"  
                Case "Postausgang"  
                Case "Spam"  
                Case Else
                    FrmMain.sidebar.Nodes(index).Nodes.Add(folders.Item(foldername).SubFolder(i).ToString())
            End Select

            i += 1
        Loop Until i = folders.Item(foldername).SubFolder.Count
        i = 0
    End Sub

Das funktioniert soweit auch gut aber ich habe nur die "ersten subfolder". gibt es eine möglichkeit die ordner so auszulesen, dass egal wie viele unterordner ein ordner hat der die ausgibt ? ok die schleife um die schleife mit dem select case hab ich noch nciht drind as ist aber einfach. ich denke auch das da irgendwie gehen müsste, nur da ich noch ein anfänger bin es nicht hin bekomme.

Ich bin dankbar für jede Hilfe !!

Content-Key: 175480

Url: https://administrator.de/contentid/175480

Printed on: April 23, 2024 at 07:04 o'clock

Member: FlyingFish
FlyingFish Jul 30, 2012 at 13:09:49 (UTC)
Goto Top
Hallo,

ich wollte mal nachfragen ob es inzwischen neue Erkenntnisse zu diesem Thema gibt.
Member: pokermaster2007
pokermaster2007 Aug 08, 2012 at 00:01:56 (UTC)
Goto Top
leider nein. ich habe das projekt anfang 2012 aufgegeben. Tut mir leid.