初期에는 1970年代 末에 처음 開發된 配置 言語보다 더 强力한 自動化 道具 檢索에 對한 支援을 윈도우 管理者로부터 받았다. VB스크립트는 호스트 環境 안에서 實行되어야 하며, 어떠한 環境에서는 마이크로소프트 윈도우의 標準 設置(
윈도우 스크립트 호스트
,
윈도우 인터넷 익스플로러
) 위에 提供된다. 게다가 VB스크립트 호스트 環境은 마이크로소프트 스크립트 컨트롤(
msscript.ocx
)과 같은 技術을 통해 다른 프로그램에 移植되는 境遇가 있다.
다음 예제는 Microsoft Windows NT 시스템의 WMI(Windows Management Instrumentation) 서비스를 利用하여
메모帳
프로그램의 프로세스(notepad.exe)를 終了시킨다.
Option
Explicit
' 變數 宣言 要求
On
Error
Resume
Next
' 誤謬가 發生해도 速行
Const
ProcessToKill
=
"notepad.exe"
' 終了할 프로세스 名 指定 (notepad.exe)
Dim
oWMI
,
oQuery
,
oProc
,
iCount
' 變數 宣言
Set
oWMI
=
GetObject
(
"winmgmts:"
)
' 로컬 컴퓨터의 WMI 서비스에 接續하여 WMI 서비스 個體 取得
If
Not
IsObject
(
oWMI
)
Or
oWMI
Is
Nothing
Then
' WMI 서비스 個體를 얻는 데에 失敗했다면
' 誤謬 메시지 出力
MsgBox
"WMI 서비스가 實行 中이 아닙니다."
&
vbCrLf
&
vbCrLf
&
_
"이 스크립트는 윈도우 NT 以上, WMI 서비스가 實行 中인 컴퓨터에서만 實行 可能합니다."
,
vbCritical
' 終了 코드 1番으로 스크립트 實行 終了
WScript
.
Quit
1
End
If
' WMI 서비스에 쿼리를 보내 ProcessToKill 상수에 指定된 프로세스와 같은 프로세스 個體를 檢索函
Set
oQuery
=
oWMI
.
ExecQuery
(
"SELECT * FROM win32_process WHERE Name = '"
&
ProcessToKill
&
"'"
)
iCount
=
0
' 프로세스 카운트 變數 初期化
' 쿼리 內에 檢索된 各各의 모든 個體(프로세스 個體) oProc 들에 對해
For
Each
oProc
In
oQuery
oProc
.
Terminate
' 프로세스를 强制로 終了
iCount
=
iCount
+
1
' 프로세스 카운트를 하나 增加
Next
' oProc
' 結果를 使用者에게 出力
If
iCount
>
0
Then
WScript
.
Echo
"總 "
&
iCount
&
" 個의 메모帳 프로세스가 終了되었습니다."
Else
WScript
.
Echo
"컴퓨터에 實行 中인 메모帳 프로세스를 發見할 수 없었습니다."
End
If
' 個體의 인스턴스를 解除함
Set
oProc
=
Nothing
Set
oQuery
=
Nothing
Set
oWMI
=
Nothing