Διαγραφή directory σε asp.net εφαρμογή

Υπάρχουν περιπτώσεις που μια εφαρμογή πρέπει να διαγράψει ένα ολόκληρο directory και τα αρχεία ή άλλα directories που μπορεί να περιέχει.
Καλώντας την IO.Directory.Delete(path, true) που θα έπρεπε να διαγράψει το directory και τα περιεχόμενά του, γυρνάει το error: "The directory is not empty."
Για να παρακάμψω το πρόβλημα βρήκα τις εξής πολύ χρήσιμες μεθόδους:
        ''' <summary>
        ''' A method to traverse down through child directories until
        ''' we have reached the lowest level and then clean (delete) all
        ''' files before deleting the directory itself.
        ''' </summary>
        ''' <param name="di">
        ''' <remarks>All files must be deleted in a directory prior to deleting the
        ''' directory itself to prevent the following exception:
        ''' "The directory is not empty."
        ''' </param>
        ''' </remarks>
        Public Shared Sub DirectoryDeepDelete(ByVal di As DirectoryInfo)

            'If the current directory has more child directories, then continure
            'to traverse down until we are at the lowest level.  At that point all of the
            'files will be deleted.
            For Each diChild As DirectoryInfo In di.GetDirectories()
                DirectoryDeepDelete(diChild)
            Next

            'Now that we have no more child directories to traverse, delete all of the files
            'in the current directory, and then delete the directory itself.
            CleanAllFilesInDirectory(di)


            'The containing directory can only be deleted if the directory
            'is now completely empty and all files previously within
            'were deleted.
            If di.GetFiles().Count = 0 Then
                di.Delete()
            End If

        End Sub

        ''' <summary>
        ''' Iterates through all files in the directory passed into
        ''' method and deletes them.
        ''' </summary>
        ''' <param name="DirectoryToClean"/>
        ''' <remarks>It may be necessary to wrap this call in impersonation or ensure parent directory
        ''' permissions prior, because delete permissions are not guaranteed.
        ''' </remarks>
        Public Shared Sub CleanAllFilesInDirectory(ByVal DirectoryToClean As DirectoryInfo)

            For Each fi As FileInfo In DirectoryToClean.GetFiles()
                'The following code is NOT required, but shows how some logic can be wrapped
                'around the deletion of files.  For example, only delete files with
                'a creation date older than 1 hour from the current time.  If you
                'always want to delete all of the files regardless, just remove
                'the next 'If' statement.
                If fi.CreationTime < Now.Subtract(New TimeSpan(0, 0, 1)) Then
                    'Read only files can not be deleted, so mark the attribute as 'IsReadOnly = False'
                    fi.IsReadOnly = False
                    fi.Delete()

                    'On a rare occasion, files being deleted might be slower than program execution, and upon returning
                    'from this call, attempting to delete the directory will throw an exception stating it is not yet
                    'empty, even though a fraction of a second later it actually is.  Therefore the 'Optional' code below
                    'can stall the process just long enough to ensure the file is deleted before proceeding. The value
                    'can be adjusted as needed from testing and running the process repeatedly.
                    System.Threading.Thread.Sleep(50)  '50 millisecond stall (0.05 Seconds)
                End If
            Next
        End Sub
Τώρα κάθε φορά που η εφαρμογή χρειάζεται να σβήσει ένα directory καλώ την DirectoryDeepDelete περώντας ένα αντικέιμενο DirectoryInfo.

Comments

No responses to “Διαγραφή directory σε asp.net εφαρμογή”

Post a Comment