Hi
I'm using v4.5.6(2427) and would like to enable the following in the
Script\VBScript folder:
Const module_name = "Feature request"
Const module_ver = "1.0"
Public objShell : Set objShell = wScript.CreateObject("wScript.Shell")
Sub Init
addMenuItem "Test ONE","MyMenu","ExeRun("One.exe", "y")",""
addMenuItem "Test TWO","MyMenu","ExeRun("Two.exe", "n")",""
End Sub
Function ExeRun(sOne, sTwo)
oShell.run(sOne & " " & sTwo)
End Function
The reason is that I might have 20-30 external programs, that I want to enable,
and I know, that I can enable them using 20-30 Subs like:
Sub One
oShell.run("One.exe y")
End Sub
Sub Two
oShell.run("Two.exe n")
End Sub
;O) YES I know, that I must test about if there is any content in sTwo in
Function ExeRun, and that the 2 subs above is different than Function ExeRun,
but the above is only to show you, what I mean, and I hope you understand my
feature request.
--
<http://forum.pspad.com/read.php?2,58078,58078>
PSPad freeware editor http://www.pspad.com
