VB.Net Inhalt eines Dateiverzeichnis prüfen

Hallo ,

unter VB.Net stellt das FileSystemObject (FSO) keine Methode bereit, um die Anzahl Ordner oder Dateien in einem Ordner zu ermittleln.

Um einen Ordner zu löschen, benötige ich jedoch diese Informationen.
Denn ich will FSO.DeleteFolder nur ausführen, sofern der zu löschende Ordner auch tatsächlich leer ist.

Unter VB 6 hatte ich das Problem wie folgt gelöst:

Dim CountFile As Integer         ' Anzahl Dateien im Ordner
Dim CountFolder As Integer     ' Anzahl Ordner
Dim FSO As FileSystemObject
Dim Folder As Folder
Dim Files As Files
Set FSO = New FileSystemObject
Set Folder = FSO.GetFolder(StrPath_1)     ' StrPath_1 =Pfadname
Set Files = Folder.Files

CountFolder = Folder.SubFolders.Count
CountFile = Files.Count

If CountFile = 0 And CountFolder = 0 Then
    FSO.DeleteFolder (StrPath_1)
End if

Wie muß dieses Problem unter VB.Net "angepackt" werden ????

Gruß
Jochen

Mit den erweiterten Variablen-Deklarationen

Dim Folder As Scripting.Folder
Dim Files As Scripting.Files

funktioniert's !!!!

Ich dachte "Scripting." sei nicht erforderlich, da ich bereits einen Verweis auf Interop.Scripting gesetzt und zudem
in meinem StartFormular Form1
Imports Scripting vor Public Class Form1 ergänzt hatte.

Gruß
Jochen

[ARCUS_L]

Hi !

Bin mir nicht sicher brauchst du nun Hilfe oder war das nur zur Info ?

Falls du Hilfe benötigst dann schau dir mal die Klassen

FileInfo
DirectoryInfo

an .

mfg ARCUS_L

Hallo ARCUS_L ,

Nein , Hilfe brauche ich nicht mehr.
Aber Danke für den Tipp zu den Klassen FileInfo und DirectoryInfo
Werde mal gucken, welche Möglichkeiten man dort so hat.....

Gruß
Jochen

PS
Wie kann ich hier im Forum meinen eigenen Beitrag als erledigt / Problem gelöst kennzeichnen = Rotes Häkchen neben dem Thema setzen ????

[TimS.]

Unten bei Antwort in der zeile gibts einen knopf gelöst!