Flasher

|
Posted: Fri Apr 01, 2011 22:34 Post subject: |
|
|
Пожалуйста. Если надо удалить, а не очистить, то так:
Code: | With CreateObject("WScript.Shell")
.RegDelete "HKCR\.dat\"
End With | Эффект будет тот же. Воссоздать всегда можно с помощью соотв. установщика
или в диалоге "Файловые ассоциации" (cm_Associate).
Можно ещё, в принципе, такую кнопку использовать: Code: | TOTALCMD#BAR#DATA
%COMMANDER_PATH%\Scripts\DeleteFileAssociation.vbs
%E
wcmicons.dll,69
Удалить системную ассоциацию для расширения файла под курсором |
скрипт для неё, соответственно, будет таким:
Code: | With CreateObject("WScript.Shell")
on Error resume Next
.RegDelete("HKCR\."+WScript.Arguments(0)+"\")
.RegDelete("HKCR\"+WScript.Arguments(0)+"_file\")
.RegDelete("HKCR\"+WScript.Arguments(0)+"file\")
End With |
|
|