Объявления
Скрипт автоматического создания точки восстановления системы при старте системы Windows 7

Значение средства Восстановление системы (SR, или System Restore) в операционных системах Windows  трудно переоценить. На эту тему написано множество статей, где подробно описаны принцип и способы работы с ним.

Многие пользователи успешно пользуются этим средством, однако находится немало и таких людей, которые его отключают по различным причинам (экономия дискового пространства, предрассудки по-поводу вирусов, которые часто облюбовывают для своего поселения папку System Volume Information).

Знакома ситуация, когда при возникновении какой-либо проблемы с работоспособностью ОС запуск SR становится невозможным, или же доступные контрольные точки восстановления для отката на работоспособную дату отсутствуют? Думаю многие с этим сталкивались.  Почему так происходит – отдельная тема для разговора, но согласитесь, досадно, когда из-за подобного «сюприза» мы неожиданно лишаемся самой простой возможности возврата к нормальной работе компьютера.

Скрипт автоматического создания точки восстановления системы при старте системы Windows 7

В обычных условиях контрольные точки создает сама система без вмешательства пользователя. Это происходит, например, при установке новых программ, оборудования или обновлений для операционной системы. Но, как вы знаете, такие точки можно создать и самому. Для автоматизации этого действия (своего рода подстраховки для забывчивых пользователей) и предназначен данный скрипт.

Скрипт автоматического создания точки восстановления системы при старте системы Windows 7

Скрипт работает как в фоновом режиме без вывода сообщений и окон:

If WScript.Arguments.Count = 0 Then
Set objShell = CreateObject(“Shell.Application”)
objShell.ShellExecute “wscript.exe”, Chr(34) & WScript.ScriptFullName & Chr(34) & ” Run”, , “runas”, 1
Else
GetObject(“winmgmts:\\.\root\default:Systemrestore”).CreateRestorePoint “Текущая Точка Восстановления”, 0, 100
End If

так и с выводом окна для введения наименования для точки восстановления:

If GetOS = “Windows 7″ Then
If WScript.Arguments.length =0 Then
Set objShell = CreateObject(“Shell.Application”)
objShell.ShellExecute “wscript.exe”, “”"” & _
WScript.ScriptFullName & “”"” & ” uac”,”", “runas”, 1
Else
CreateSRP
End If
End If

Sub CreateSRP

msg = “Точка восстановления успешно создана.” & vbCR
msg = msg & “” & vbCR
msg = msg & “Дата и время создания: ” & Date & ” ” & Time

Set SRP = getobject(“winmgmts:\\.\root\default:Systemrestore”)
sDesc = “”
sDesc = InputBox (“Введите описание для точки восстановления.”, “Создание точки восстановления системы”,”")
If Trim(sDesc) <> “” Then
sOut = SRP.createrestorepoint (sDesc, 0, 100)

If sOut <> 0 Then
WScript.echo “Error ” & sOut & _
“: Невозможно создать точку восстановления системы.”
Else
MsgBox msg

End If
End If
End Sub

Function GetOS
Set objWMI = GetObject(“winmgmts:{impersonationLevel=impersonate}!\\” & _
“.\root\cimv2″)
Set colOS = objWMI.ExecQuery(“Select * from Win32_OperatingSystem”)
For Each objOS in colOS

If instr(objOS.Caption, “Windows 7″) Then
GetOS = “Windows 7″

End If
Next
End Function

Для создания скрипта выполните следующие действия:

1) Скопируйте выбранный Вами код в любой текстовый редактор (например, Блокнот).
2) Нажмите CTRL+S и сохраните файл с любым именем и расширением .vbs в любой папке
3) Если вы выбираете тип файла: Текстовые файлы, то имя файла в кавычки брать обязательно. (Например: “crp.vbs”)
4) Если вы выбираете тип файла: Все файлы, то имя файла в кавычки брать не надо.
5) Создайте ярлык для созданного Вами файла скрипта в Автозагрузку.
6) Удерживая нажатой клавишу Alt перетяните иконку файла скрипта в папку Автозагрузка в меню Пуск.

Теперь при каждом входе в систему скрипт будет автоматически запускаться, и создавать контрольную точку восстановления системы.

Чтобы изменить периодичность создания точек восстановления сделайте следующее:

1) Запустите Планировщик заданий. Пуск -> Панель управления -> Администрирование -> Планировщик заданий

2) В дереве слева откройте Библиотека планировщика задач -> Microsoft -> Windows -> SystemRestore

3) Щелкните правой кнопкой мыши в верхнем среднем окне на файл SR и выберите Свойства.

4) В открывшемся окне перейдите на вкладку Триггеры.

5) Нажмите Создать и задайте необходимые вам временные параметры, либо выберите уже имеющийся триггер (Например, Ежедневно) и нажмите Изменить. Для удаления созданых триггеров выберите его и нажмите Удалить.

6) Нажмите на ОК для принятия изменений.

Удачного использования!

 

Источник: http://www.sevenart.net.ru/

Поделитесь полезным материалом с друзьями:


Вам помог этот совет? Вы можете помочь проекту, пожертвовав на его развитие любую сумму по своему усмотрению. Например, 20 рублей. Или больше :)

Передать $пасибо! нашему сайту через систему Webmoney
Комментарий: Starter24 мая 2012 14:05
применил скрипт, но точка не создалась почему так? Win7

А нет, всё работает спасибо! Нужно было просто перезагружаться.
Добавление комментария:
Ваше Имя:
Ваш E-Mail:

Полужирный Наклонный текст Подчёркнутый текст Зачёркнутый текст | Выравнивание по левому краю По центру Выравнивание по правому краю | Вставка смайликов Вставка ссылкиВставка защищённой ссылки Выбор цвета | Скрытый текст Вставка цитаты Преобразовать выбранный текст из транслитерации в кириллицу Вставка спойлера
Код:
Включите эту картинку для отображения кода безопасности
обновлять капчу