<http://forum.pspad.com/read.php?f=2&i=10806&t=10776> ----------------------------------------------------------------
Const module_name = "Dont double post" 'this name must be
unique !!!
Const module_ver = "1.00" 'version
Sub SaveAllExit
Set SH = Wscript.CreateObject("WScript.Shell")
SH.SendKeys "%FL"
SH.SendKeys "%{F4}"
End Sub
Sub Init
menuName = "&" & module_name
addMenuItem "Save All & Exit" , menuName, "SaveAllExit",
"Alt+F3"
End Sub
[%sig%]
--
PSPad freeware editor http://www.pspad.com
