7b12a8ca91
Extra files for the tools are now stored in WK\_include and copied into place during the build.
33 lines
No EOL
1.2 KiB
Text
33 lines
No EOL
1.2 KiB
Text
'// DISCLAIMER
|
|
'// THIS COMES WITH NO WARRANTY, IMPLIED OR OTHERWISE. USE AT YOUR OWN RISK
|
|
'// IF YOU ARE NOT COMFORTABLE EDITING THE REGISTRY THEN DO NOT USE THIS SCRIPT
|
|
'//
|
|
'// NOTES:
|
|
'// This affects all users.
|
|
'// This will prevent ANY executable named notepad.exe from running located anywhere on this computer!!
|
|
'//
|
|
'// Save this text to your notepad++ folder as a text file named npp.vbs (some AV don't like vbs, get a different AV :-P )
|
|
'//
|
|
'// USAGE
|
|
'// 1)
|
|
'// Navigate to registry key HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\
|
|
'//
|
|
' // 2)
|
|
'// Add new subkey called notepad.exe
|
|
'// This step is what tells windows to use the notepad++ exe, to undo simply delete this key
|
|
'//
|
|
'// 3)
|
|
'// Create new Sting Value called Debugger
|
|
'//
|
|
'// 4)
|
|
'// Modify value and enter wscript.exe "path to npp.vbs" e.g. wscript.exe "C:\Program Files\Notepad++\npp.vbs"
|
|
|
|
Option Explicit
|
|
Dim sCmd, x
|
|
sCmd = """" & LeftB(WScript.ScriptFullName, LenB(WScript.ScriptFullName) - LenB(WScript.ScriptName)) & "notepad++.exe" & """ """
|
|
For x = 1 To WScript.Arguments.Count - 1
|
|
sCmd = sCmd & WScript.Arguments(x) & " "
|
|
Next
|
|
sCmd = sCmd & """"
|
|
CreateObject("WScript.Shell").Run sCmd, 1, True
|
|
WScript.Quit |