Otra de las tareas que podemos automatizar por medio de scripts en Visual Basic Script es la copia de una serie de carpetas y ficheros.
En el ejemplo, el script copia una carpeta al equipo local junto con todo el contenido que hay dentro de esta, ya sean carpetas o ficheros.
El script es el siguiente:
———————————————————————————-
‘ copiarcarpetascomunes.vbs
‘ Copia el contenido de la carpeta “\servficheros\ficheros\Carpetas comunes\” a “c:\”
‘
‘Creado por Oscar Abad el 7-8-09
‘
Option Explicit
Const SOBREESCRIBIR = True
Dim objFSO
Set objFSO = CreateObject(“Scripting.FileSystemObject”)
objFSO.CopyFolder “\\servficheros\ficheros\Carpetas comunes\*.*” , “C:\” , SOBREESCRIBIR
—————————————————————————————-
Copia el contenido de “\\servficheros\ficheros\Carpetas comunes\” a la raiz del disco C:.
Script sencillo y de gran utilidad que podemos compaginar o complementar con las GPOs.
Saludos.
—–
Oscar Abad
http://www.xulak.com – Consultoría informática
Programador WordPress freelance