in

myITforum.com

Matt Broadstock at myITforum

Scripting away in Margaritaville

Finding SMS Packages without a specific sharename defined on DPs

I hate it when I am troubleshooting software distribution issues and the package is configured to deploy to the distribution points in the SMSPKG folder with a subfolder named after the Package ID. It seems to be a lot easier to figure things out if the package is configured to create a named folder on the SMSDist share. I put together a quick script to identify those packages so they can be updated. Just update the SMS server and site name...

On Error Resume Next
Dim strComputer, objWMIService, propValue, SWBemlocator, UserName, Password, colItems

strComputer = "smsserver"
UserName = ""
Password = ""
Set SWBemlocator = CreateObject("WbemScripting.SWbemLocator")
Set objWMIService = SWBemlocator.ConnectServer(strComputer,"\root\sms\site_XXX",UserName,Password)
Set colItems = objWMIService.ExecQuery("Select * from SMS_Package where ShareType='1' and PkgSourceFlag<>'1'",,48)
'ShareType = 1 means it doesn't have a specific sharename (will use SMSPKG folder)
'PkgSourceFlag = 1 means it doesn't have source files-need to exclude these

For Each objItem in colItems
 WScript.Echo objItem.PackageID & vbTab & objItem.Name
Next

Comments

No Comments
Copyright - www.myITforum.com, Inc. - 2007 All Rights reserved.
Powered by Community Server (Commercial Edition), by Telligent Systems