I'm Robert Marshall, director and principle consultant at SMSMarshall Ltd, who's specialism is in the Microsoft System Center 2012 Configuration Manager product and all of its dependent products, covering all aspects from Architecture, Implementation, Migration to Break-Fix.
I've been in front of computers for over 30 years now, with my roots in programming 8 bit computers, I've taken an often exciting journey which has led to becoming an expert in an enterprise product. I consider my career as starting 17 years ago, when I began my first serious role as a deployment engineer. I've seen 8 bit through to 64 bit, the rise and refinement of the interface we take for granted now, the rise of the Internet from land-line based modem access for the few, to the powerful broadband connections we have today for the masses, I saw mobile phones come into existence, and I've seen Microsoft evolve from more than a handful of employees to the company it is now, while pretty much tinkering with every OS they have released, as well as seeing an industry that has evolved around those humble beginnings to become what we have today. I'm a keen technical puzzle solver, I love to solve gnarly problems around my area of specialism. And, I love to share when I have time. I hope you enjoy the blog.
A collegue of mine is currently tasked with looking at inventory for some clients, and he needs to invoke Resource Explorer quite a bit ... it's a time consuming process, as he has to first ID the client in the console (slow), right click (context menus can sometimes be slow to render) and launch Resource Explorer, all of which incurs a significant time penalty across the day.
Anyway, he could work this a bit more efficiently, so I showed him how:
' Script to launch Resource Explorer against a particular machine using a WMI query to return the ResourceID
' R Marshall - 2010
Dim strComputerName, WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
strComputerName = ""
While strComputerName = "" or strSiteServer = ""
' Ignoring cancel, requires input for both input boxes or cannot run
' strSiteServer = "<YOURSERVERNAME>"
strSiteServer = inputBox("Enter the Site server name", "Connect to site server")
strComputerName = inputBox("Enter the Machines name", "Launch Resource Explorer")
WshShell.Run("mmc G:\sms\AdminUI\bin\resourceexplorer.msc -s -sms:ResExplrQuery=" & CHR(34) & "SELECT ResourceID FROM SMS_R_SYSTEM WHERE Name = '" & strComputerName & "'" & CHR(34) & " -sms:connection=\\" & strSiteServer & "\root\sms\site_ric")
Set WshShell = Nothing
You can hard code in the Site server name and comment out the prompt for Site Server name to shave some time off using the script ..
Took a few minutes to write this up, here's the resource I used to figure out how to call Resource Explorer: http://technet.microsoft.com/en-us/library/bb693736.aspx
Leave you to work out the permissions needed ...