Опиум
15-08-2023, 17:40
Давно не брал в руки шашки, загуглил, но не ожидал подвоха
' Copyright (c) Microsoft Corporation, All Rights Reserved
'***************************************************************************
'
' WMI Sample Script - Printer status (VBScript)
'
' This script demonstrates how to retrieve printer stats from instances of
' Win32_Printer.
'
'***************************************************************************
Set PrinterSet = GetObject("winmgmts:").InstancesOf ("Win32_Printer")
If (PrinterSet.Count = 0 ) Then WScript.Echo "No Printers Installed!"
for each Printer in PrinterSet
if Printer.PrinterStatus = 3 then WScript.Echo Printer.Name & Chr(13) & "Status: Idle"
if Printer.PrinterStatus = 4 then WScript.Echo Printer.Name & Chr(13) & "Status: Printing"
next
на w2008R2 все 25 принтеров отвечают Idle...и иногда Unknown
Посмотрел фирменные скрипты
C:\Windows\System32\Printing_Admin_Scripts\en-US>cscript prncnfg.vbs -g -p HP425
...
Printer status Idle
Extended printer status Unknown
Detected error state Unknown
Extended detected error state Unknown
тот же результат... хотя в самом скрипте значений статусов очень много.
Как получить адекватное инфо о статусе?
' Copyright (c) Microsoft Corporation, All Rights Reserved
'***************************************************************************
'
' WMI Sample Script - Printer status (VBScript)
'
' This script demonstrates how to retrieve printer stats from instances of
' Win32_Printer.
'
'***************************************************************************
Set PrinterSet = GetObject("winmgmts:").InstancesOf ("Win32_Printer")
If (PrinterSet.Count = 0 ) Then WScript.Echo "No Printers Installed!"
for each Printer in PrinterSet
if Printer.PrinterStatus = 3 then WScript.Echo Printer.Name & Chr(13) & "Status: Idle"
if Printer.PrinterStatus = 4 then WScript.Echo Printer.Name & Chr(13) & "Status: Printing"
next
на w2008R2 все 25 принтеров отвечают Idle...и иногда Unknown
Посмотрел фирменные скрипты
C:\Windows\System32\Printing_Admin_Scripts\en-US>cscript prncnfg.vbs -g -p HP425
...
Printer status Idle
Extended printer status Unknown
Detected error state Unknown
Extended detected error state Unknown
тот же результат... хотя в самом скрипте значений статусов очень много.
Как получить адекватное инфо о статусе?