プリンタ名と通常使うプリンタなどの情報取得するサンプルプログラムです。 Win32_Printer クラスを使用しています。 Win32_Printer クラスの詳細に関しては、WMI Library 内のWin32_Printer クラスも参照してみて下さい。 従来の VB (VB6) 版のサンプルコードはこちらで公開しています。 Option Explicit 'WMIにて使用する各種オブジェクトを定義・生成する。 Dim oClassSet Dim oClass Dim oLocator Dim oService Dim sMesStr 'ローカルコンピュータに接続する。 Set oLocator = WScript.CreateObject("WbemScripting.SWbemLocator") Set oService = oLocator.ConnectServer 'クエ