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