[VB6] Cancellare tutti i file contenuti in una cartella

[henry78]

ciao a tutti...

il mio problema è cancellare tutti gli eventuali file contenuti in una cartella...

ho trovato su msdn

oggetto.DeleteFile filespec[, elimina]

però, se non viene specificato il nome del file genera errore...


come posso fare?? :master:

[wallrider]

vedi il comando kill


psggetto cos'è!?!

[henry78]

ho rispolto così:

Public Sub cancella_file()

Set FSO = CreateObject("Scripting.FileSystemObject")

Set Fold = FSO.GetFolder("\\pippo\wwwroot\Report\applicazioni \abc1\temp2")


For Each FFold In Fold.Files

FSO.DeleteFile (Fold & "\" & FFold.Name)

Next

Set Fold = Nothing

Set FSO = Nothing


End Sub

corretto no?

ps (oggetto... è un copia incolla... da msdn!)