Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Новый участник


Сообщения: 14
Благодарности: 5

Профиль | Отправить PM | Цитировать


To All Доброго времени суток...

Как вариант - vbs файл "Show/Hide System Files Context Menu Item v1.1 by Herby"
Закомментировал всплывающие сообщения. Скрипт автоматически обновляет содержимое папки (WSHShell.SendKeys "{F5}").

Код: Выделить весь код
'Show/Hide System Files by Herby

Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")
sTitle1 = "SSH=0"
sTitle2 = "SSH=1"

if WSHShell.RegRead("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden") = 1 then

WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden", "0", "REG_DWORD"
WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden", "2", "REG_DWORD"
WSHShell.SendKeys "{F5}"
'WSHShell.Popup "Poof, they're gone!", 1, sTitle1, vbInformation

else

WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden", "1", "REG_DWORD"
WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden", "1", "REG_DWORD"
WSHShell.SendKeys "{F5}"
'WSHShell.Popup "Here they are!", 1, sTitle2, vbInformation

end if

Set WSHShell = Nothing
WScript.Quit(0)
Для установки скопировать SuperHidden.vbs в System32 и применить Add SuperHidden.reg

Код: Выделить весь код
Windows Registry Editor Version 5.00

;Show/Hide System Files by Herby
[HKEY_CLASSES_ROOT\Directory\shell\SuperHidden]
@="Show/Hide System Files"

[HKEY_CLASSES_ROOT\Directory\shell\SuperHidden\command]
@="WScript.exe C:\\Windows\\System32\\SuperHidden.vbs"

Последний раз редактировалось Jekson07, 29-03-2009 в 12:07. Причина: Поместил в тег [code]...[/code]

Это сообщение посчитали полезным следующие участники:

Отправлено: 23:03, 28-03-2009 | #40