数年ぶりにWSHを記述しましたが、やはりかなり忘れていました。
VBもずっと使ってないし・・・
というわけで、復習も兼ねて記述方法と今回作ったプログラムの一部機能をメモ。
■基本
ファイル拡張子:vbs
記述:VBと同じ
変数:Dim hoge
配列:Dim hoge(x)
動的配列:Dim hoge() ReDim(x)
配列維持:ReDim Preserve
インスタンス生成:Set objHoge = WScript.CreateObject("hoge")
インスタンス破棄:Set objHoge = nothing
■実行中のプログラムを終了させたい
WScript.Quit
■IPアドレス取得
strComputer = "."Set objWMIService = GetObject _
("winmgmts:\\" & strComputer & "\root\cimv2")Set colItems = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration " & "Where IPEnabled = True")
For Each objItem in colItems
For Each objAddress in objItem.IPAddress
strIPAddress = objAddress
Next
Next