mirror of
https://github.com/Foundry376/Mailspring.git
synced 2024-11-15 06:06:35 +08:00
13 lines
334 B
Text
13 lines
334 B
Text
|
Set Shell = CreateObject("Shell.Application")
|
||
|
|
Set WShell = WScript.CreateObject("WScript.Shell")
|
||
|
|
Set ProcEnv = WShell.Environment("PROCESS")
|
||
|
|
|
||
|
|
cmd = ProcEnv("CMD")
|
||
|
|
app = ProcEnv("APP")
|
||
|
|
args= Right(cmd,(Len(cmd)-Len(app)))
|
||
|
|
|
||
|
|
If (WScript.Arguments.Count >= 1) Then
|
||
|
|
Shell.ShellExecute app, args, "", "runas", 0
|
||
|
|
Else
|
||
|
|
WScript.Quit
|
||
|
|
End If
|