Puntos de Restauración automaticos

13/08/2005 - 02:12 por Luís | Informe spam
Hola amigos:
He buscado en este foro y vi este script, para hacer puntos de restauración
automaticos:
Crear Punto De Restauración:
Inicio
if msgbox("Desea crear un punto de restauración?",vbyesno +
vbquestion,"Restaurar el sistema")=vbyes then
set SRP = getobject("winmgmts:\\.oot\d­efault:Systemrestore")
CSRP = SRP.createrestorepoint ("Peni", 0, 100)
msgbox "Punto de restauración creado",vbinformation,"Restaur­ar el
sistema"
end if
Final
A mi no me funciona, no se lo que tengo que cambiar,
Mi disco duro donde tengo instalado el Sistema es el "E".
Alguien me puede ayudar
Agradecido de antemano
 

Leer las respuestas

#1 Samuel Aparicio
12/08/2005 - 20:06 | Informe spam
Se puede crear en la sección Nuevo de menu Contextual...?

Saludos...

Samuel


"Enrique [MVP Windows]" escribió en el mensaje
news:
No, no lo haces bien. Siguiendo las instrucciones de nuestro compañero
Antonio Amengual [MS MVP], debes hacer lo siguiente para crear un script
que ejecutándolo se cree un punto de restauración de forma automática:

Abre el Bloc de notas (notepad) y escribe lo siguiente (puedes copiar y
pegar):


_____________esta línea no se copia_______________________

Set IRP = getobject("winmgmts:\\.oot\default:Systemrestore")
MYRP = IRP.createrestorepoint ("My Restore Point", 0, 100)

_____________esta línea no se copia_______________________


Guarda el archivo en el escritorio (por ejemplo) con el nombre
*Myrestorepoint.vbs*. Ya lo tienes listo para ejecutarlo.


Saludos,
Enrique Cortés
Microsoft MVP - Windows - IE/OE
(quita la Z)

"Quien se empeña en pegarle una pedrada a la luna no lo conseguirá,
pero terminará sabiendo manejar la honda".



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.
________________________________________________________________________________
"Luís" escribió en el mensaje
news:%
Hola amigos:
He buscado en este foro y vi este script, para hacer puntos de
restauración
automaticos:
Crear Punto De Restauración:
Inicio
if msgbox("Desea crear un punto de restauración?",vbyesno +
vbquestion,"Restaurar el sistema")=vbyes then
set SRP = getobject("winmgmts:\\.oot\d­efault:Systemrestore")
CSRP = SRP.createrestorepoint ("Peni", 0, 100)
msgbox "Punto de restauración creado",vbinformation,"Restaur­ar el
sistema"
end if
Final
A mi no me funciona, no se lo que tengo que cambiar,
Mi disco duro donde tengo instalado el Sistema es el "E".
Alguien me puede ayudar
Agradecido de antemano





Preguntas similares