Feedback

Ermitteln ob ein Ordner leer ist

VB - Tim Hartwig Mai 12, 2007
2 Ratings 4/5

Sprache: VB

Diese Funktion prüft ob ein Ordner komplett leer ist.
''' <summary>
''' Diese Funktion prüft ob der angegebene Ordner leer ist
''' </summary>
''' <param name="Folder">Der zu prüfende Ordner</param>
Public Function IsFolderEmpty(ByVal Folder As String) As Boolean
    Try
        If Directory.GetDirectories(Folder).Length = 0 Then
            If Directory.GetFiles(Folder).Length = 0 Then
                Return True
            End If
        End If
    Catch ex As Exception
        Return False
    End Try
End Function
''' <summary>
''' Diese Funktion prüft ob der angegebene Ordner leer ist
''' </summary>
''' <param name="Folder">Der zu prüfende Ordner</param>
Public Function IsFolderEmpty(ByVal Folder As String) As Boolean
    Try
        If Directory.GetDirectories(Folder).Length = 0 Then
            If Directory.GetFiles(Folder).Length = 0 Then
                Return True
            End If
        End If
    Catch ex As Exception
        Return False
    End Try
End Function
Abgelegt unter Ordner

Alte URL: /snippet/ermitteln-ob-ein-ordner-leer-ist/535