<div>
Thanks, that does get the script to work. &nbsp;I was just hoping that wouldn't have to install it before getting the script to work.
</div>


Thanks, that does get the script to work.  I was just hoping that wouldn't have to install it before getting the script to work.

<div>
<div class="content wysiwyg-content">
Trying to get VBScript to return the Dell Service Tag or &quot;Serial Number&quot; from the BIOS. &nbsp;Can get it to work ok in Win2K/XP but have a problem in Windows 98. &nbsp;<br />
<br />
Does the WMI Win32_SystemEnclosure class even work in Windows 98?<br />
<br />
Here is the script that works for Win2k/XP.<br />
<br />
strComputer = &quot;.&quot;<br />
Set objWMIService = GetObject(&quot;winmgmts:&quot; _<br />
&amp;&nbsp;&quot;{impersonationLevel=imper<wbr />sonate}!\\<wbr />&quot; &amp;&nbsp;strComputer &amp;&nbsp;&quot;\root\cimv2&quot;)<br />
Set colSMBIOS = objWMIService.ExecQuery _<br />
(&quot;Select * from Win32_SystemEnclosure&quot;)<br />
For Each objSMBIOS in colSMBIOS<br />
Wscript.Echo &quot;Serial Number: &quot;&nbsp;&amp; objSMBIOS.SerialNumber<br />
Wscript.Echo &quot;Asset Tag: &quot;&nbsp;&amp; objSMBIOS.SMBIOSAssetTag<br />
Next
</div>
</div>


Trying to get VBScript to return the Dell Service Tag or "Serial Number" from the BIOS.  Can get it to work ok in Win2K/XP but have a problem in Windows 98.  

Does the WMI Win32_SystemEnclosure class even work in Windows 98?

Here is the script that works for Win2k/XP.

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colSMBIOS = objWMIService.ExecQuery _
("Select * from Win32_SystemEnclosure")
For Each objSMBIOS in colSMBIOS
Wscript.Echo "Serial Number: " & objSMBIOS.SerialNumber
Wscript.Echo "Asset Tag: " & objSMBIOS.SMBIOSAssetTag
Next

Using VBScript to return the Dell Service Tag

Visual Basic is Microsoft’s event-driven programming language and integrated development environment (IDE) for its Component Object Model (COM) programming model. It is relatively easy to learn and use because of its graphical development features and BASIC heritage. It has been replaced with VB.NET, and is very similar to VBA (Visual Basic for Applications), the programming language for the Microsoft Office product line.