윈 도 우 ContextMenu on/off
2020.02.08 20:19
실행은 -> .vbs
레지스트리 확인에 아래 3가지 방법 사용했습니다.
regValueNameExists
regKeyExists
RegRead
이런식으로 레지파일들을 추가해가면서 토글로 만드시면 편리 하겠죠.?
--- WIM부팅등록_우메뉴OnOff.vbs
스크립트시작
Set WSHShell = CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
curDir = fso.GetParentFolderName(WScript.ScriptFullName)
strREfile = curDir & "\RExplore.exe"
'------Using VBScript : regKeyExists------------------------
' RegLocate 에 체크할 레지키 경로(.......\) 입력
' 레지파일 경로는 절대경로를 사용하라.!!!
' ----------------------------------------------------------------------------------------
Dim RegLocate
RegLocate ="HKEY_CLASSES_ROOT\wimfile\shell\Wim 부팅 등록\"
On Error Resume Next
reg_value=WSHShell.RegRead (RegLocate)
Err_Number=err.number
On Error Goto 0
If err_number <> 0 Then '------없으니 만들어라-------------------------------------
WSHShell.Run("regedit.exe /s WIM부팅등록_우클릭on(uefi도ok).reg"), 0, True
wscript.echo "WIM부팅등록 만들어요. ^^"
else '----------------------------있으니 지워라---------------------------------------
WSHShell.Run("regedit.exe /s WIM부팅등록_우클릭off(uefi도ok).reg"), 0, True
wscript.echo "WIM부팅등록 지워요. ^^"
End If
WSHShell.Run Chr(34) & strREfile & Chr(34), 1
Set WSHShell = Nothing
감사합니다.