gutasiho
Gold Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Iacoyn vbs будет работать, если подправить, чтобы выглядел, как ниже. Ставит и снимает птички сразу в двух местах и обновляет рабочий стол. Рабочее решение, спасибо. На этой базе можно сделать раздельные скрипты для Hidden и SuperHidden. Код: Hidden = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden" SSHidden = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden" Set Command1 = WScript.CreateObject("WScript.Shell") Check = Command1.RegRead(Hidden) If Check = 1 Then Command1.RegWrite Hidden, 0, "REG_DWORD" Command1.RegWrite SSHidden, 0, "REG_DWORD" Else Command1.RegWrite Hidden, 1, "REG_DWORD" Command1.RegWrite SSHidden, 1, "REG_DWORD" End If Command1.SendKeys "{F5}" | ZZZerrrrgg При двойном клике vbs должен открываться не в проводнике, а в , ассоциируй, а F5 в коде обновляет рабочий стол. |