WMIの使い方

質問

ＶＢスクリプトでＷＭＩを使ってＰＣのハードウェア情報を
取り込むプログラムを作りました。
しかし、前提としてＶＢのツール/参照設定で
　　「Microsoft WMI Scripting v1.2 Libray」
にチェックを入れる必要があります。
これを明示的にプログラムの中で設定してしまう方法は
ないものでしょうか。

回答No.1

nda23 · ベストアンサー

>ＶＢスクリプトで
VBスクリプトは変数型は定義できないし、参照設定も無いのでは？
VB6.0系（VBA含む）プログラムの間違いではないですか？

>「Microsoft WMI Scripting v1.2 Libray」にチェックを入れる必要があります。
参照設定の操作は必須ではありません。
変数の定義時に「 As SWbemxxxx 」と記述しなければ良いだけです。
但し、New キーワードを使ってインスタンスを生成している所は
CreateObject、またはGetObjectでインスタンスを生成するように
変更します。

【例】
Dim Locator As SWbemLocator
Set Locator = New SWbemLocator
　　　　　　　　↓
Dim Locator
Set Locator = CreateObject("WbemScripting.SWbemLocator")

お礼

こんばんは、ご回答ありがとうございました。
言葉が曖昧で失礼しました。
早速、【例】のとおり記述し、参照設定のチェックを外して
動かしてみましたが、意図したとおりに動いてくれました。
また、New キーワードを使った場合は、参照設定で
　「Microsoft WMI Scripting v1.2 Libray」
にチェックが必要でした。
ありがとうございました。