Cancellare una Dir

[Daniele80]

ciao ragazzi,
una volta creata una directory, avrei l'esigenza di cancellarla.

FileType = Server.MapPath("../../photogallery/")
   If Directory.Exists(FileType & codice & "\") Then
      Directory.Delete(FileType & codice & "\")
   End If

facendo cosi mi da errore dicendomi:
La directory non è vuota.


a me non importa se è vuota o no, io devo cacellare tutto

[ciupaz]

Directory.Delete cancella la directory solo se è vuota. Quindi prima di cancellarla, andrebbe cancellato tutto il suo contenuto.
Puoi farlo con un ciclo For Each, ad esempio:

Public Sub CancellaDirectory(ByVal sPath As String)
' cancello tutto il contenuto della directory e se stessa
Dim sFile As String
Dim sDir As String

If sPath <> "" Then
If System.IO.Directory.Exists(sPath) Then
' itero tra tutti i file
For Each sFile In System.IO.Directory.GetFiles(sPath)
' elimino il file
System.IO.File.Delete(sFile)
Next

' itero nelle subdirectory
For Each sDir In System.IO.Directory.GetDirectories(sPath)
EraseDirectory(sDir)
Next

' finalmente cancello la directory originale
System.IO.Directory.Delete(sPath)
End If
End If
End Sub

[Daniele80]

perfetto, grazie mille

[Daniele80]

beccate questa:
Directory.Delete(sPath,True)

fa tutto quello che fai tu con quelle linee.

buono che dici

[ciupaz]

Non male!