wvxwxvw
Gold Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору coldunZZ Возможно автору самостоятельно нужно было добавить в команды пунктов передачу F5 проводнику, в версии 6.8 так и было, теперь зачем то убрали. Действительно работает если обновлять просмотр. Вот пример vbs крипта: Код: Hidden = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden" SHidden = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden" Set Sh = WScript.CreateObject("WScript.Shell") St = Sh.RegRead(SHidden) If St = 0 Then Sh.RegWrite Hidden, 1, "REG_DWORD" Sh.RegWrite SHidden, 1, "REG_DWORD" Else Sh.RegWrite Hidden, 1, "REG_DWORD" Sh.RegWrite SHidden, 0, "REG_DWORD" End If Sh.SendKeys("{F5}") |
|