Seleccionar página

Buenas, en mi trabajo me propuse automatizar una tarea que se estaba haciendo de manera manual (y tediosa)
si si ya se, que la forma manual tradicional de hacerlo es bastante facil ya que con un par de clics tenemos la exportación en un .xml.
Pero si lo tenemos que hacer todos los dias se pone tedioso…
me refiero al exportar desde el productivo para despues mediante dispositivo electronico llevarlo al de backup…

Asi que, ahora vamos ver una manera de llevar a cabo el proceso sin casi intervención nuestra, para de esta forma tener automatizado el backup:
1- Creamos una carpeta compartida en algun equipo estilo \\myserver\backup
2- Creamos un archivo llamado backup.vbs con el siguiente codigo dentro:

Dim fileName
Dim WSHNetwork
Dim shareName: shareName = "\\myserver\backup"
Dim xmldom : set xmldom = CreateObject("Msxml2.DOMDocument")
Dim fpc : set fpc = WScript.CreateObject("Fpc.Root")
Dim array : set array = fpc.GetContainingArray
set WSHNetwork = CreateObject("WScript.Network")
fileName=shareName & "\" & WSHNetwork.ComputerName & "-" & Month(Now) & "-" & Day(Now) & "-" & Year(Now) & ".xml"
array.Export xmldom, 0
xmldom.save(fileName)

el .xml quedara con el nombre del servidor mas la fecha actual.
Ejemplo: ServerFriki-08-11-2012.xml

Ultimo paso: Crear una tarea programada (Inicio – Programas – Accesorios – Tareas Programadas) en Windows en donde se ejecute nuestro .VBS todos los días o todas las semanas segun quieras.
y Listo !
——————————————————————————————-
BONUS:

podriamos crear un .bat que nos borre los .xml de tal forma que no se acumulen y nos llenen el disco.

Crear un .BAT con nombre Borrar.bat y dentro le ponemos lo siguiente:

del ruta\*.xml

posteriormente crear otra tarea programada que ejecute ese .bat cada 2 semanas o el tiempo que quieras que se borren los backups de tu server.

Hasta la proxima….

A %d blogueros les gusta esto: