WshNetwork.EnumPrinterConnections

機能

ネットワークプリンタを列挙します

 

サンプル

Set objNetwork = WScript.CreateObject("WScript.Network")
Set colPrinters = objNetwork.EnumPrinterConnections
WScript.Echo "ネットワーク・プリンタは" & (colPrinters.Count / 2) & "個あります。"
WScript.Echo "ネットワーク・プリンタの一覧を表示します:"
For i = 0 to colPrinters.Count - 1 Step 2
  Wscript.Echo colPrinters.Item(i) & " → " & colPrinters.Item (i + 1)
Next

 

参照

WshNetworkオブジェクト

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です