Опустим излишние рассуждения на тему, зачем нужно измерять скорость загрузки.Существует как минимум два простых способа измерения длительности загрузки операционной системы без дополнительных программ.
Способ #1 определения скорости загрузки – анализ журнала событий
Windows 7 собирает массу информации о работе системы. Полученные данные сохраняются в журналах событий, которых тоже великое множество. Каждая загрузка Windows также отслеживается Windows, а отчет сохраняется в журнале Diagnostics-Performance.
Для того, чтобы просмотреть этот отчет, откройте Пуск – Поиск – Журнал событий.
и перейдите в раздел Журналы приложений и служб – Microsoft – Windows – Diagnostics -Performance.
Если вы впервые входите в этот журнал, то может быть задержка при построении структуры журнала. Кликните на строке Журналы приложений и не спешите уходить, дождитесь, пока журнал не заполнится информацией
В этой ветке один журнал, и он работает. При выделении строки Работает справа будет показан список событий. Отчет о загрузке системы легко найти по коду события 100.
На вкладке Общие показана длительность загрузки в миллисекундах, то есть время загрузки моего компьютера – примерно 40 секунд.
Это время вычисляется от начала загрузки Windows (сразу после завершения загрузки BIOS) и до полной загрузки рабочего стола. Из этого времени нужно вычесть 10 секунд, чтобы получить реальное время загрузки.
Способ #2 – работа скрипта.
Кликните правой кнопкой мыши на свободном месте рабочего стола и выберите в контекстном меню Создать текстовый документ. Кликните дважды на созданной иконке, откройте файл и вставьте в него код скрипта.
Вот этот код:
Option Explicit
On Error Resume Next
Dim Wsh, Time1, Time2, Result, PathFile, MsgResult, MsgA, AppName, KeyA, KeyB, TimeDiff
MsgA = "Please close all running applications and click on OK."
KeyA = "HKEY_CURRENT_USER\Software\RestartTime\"
KeyB = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\RestartTime"
AppName = "Restart-Time"
Set Wsh = CreateObject("WScript.Shell")
PathFile = """" & WScript.ScriptFullName & """"
Result = wsh.RegRead(KeyA & "Times")
if Result = "" then
MsgResult = Msgbox (MsgA, vbOKCancel, AppName)
If MsgResult = vbcancel then WScript.Quit
Wsh.RegWrite KeyA & "Times", left(Time,8), "REG_SZ"
Wsh.RegWrite KeyB, PathFile, "REG_SZ"
Wsh.Run "cmd /c Shutdown -r -t 00", false, 0
else
Wsh.RegDelete KeyA & "Times"
Wsh.RegDelete KeyA
Wsh.RegDelete KeyB
TimeDiff = DateDiff("s",Result,left(Time,8))
MsgBox "Your computer restarts in " & TimeDiff & " seconds", VbInformation, AppName
end if
wscript.Quit
Сохраните файл как restart.vbs. Теперь кликните на нем, и ждите результата после перезагрузки системы.
Сравниваем полученные результаты.
Сначала – информация о системе:
А теперь – результаты измерения скорости загрузки .
Результаты разные, но это уже не так важно. Мы получили какие-то цифры, от которых мы будем отталкиваться при анализе загрузки системы для ускорения старта.
Предлагаю вам написать в комментариях свои результаты измерений.
В следующий раз мы подробно проанализируем запуск системы и попробуем исправить слабые места.
источник