Ver Mensaje Individual
  #13 (permalink)  
Antiguo 01/08/2005, 08:50
Avatar de UID
UID
 
Fecha de Ingreso: febrero-2004
Ubicación: Villahermosa tabasco cent
Mensajes: 251
Antigüedad: 20 años, 3 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!
__________________
http://www.xpresatelibre.com La Xpresion Al Maximo Nivel