The VNC Manager - SmartCode Solutions Forum / General Discussion / SmartCode VNC Manager / VB Script to show Serial Number or Service tag / Latest Posts

RE: VB Script to show Serial Number or Service tag

TomT — Tue, 19 Aug 2008 05:04:42 GMT

That works brilliantly now :)

Cheers

RE: VB Script to show Serial Number or Service tag

Support (s-code) — Tue, 19 Aug 2008 02:21:45 GMT

That's because the script posted by jeffs24 has strComputer variable assigned to localhost (".")

You should replace the first line with:
strComputer = WScript.Arguments.Item(0)

RE: VB Script to show Serial Number or Service tag

TomT — Tue, 19 Aug 2008 01:01:37 GMT

I have followed your guide above. The problem is though this only returns the localhost service tag and not the remote host.

I would prefer it to return the remote computers service tag.

RE: VB Script to show Serial Number or Service tag

Support (s-code) — Mon, 18 Aug 2008 22:14:25 GMT

In case if you want to create an external tool launching a VBscript you should enter the following values into the properties dialog:

Command: cscript.exe
Arguments: [Path to your .vbs file] , you can also enter optional arguments like ($SERVER_IP)

Most probably you would have to have "Keep console window" checkbox checked.

RE: VB Script to show Serial Number or Service tag

TomT — Mon, 18 Aug 2008 08:43:31 GMT

How do we link this .vbs script up to work in VNC manager?

The limited help files only go as far as explaining how to add a .exe file...

VB Script to show Serial Number or Service tag

jeffs24 — Wed, 21 May 2008 07:18:44 GMT

Hey guys, I have just started using VNC Manager and I have to say it is very impressive! well worth the cost!

anyway,

here is a VB Script that you can remote execute to get the Manufacturer of the machine as well as the serial number. I have tested this with HP and the serial number displays just as it should... I tested it on a dell machine and was plesently suprised to see that it flawlessly displays the service tag so every dell I tried it on. very handy to have that information remotely at a click of a mouse.

here is the code:

[code]strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colBIOS = objWMIService.ExecQuery _
("Select * from Win32_BIOS")
For each objBIOS in colBIOS
WScript.StdOut.WriteLine "Manufacturer: " & objBIOS.Manufacturer
WScript.StdOut.WriteLine "Serial Number: " & objBIOS.SerialNumber
Next[/code]

I got this script from HP's website and edited it so the output would work with VNC Manager.

the original script is located here:

http://h41111.www4.hp.com/hps/carepack/emea_middle_east/en/getserial.html

have to give credit where credit is due! ;)