ciao,
per cancellare una cartella vuota uso:

codice:
On Error GoTo ERRORE
    'elimina cartella
    'Label9 è il nome della cartella
    While Inet1.StillExecuting
    
     DoEvents
           Wend
   Inet1.Execute "", "rmdir """ & Label9.Caption & """"
    
    DoEvents

    Timer4.Enabled = True ' Attende per effettuare il dir
            
    Exit Sub
ERRORE:
    MsgBox "ERRORE: " & Err.Description, vbCritical + vbOKOnly
bene, però se la cartella contiene file questo comando non avrà effetto, qual' è il metodo più veloce per eliminare cartella + file?