用 WshScriptExec 对象启动的过程的 ID (PID)。
Object.ProcessID
可以使用 ProcessID 属性来激活应用程序(作为 AppActivate 方法的参数)。
下面的代码使用 ProcessID 属性来激活计算器和笔记本应用程序。
Sub delayedSendKeys(str) WScript.Sleep 100 WshShell.SendKeys str End Sub Dim WshShell, oCalc, oNotepad Set WshShell = CreateObject("WScript.Shell") Set oCalc = WshShell.Exec("calc") Set oNotepad = WshShell.Exec("notepad") WScript.Sleep 500 WshShell.AppActivate oCalc.ProcessID
delayedSendKeys "1{+}1~" delayedSendKeys "^C" delayedSendKeys "%{F4}" WshShell.AppActivate oNotepad.ProcessID
delayedSendKeys "1 {+} 1 = ^V"
function delayedSendKeys(str) { WScript.Sleep(100); WshShell.SendKeys(str); } var WshShell = new ActiveXObject("WScript.Shell"); var oCalc = WshShell.Exec("calc"); var oNotepad = WshShell.Exec("notepad"); WScript.Sleep(500); WshShell.AppActivate(oCalc.ProcessID
); delayedSendKeys("1{+}1~"); delayedSendKeys("^C"); delayedSendKeys("%{F4}"); WshShell.AppActivate(oNotepad.ProcessID
); delayedSendKeys("1 {+} 1 = ^V");