Как сбросить настройки панели задач на настройки Windows по умолчанию

Повреждение настроек панели задач может привести к тому, что она не сохранит ваши настройки, такие как автоматическое скрытие, размер значка или настройки панели инструментов. Кроме того, в некоторых ситуациях панель задач не может быть пристыкована к определенной позиции. В этом сообщении есть VBScript, который сбрасывает настройки панели задач для вашей учетной записи пользователя по умолчанию.

полностью сбросить панель задачРис. 1. Повреждение настроек панели задач, в результате чего образовался зазор внизу.

Сброс настроек панели задач

Примечание. Этот сценарий очистит ярлыки закрепленной панели задач и удалит все панели инструментов, добавленные на панель задач. Вы можете добавить их снова. Скрипт можно использовать в Windows Vista, 7, 8 и 10.

Загрузите файл taskbar_reset.zip, распакуйте его и извлеките прилагаемый файл скрипта в папку. Дважды щелкните файл сценария (taskbar_reset.vbs), чтобы запустить его.

полностью сбросить панель задач

Нажмите Да, чтобы продолжить. Дайте ему примерно 5 секунд или около того … скрипт перезапустит Проводник и восстановит настройки панели задач по умолчанию.

Содержание скрипта

'--
'Resets the Taskbar configuration
'This script can be used in Windows Vista, 7, 8 and 10.
'© 2016 Ramesh Srinivasan
'Created on March 24, 2016
'https://www.winhelponline.com/blog
'--
Set WshShell = WScript.CreateObject("WScript.Shell")
strRegPath = "HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\"
strkey0 = "HKCU\Software\Classes\Local Settings\Software\Microsoft\Windows\CurrentVersion\TrayNotify\"
strkey1 = strRegPath & "StuckRects2\"
strkey2 = strRegPath & "StuckRects3\"
strkey3 = strRegPath & "Taskband\"
strkey4 = strRegPath & "Streams\Desktop\TaskbarWinXP"
sMsgTitle = "Taskbar Settings Reset"
sMsgCompleted = "Taskbar settings have been reset."
ExitExplorerShell
WScript.Sleep(3000)
ClearTaskbarSettings
WScript.Sleep(2000)
StartExplorerShell
Sub ExitExplorerShell()
strmsg = "Explorer Shell will be terminated now. Click Yes to continue."
rtnStatus = MsgBox (strmsg, vbYesNo, sMsgTitle)
If rtnStatus = vbYes Then
For Each Process in GetObject("winmgmts:"). _
ExecQuery ("select * from Win32_Process where name='explorer.exe'")
Process.terminate(1)
Next
ElseIf rtnStatus = vbNo Then
WScript.Quit
End If
End Sub
Sub StartExplorerShell()
WshShell.Run "explorer.exe"
strWelcome = "For more tips and articles on Windows, visit us at:" & Chr(10) & Chr(10) & vbtab & "https://www.winhelponline.com/blog"
MsgBox "Completed!" & Chr(10) & Chr(10) & strWelcome & Chr(10),64, sMsgCompleted
End Sub
Sub ClearTaskbarSettings()
On Error resume Next
WshShell.Regdelete strkey0 & "IconStreams"
WshShell.Regdelete strkey0 & "PastIconsStream"
WshShell.Regdelete strkey1
WshShell.Regdelete strkey2
WshShell.Regdelete strkey3
WshShell.Regdelete strkey4
On Error goto 0
End Sub

Надеюсь, что этот скрипт исправил проблемы с панелью задач, полностью сбросив конфигурацию. Теперь все, что вам нужно сделать, это снова прикрепить значки. Если вы добавили дополнительные панели инструментов на панель задач, вам нужно будет добавить их снова.

Связанная статья: Как исправить пробел, который появляется в нижней части значков панели задач?

Ссылка на основную публикацию
Adblock
detector