By Request VBS Script To Get A Specified Client Machines Resource ID

 

This By Request VBS script will allow you to retrieve the Resource ID for a specified Resource name.

 

VBS Script:

 

strComputer = InputBox("Enter Site Server Name")

strSiteCode = InputBox("Enter Site Code")

strMachineName = InputBox("Enter Machine Name")

 

Set objWMIService = GetObject("winmgmts://" & strComputer & "\root\sms\site_" & strSiteCode)

Set colItems = objWMIService.ExecQuery("Select * from SMS_R_System Where Name = '" & strMachineName & "'")

 

For Each objItem in colItems

MsgBox "The Machine : " & UCase(StrMachineName)  & " Has The ResourceId " & objItem.ResourceId

Next

 

 

 

Published Sunday, May 11, 2008 7:57 AM by dhite
Filed under:

Comments

No Comments