如何修改程式支援的平臺

您的應用程式可以藉由取得 和 類別的特定實 SMS_PackageSMS_Program 例，然後將 類別的 SMS_OS_Details 實例新增至 屬性，在Configuration Manager中將支援的平臺新增至 SupportedOperatingSystems 套件。

修改程式支援的平臺

1. 設定與 SMS 提供者的連線。

2. 使用 SMS_Package 類別取得現有的封裝物件。

3. 使用 SMS_Program 類別取得現有的程式物件。

4. 建立並填入 類別的 SMS_OS_Details 實例。

5. 將新的 SMS_OS_Details 實例新增至 SupportedOperatingSystems 步驟 3) (程式物件的 屬性。

範例

下列範例方法示範如何為程式新增支援的平臺。

注意事項

這個範例稍有變化，可能會變更與特定封裝相關聯之所有程式的屬性值。 如需範例，請參閱 如何列出所有程式及其執行時間上限值 程式碼範例。 不過，如需使用 PackageID 和 ProgramName 存取特定程式的更有效率方法，請參閱 如何修改程式屬性 程式碼範例。

如需呼叫範例程式碼的相關資訊，請參閱呼叫Configuration Manager程式碼片段。

Sub ModifySupportedPlatformsForProgram(connection,          _
                                       existingPackageID,   _
                                       existingProgramName, _
                                       newMaxVersion,       _
                                       newMinVersion,       _
                                       newName,             _
                                       newPlatform)

' Define a constant with the hexadecimal value for RUN_ON_ANY_PLATFORM.
    Const wbemFlagReturnImmediately = 16
    Const wbemFlagForwardOnly = 32
    Const RUN_ON_ANY_PLATFORM = &H08000000
    Dim packageQuery
    Dim package
    Dim allProgramsForPackage
    Dim programQuery
    Dim program
    Dim programPath
    Dim checkPlatformValue
    Dim tempSupportedPlatform
    Dim tempSupportedPlatformsArray
    ' Build a query to get the specified package.
     packageQuery = "SMS_Package.PackageID='" & existingPackageID & "'"
    ' Run the query to get the package.
    Set package = connection.Get(packageQuery)
    ' Output package name and ID.
    WScript.Echo "Package ID:     "  & package.PackageID
    WScript.Echo "Package Name:   "  & package.Name
    ' Build a query to get the programs for the package.
    programQuery = "SELECT * FROM SMS_Program WHERE PackageID='" & existingPackageID & "'"
    ' Run the query to get the programs.
    Set allProgramsForPackage = connection.ExecQuery(programQuery, , wbemFlagForwardOnly Or wbemFlagReturnImmediately)
    'The query returns a collection of program objects that needs to be enumerated.
    For Each program In allProgramsForPackage
        If program.ProgramName = existingProgramName Then
            ' Get all program object properties (in this case we specifically need some lazy properties).
            programPath = program.Put_
            programPath = Mid(programPath, InStr(1, programPath, ":") + 1)
            Set program = connection.Get(programPath)
            ' Check whether RUN_ON_ANY_PLATFORM is set.
            checkPlatformValue = (program.ProgramFlags AND RUN_ON_ANY_PLATFORM)
            If checkPlatformValue <> 0 Then
               ' RUN_ON_ANY_PLATFORM is set. Removing RUN_ON_ANY_PLATFORM value.
                program.ProgramFlags = (program.ProgramFlags XOR RUN_ON_ANY_PLATFORM)
            End If
            ' Output the program name that is being checked for supported platforms.
            WScript.Echo "Program Name: "  & program.ProgramName
            ' Create
            Set tempSupportedPlatform = connection.Get("SMS_OS_Details").SpawnInstance_
            ' Populate tempSupportedPlatform values.
            tempSupportedPlatform.MaxVersion = newMaxVersion
            tempSupportedPlatform.MinVersion = newMinVersion
            tempSupportedPlatform.Name       = newName
            tempSupportedPlatform.Platform   = newPlatform
            ' Get the array of supported operating systems.
            tempSupportedPlatformsArray = program.SupportedOperatingSystems
            ' Add the new supported platform values (object) to the temporary array.
            ReDim Preserve tempSupportedPlatformsArray (Ubound(tempSupportedPlatformsArray) + 1)
            Set tempSupportedPlatformsArray(Ubound(tempSupportedPlatformsArray)) = tempSupportedPlatform
            ' Replace the SupportedOperatingSystems object array with the new updated array.
            program.SupportedOperatingSystems = tempSupportedPlatformsArray
            ' Save the program.
            program.Put_
            ' Output success message.
            WScript.Echo "Supported Platforms Updated "
        End If
    Next
End Sub

public void ModifyProgramSupportedPlatforms(WqlConnectionManager connection,
                                    string existingPackageID,
                                    string existingProgramNameToModify,
                                    string newMaxVersion,
                                    string newMinVersion,
                                    string newName,
                                    string newPlatform)
{
    try
    {
        // Define a constant with the hexadecimal value for RUN_ON_ANY_PLATFORM.
        const Int32 RUN_ON_ANY_PLATFORM = 0x08000000;

        // Build query to get the programs for the package.
        string query = "SELECT * FROM SMS_Program WHERE PackageID='" + existingPackageID + "'";

        // Load the specific program to change (programname is a key value and must be unique).
        IResultObject programsForPackage = connection.QueryProcessor.ExecuteQuery(query);

        // The query returns a collection that needs to be enumerated.
        foreach (IResultObject program in programsForPackage)
        {
            // If a match for the program name is found, make the change(s).
            if (program["ProgramName"].StringValue == existingProgramNameToModify)
            {
                // Get all properties, specifically the lazy properties, for the program object.
                program.Get();

                // Check whether RUN_ON_ANY_PLATFORM is already set.
                Int32 checkPlatformValue = (program["ProgramFlags"].IntegerValue & RUN_ON_ANY_PLATFORM);

                if (checkPlatformValue != 0)
                {
                    // RUN_ON_ANY_PLATFORM is set. Removing RUN_ON_ANY_PLATFORM value.
                    program["ProgramFlags"].IntegerValue = program["ProgramFlags"].IntegerValue ^ RUN_ON_ANY_PLATFORM;
                }

                // Create a new array list to hold the supported platform window objects.
                List<IResultObject> tempSupportedPlatformsArray = new List<IResultObject>();

                // Create and populate a temporary SMS_OS_Details object with the new operating system values.
                IResultObject tempSupportedPlatformsObject = connection.CreateEmbeddedObjectInstance("SMS_OS_Details");

                // Populate temporary SMS_OS_Details object with the new supported platforms values.
                tempSupportedPlatformsObject["MaxVersion"].StringValue = newMaxVersion;
                tempSupportedPlatformsObject["MinVersion"].StringValue = newMinVersion;
                tempSupportedPlatformsObject["Name"].StringValue = newName;
                tempSupportedPlatformsObject["Platform"].StringValue = newPlatform;

                // Populate the local array list with the existing supported platform objects (type SMS_OS_Details).
                tempSupportedPlatformsArray = program.GetArrayItems("SupportedOperatingSystems");

                // Add the newly created service window object to the local array list.
                tempSupportedPlatformsArray.Add(tempSupportedPlatformsObject);

                // Replace the existing service window objects from the target collection with the temporary array that includes the new service window.
                program.SetArrayItems("SupportedOperatingSystems", tempSupportedPlatformsArray);

                // Save the new values in the collection settings instance associated with the Collection ID.
                program.Put();

                // Output program name.
                Console.WriteLine("Modified program: " + program["ProgramName"].StringValue);
            }
        }
    }
    catch (SmsException ex)
    {
        Console.WriteLine("Failed to modify the program. Error: " + ex.Message);
        throw;
    }
}

範例方法具有下列參數：

參數	Type	描述
connection	-管理： WqlConnectionManager - VBScript： SWbemServices	SMS 提供者的有效連線。
existingPackageID	-管理： String - VBScript： String	現有封裝的套件識別碼。
existingProgramName	-管理： String - VBScript： String	現有程式的程式名稱。
newMaxVersion	-管理： String - VBScript： String	支援的最大版本。
newMinVersionsion	-管理： String - VBScript： String	支援的最低版本。
newName	-管理： String - VBScript： String	修改過的程式名稱。
newPlatform	-管理： String - VBScript： String	新的平臺。

正在編譯程式碼

C# 範例需要：

命名空間

系統

System.Collections.Generic

Microsoft。ConfigurationManagement.ManagementProvider

Microsoft。ConfigurationManagement.ManagementProvider.WqlQueryEngine

組件

adminui.wqlqueryengine

microsoft.configurationmanagement.managementprovider

mscorlib

健全的程式設計

如需錯誤處理的詳細資訊，請參閱關於Configuration Manager錯誤。

另請參閱

軟體發佈概觀