Dela via


Så här skapar du ett paket med hjälp av en paketdefinitionsfilmall

I följande exempel visas hur du skapar ett paket och program med hjälp av en paketdefinitionsfilmall i Configuration Manager. Paketdefinitionsfilmallen innehåller de standardvärden som används för att skapa SMS_Package och SMS_Program objekt. I följande exempel används SMS_PDF_Package klassen och GetPDFData metoden för att läsa in paketdefinitionens filmallsinformation och för att skapa ett paket och relaterade program.

Så här skapar du ett paket med hjälp av en paketdefinitionsfilmall

  1. Konfigurera en anslutning till SMS-providern.

  2. Skapa det nya paketobjektet med hjälp SMS_PDF_Package av klassen .

  3. Fyll i eventuella ytterligare paketegenskaper.

  4. Läs in programinformationen och associera varje program med paketet.

Exempel

Följande exempelmetod skapar ett nytt paket med hjälp av en paketdefinitionsfil.

Information om hur du anropar exempelkoden finns i Anropa Configuration Manager kodfragment.


Sub SWDCreatePDFPackage(connection, existingPDF_ID, newPackageSourceFlag, newPackageSourcePath)  
    ' The PDF_ID must be passed in.  
    ' The PDF_ID can be identified through the SMS_PDF_Package class.  

    Dim newPDFPackage  
    Dim returnCode  
    Dim newPackage  
    Dim newPackagePath  
    Dim packageID  
    Dim program  
    Dim arrayOfPrograms  

    ' Package Creation  
    ' ----------------       
    ' Create new SMS_PDF_Package instance.  
    Set newPDFPackage = connection.Get("SMS_PDF_Package")  

    ' Load the Package Definition File data using the GetPDFData method.  
    returnCode = newPDFPackage.GetPDFData(existingPDF_ID, newPackage, arrayOfPrograms)  

    ' Assign any additional package properties.  
    newPackage.PkgSourceFlag = newPackageSourceFlag  
    newPackage.PkgSourcePath = newPackageSourcePath  

    ' Save the package path and get the Package ID.  
    Set newPackagePath = newPackage.Put_  
    packageID = newPackagePath.Keys("PackageID")  

    ' Program Creation   
    ' -----------------      
    ' Enumerate through the program array and create the programs.  
    For Each program In arrayOfPrograms  
        program.PackageID = packageID  
        program.Put_  
    Next  

End Sub  

Exempelmetoden har följande parametrar:

Parameter Typ Beskrivning
connection – VBScript: SWbemServices En giltig anslutning till SMS-providern.
existingPDF_ID -Vbscript: Integer ID för paketdefinitionsfilen.
newPackageSourceFlag -Vbscript: Integer Paketkällan.
newPackageSourcePath -Vbscript: String Sökvägen till paketkällan.

Robust programmering

Mer information om felhantering finns i Om Configuration Manager fel.

Se även

Översikt över programvarudistributionSMS_SCI_Component serverns WMI-klass