[Tip] Crear un listado de todos los puntos de restauración

Gracias, Enrique.

Francesc
"Enrique [MVP Windows]" escribió en el mensaje
news:
Crear un listado de todos los puntos de restauración de Restaurar Sistema


Como todos sabeis, la herramienta Restaurar sistema va creando puntos de
restauración a intervalos regulares de tiempo (puntos de control del
sistema), en los que guarda la configuración del Registro y el estado del
sistema, además de otros puntos que crea en la instalación de programas o
actualizaciones de windows; y también guarda los que creamos nosotros
personalmente. Puntos que nos pueden ayudar mucho cuando el sistema se torna
inestable.

Para visualizar estos puntos y saber cuáles son debemos acceder al
Restaurador del sistema y recorrernos todo el calendario, con el trabajo que
esto supone, sobre todo si lo que deseamos es conocer, de un modo rápido y
tangible, cuáles son todos los puntos de restauración existentes en el
sistema en un momento dado. Podemos crearnos un *script* mediante el cual
obtendremos un listado completo de esos puntos, que incluso podemos
imprimir. Para ello, haremos lo siguiente:


1.- Creamos en el Escritorio un nuevo archivo de texto mediante el Bloc de
notas (notepad).

2.- Ejecutamos el archivo e introducimos el siguiente texto:


_________esta linea no se copia_________________

Dim a, b, c, d, e, f
Set f = CreateObject("Wscript.Shell")
Set a = Wscript.CreateObject("Scripting.FilesystemObject")
Set b = a.CreateTextFile("C:\Puntos.txt",true)

If Wscript.Arguments.Named.Exists("Computer") Then
e=Wscript.Arguments.Named.Item("Computer")
Else
e="."
End If

Set c = getobject("winmgmts:\\" & e & "oot\default").InstancesOf
("systemrestore")

For Each d In c
b.writeline "Creation Time= " & d.creationtime
b.writeline "Description= " & d.description
b.writeblanklines 1
Next

f.Run "notepad C:\Puntos.txt", 1,True
Set a = Nothing
set f = Nothing

_________esta linea no se copia_________________


3.- Guardamos el archivo con el nombre *Listado_de_puntos.vbs* en el
Escritorio (ojo, con extensión VBS)

4.- Ahora ya podemos ejecutarlo, mediante un doble clic, y nos mostrará el
listado completo.


Los últimos de la lista corresponden a los puntos más recientes
cronológicamente. Cada agrupación de dos líneas corresponde a un punto de
restauración determinado. Por ejemplo en éste:

Creation Time= 20060722224505.739875-000
Description= Punto de control del sistema

en la primera línea (Creation Time) encontramos la fecha en primer término
(22 de julio de 2006), y en la segunda (Description) aparece el nombre del
punto (si es del sistema, o si se llevó a cabo tras la instalación de un
programa o actualización). El script nos crea, además, el archivo
*Puntos.txt* en el directorio raíz.


Nota: Si estamos ceando el script en otra partición de sistema que no sea la
C:\, deberemos cambiarlo por la letra correspondiente.



Saludos,
Enrique Cortés
Microsoft MVP - Windows - IE/OE
Date un paseo por mi Blog: http://ekort.blogspot.com
(despiértame si me quieres escribir)

Vista x86 (TM) Beta 2 Build 5456.5
IE7 Beta 3 Build 5450.4 en XP-SP2

"El secreto de la felicidad no es hacer siempre lo que se quiere,
sino querer siempre lo que se hace"


Este mensaje se proporciona "como está" sin garantías de ninguna clase, y no
otorga ningún derecho.
This posting is provided "AS IS" with no warranties, and confers no rights.
________________________________________________________________________________