06/07/2006, 10:17
|
 | | | Fecha de Ingreso: enero-2005 Ubicación: Argentina
Mensajes: 224
Antigüedad: 20 años, 4 meses Puntos: 3 | |
| se supone que con el comando Kill no se puede, entonces podemos usar una de las referencias (Proyectos -> Referencias -> Microsoft Scripting Runtime). Esto nos dejara utilizar el FileSystemObject. Luego agrega el siguiente codigo y listo.
funciton EliminarPath(Ruta as String)
Dim fso As FileSystemObject
Set fso = New FileSystemObject
Path = Ruta
fso.DeleteFolder Path, True
Set fso = Nothing
End function
bye! |