Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

How to pull computer serial number

39 views
Skip to first unread message

Br...@nospam.com

unread,
Jun 19, 2003, 11:22:28 AM6/19/03
to
Does anyone know which win32 class I can use to pull the serial number
for a computer. We use Dell desktops and IBM notebooks.

Thanks

Brent

juan

unread,
Jun 19, 2003, 11:33:56 AM6/19/03
to
Use scriptomatic tool and see how nice the job is and how it helps you
create WMI scripts

Juan

On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_ComputerSystemProduct",,48)
For Each objItem in colItems
Wscript.Echo "Caption: " & objItem.Caption
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "IdentifyingNumber: " & objItem.IdentifyingNumber
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "SKUNumber: " & objItem.SKUNumber
Wscript.Echo "UUID: " & objItem.UUID
Wscript.Echo "Vendor: " & objItem.Vendor
Wscript.Echo "Version: " & objItem.Version
Next


<Br...@nospam.com> wrote in message
news:MPG.195b91323...@news.supernews.com...

Brent

unread,
Jun 19, 2003, 11:50:03 AM6/19/03
to
In article <OFM36gn...@TK2MSFTNGP12.phx.gbl>, j_r...@earthlink.net
says...
Thanks Juan, I also found that you can pull the same information from
win_32 SystemEnclosure. The ComputerSystemProduct gives you the UUID,
and I need the service tag, which is shown as serial number in the
SystemEnclosure serial number.


Brent

juan

unread,
Jun 19, 2003, 11:56:05 AM6/19/03
to
Wscript.Echo "IdentifyingNumber: " & objItem.IdentifyingNumber

this give me on my systems service tag #

Juan
"Brent" <brent...@ftnfinancial.com> wrote in message
news:MPG.195b97a96...@news.supernews.com...

Ed

unread,
Jun 19, 2003, 12:00:22 PM6/19/03
to
Is this possible without WMI?
"juan" <j_r...@earthlink.net> wrote in message
news:%23mFBTtn...@tk2msftngp13.phx.gbl...
0 new messages