在新過程中運(yùn)行程序。
object.Run(strCommand, [intWindowStyle], [bWaitOnReturn])
Run 方法返回一個(gè)整數(shù)。Run 方法啟動(dòng)在新 Windows 進(jìn)程中運(yùn)行的程序。可以讓腳本等到程序執(zhí)行完后再繼續(xù)執(zhí)行。這允許您同步運(yùn)行腳本和程序。strCommand 參數(shù)內(nèi)的環(huán)境變量自動(dòng)擴(kuò)展。如果某個(gè)文件類型已正確注冊到某個(gè)程序中,則對(duì)該類型的文件調(diào)用 Run 方法時(shí)將執(zhí)行該程序。例如,如果您的計(jì)算機(jī)系統(tǒng)中裝有 Word,則對(duì) *.doc 文件調(diào)用 Run 方法時(shí)將啟動(dòng) Word 并加載該文檔。下表列出了 intWindowStyle 的可用設(shè)置。
intWindowStyle | 說明 |
---|---|
0 | 隱藏一個(gè)窗口并激活另一個(gè)窗口。 |
1 | 激活并顯示窗口。如果窗口處于最小化或最大化狀態(tài),則系統(tǒng)將其還原到原始大小和位置。第一次顯示該窗口時(shí),應(yīng)用程序應(yīng)指定此標(biāo)志。 |
2 | 激活窗口并將其顯示為最小化窗口。 |
3 | 激活窗口并將其顯示為最大化窗口。 |
4 | 按最近的窗口大小和位置顯示窗口�;顒�(dòng)窗口保持活動(dòng)狀態(tài)。 |
5 | 激活窗口并按當(dāng)前的大小和位置顯示它。 |
6 | 最小化指定的窗口,并按照 Z 順序激活下一個(gè)頂部窗口。 |
7 | 將窗口顯示為最小化窗口。活動(dòng)窗口保持活動(dòng)狀態(tài)。 |
8 | 將窗口顯示為當(dāng)前狀態(tài)。活動(dòng)窗口保持活動(dòng)狀態(tài)。 |
9 | 激活并顯示窗口。如果窗口處于最小化或最大化狀態(tài),則系統(tǒng)將其還原到原始大小和位置。還原最小化窗口時(shí),應(yīng)用程序應(yīng)指定此標(biāo)志。 |
10 | 根據(jù)啟動(dòng)應(yīng)用程序的程序狀態(tài)來設(shè)置顯示狀態(tài)。 |
下面的 VBScript 代碼用記事本打開當(dāng)前運(yùn)行腳本的副本。
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run
"%windir%\notepad " & WScript.ScriptFullName
下面的 VBScript 代碼與上述代碼完成的操作相同,不同之處在于,它指定窗口類型,等待用戶關(guān)閉記事本,關(guān)閉記事本時(shí)保存從記事本返回的錯(cuò)誤代碼。
Set WshShell = WScript.CreateObject("WScript.Shell") Return = WshShell.Run(
"notepad " & WScript.ScriptFullName, 1, true)
下面的 VBScript 代碼打開一個(gè)命令窗口,將路徑改為 C:\,并執(zhí)行 DIR 命令。
Dim oShell Set oShell = WScript.CreateObject ("WSCript.shell") oShell.run "cmd /K CD C:\ & Dir" Set oShell = Nothing