Classic Shell: Forum

How can i use 2 commands in the command section while editing a menu item ?

"%SystemDrive%\Program Files\Tools\desklock.exe";"%windir%\System32\rundll32.exe powrprof.dll,SetSuspendState "
& this
"%SystemDrive%\Program Files\Tools\desklock.exe";sleep
& this
"%SystemDrive%\Program Files\Tools\desklock.exe";"sleep"

without success .. .

The command can only run one thing. If you want to do multiple things you need to create a script of some sort, like .BAT or .VBS.

Ivo, i don't have programming skills, it would be cool if you could fix my vbs, i picked an ex online & it doesn't work:

the content of my vbs file:

Sub RunApplication(ByVal sFile)

Dim WShell : Set WShell = CreateObject("WScript.Shell")
WShell.Run Chr(34) & sFile & Chr(34), 8, false

End Sub

RunApplication "C:\Program Files\Tools\desklock.exe"
RunApplication "C:\Program Files\Tools\shutdown.exe" -s suspend -l 0"

Looks like you have an extra quote at the end.

Like i told you i don't have programming skills, i tried this:

Sub RunApplication(ByVal sFile)

Dim WShell : Set WShell = CreateObject("WScript.Shell")
WShell.Run Chr(34) & sFile & Chr(34), 8, false

End Sub

RunApplication "C:\Program Files\Tools\desklock.exe"
RunApplication "C:\Program Files\Tools\shutdown.exe" -s suspend -l 0

Then i tried this, still unsuccessfully.. >>

Sub RunApplication(ByVal sFile)

Dim WShell : Set WShell = CreateObject("WScript.Shell")
WShell.Run Chr(34) & sFile & Chr(34), 8, false

End Sub

RunApplication "C:\Program Files\Tools\desklock.exe"
RunApplication ""C:\Program Files\Tools\shutdown.exe" -s suspend -l 0"

Try this:


Sub RunApplication(ByVal sFile)

Dim WShell : Set WShell = CreateObject("WScript.Shell")
WShell.Run Chr(34) & sFile & Chr(34), 8, false

End Sub

RunApplication "C:\Program Files\Tools\desklock.exe"
RunApplication "C:\Program Files\Tools\shutdown.exe"" -s suspend -l 0"

_________________
Links to some general topics:

● Compare Start Menus

● Read the Search box usage guide.

I am a Windows enthusiast and did Classic Shell's testing and usability/UX feedback.

Thanks, fixed.