Ich hab jetzt das Beispiel von seidl eingebaut.
Allerdings muss ich zwei Sachen ändern: Erstens muss es möglich sein mehrere Ordner (die man zuvor ausgewählt und einer Liste hinzugefügt hat) in einem Rutsch zu kopieren und zweitens nimmt das Beispiel blos die Unterordner, es soll den ausgewählten Ordner aber auch mitkopieren.
Zum ersten nun eine einfache Frage (das zweite krieg ich hoffentlich noch hin):
Ich will eine For Each Next Schleife machen, um die Liste durchzugehn, was muss ich da als Objekt nehmen?
In der MSDN ist ein Beispiel dazu:
Code:
Dim Gefunden, Objekt1, Auflistung1
Gefunden = False ' Variable initialisieren.
For Each Objekt1 In Auflistung1 ' Alle Elemente durchlaufen.
If Objekt1.Text = "Hallo" Then ' Wenn Text gleich "Hallo",
Gefunden = True ' Gefunden auf True setzen.
Exit For ' Schleife verlassen.
End If
Next
Wie legt man das jetzt auf die Objekte in Form1.List1 um?
Ich dache, das geht einfach so, aber da kommt immer "Objekt unterstützt diese Eigenschaft oder Methode nicht (Fehler 438)":
Code:
Dim Obj
For Each Obj In Form1.List1