Find Hp Printer Model By Serial Number

How do I find the model, product, and serial number on my HP printer using bash command line options? There are many ways to get this information i.e. You can find out HP network printer serial number using bash shell on a Linux or Unix like systems. HP LaserJet, HP PageWide Enterprise - How to locate the model na.PageWide Enterprise - How to locate the model name, product number, and serial number This document describes how to find the model name, product number.

I'm looking for a VBScript or any other utility available to get the serial number of Lexmark printers.
I already have this little script that gives me other details of a specific printer
Dim objWMIService, objItem, colItems, strComputer
strComputer ='??????'
strprinter = InputBox('Enter Printer Name')
If strprinter = ' Then
wscript.quit
End If
Printer = '%' & ucase(strprinter) & '%'
Set objWMIService = GetObject('winmgmts:' & strComputer & 'rootCIMV2')
Set colItems = objWMIService.ExecQuery('SELECT * FROM Win32_Printer where Name like ' & printer & ' and Local=TRUE',,48)
For Each objItem In colItems
WScript.Echo objItem.name & VbCr & _
' & VbCr & _
'Availability: ' & objItem.Availability & VbCr & _
'Description: ' & objItem.Description & VbCr & _
'Printer: ' & objItem.DeviceID & VbCr & _
'Driver Name: ' & objItem.DriverName & VbCr & _
'Port Name: ' & objItem.PortName & VbCr & _
'Printer State: ' & objItem.PrinterState & VbCr & _
'Printer Status: ' & objItem.PrinterStatus & VbCr & _
'PrintJobDataType: ' & objItem.PrintJobDataType & VbCr & _
'Print Processor: ' & objItem.PrintProcessor & VbCr & _
'Spool Enabled: ' & objItem.SpoolEnabled & VbCr & _
'Separator File: ' & objItem.SeparatorFile & VbCr & _
'Queued: ' & objItem.Queued & VbCr & _
'Status: ' & objItem.Status & VbCr & _
'StatusInfo: ' & objItem.StatusInfo & VbCr & _
'Published: ' & objItem.Published & VbCr & _

Hp Printer Serial Number Location

'Shared: ' & objItem.Shared & VbCr & _

Hp Printer Serial Number Check

'ShareName: ' & objItem.ShareName & VbCr & _
'Direct: ' & objItem.Direct & VbCr & _
'Location: ' & objItem.Location & VbCr & _
'Priority: ' & objItem.Priority & VbCr & _
'Work Offline: ' & objItem.WorkOffline & VbCr & _
Find Hp Printer Model By Serial Number 'Horizontal Res: ' & objItem.HorizontalResolution & VbCr & _
'Vertical Res: ' & objItem.VerticalResolution & VbCr & _
'

Hp Printer Serial Number Lookup


Next

Find Hp Printer Model By Serial Number Lookup


Find Hp Printer Model By Serial Number Generator

WScript.Quit