
01/08/2005, 08:50
|
 | | | Fecha de Ingreso: febrero-2004 Ubicación: Villahermosa tabasco cent
Mensajes: 251
Antigüedad: 21 años, 2 meses Puntos: 0 | |
nose si te sirva pero .. bueno ahi te dejo un codigo de scripting.filesystemobject
Crear una carpeta
---------------------------------------------------------------------------------------------------------------------
CreateFolder
Sirve para crear carpetas en el pc.
Ejemplo:
Set zonavirus = CreateObject("Scripting.FileSystemObject")
zonavirus.CreateFolder "C:\muere_perro"
Esto creara la carpeta "muere_perro" en la unidad C
---------------------------------------------------------------------------------------------------------------------
Borrar una carpeta
---------------------------------------------------------------------------------------------------------------------
DeleteFolder
Este comando sirve para borrar carpetas.
Ejemplo:
Set zonavirus = CreateObject("Scripting.FileSystemObject")
zonavirus.DeleteFolder "C:\muere_perro"
Esto borrara la carpeta "muere_perro" de la unidad C. Si pones *.* borraria todos las carpetas! |