Enable Referenced Programs and Applications to be installed from a Task Sequence without being Deployed!

import-module ($Env:SMS_ADMIN_UI_PATH.Substring(0,$Env:SMS_ADMIN_UI_PATH.Length-5) + '\ConfigurationManager.psd1')

$PSD = Get-PSDrive -PSProvider CMSite

CD "$($PSD):"

[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")

[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Drawing") 

$objForm = New-Object System.Windows.Forms.Form 

$objForm.Text = "Select a Task Sequence"

$objForm.AutoSize = $true

$objForm.AutoScroll = $true

$objForm.StartPosition = "CenterScreen"

$objForm.KeyPreview = $True

$objForm.Add_KeyDown({if ($_.KeyCode -eq "Enter") 

{$x=$objListBox.SelectedItem;$objForm.Close()}})

$objForm.Add_KeyDown({if ($_.KeyCode -eq "Escape") 

    {$objForm.Close()}})

$OKButton = New-Object System.Windows.Forms.Button

$OKButton.Location = New-Object System.Drawing.Size(75,120)

$OKButton.Size = New-Object System.Drawing.Size(75,23)

$OKButton.Text = "OK"

$OKButton.Add_Click({$x=$objListBox.SelectedItem;$objForm.Close()})

$objForm.Controls.Add($OKButton)

$CancelButton = New-Object System.Windows.Forms.Button

$CancelButton.Location = New-Object System.Drawing.Size(150,120)

$CancelButton.Size = New-Object System.Drawing.Size(75,23)

$CancelButton.Text = "Cancel"

$CancelButton.Add_Click({$objForm.Close()})

$objForm.Controls.Add($CancelButton)

$CheckboxButton = New-Object System.Windows.Forms.Checkbox 

$CheckboxButton.Location = New-Object System.Drawing.Size(120,150) 

$CheckboxButton.Size = New-Object System.Drawing.Size(75,23)

$CheckboxButton.Checked = $true

$CheckboxButton.Text = "Enable"

$CheckboxButton.TabIndex = 4

$objForm.Controls.Add($CheckboxButton)

$objLabel = New-Object System.Windows.Forms.Label

$objLabel.Location = New-Object System.Drawing.Size(10,20) 

$objLabel.Size = New-Object System.Drawing.Size(280,20) 

$objLabel.Text = "Please select a Task Sequence:"

$objForm.Controls.Add($objLabel) 

$objListBox = New-Object System.Windows.Forms.ListBox 

$objListBox.Location = New-Object System.Drawing.Size(10,40) 

$objListBox.AutoSize = $true

$objListBox.Height = 80

$TSList = (Get-CMTaskSequence -Name *).Name | Foreach-Object {[void] $objListBox.Items.Add($_)}

$objForm.Controls.Add($objListBox) 

$objForm.Topmost = $True

$objForm.Add_Shown({$objForm.Activate()})

[void] $objForm.ShowDialog()

$TSSelection = $objListBox.SelectedItem

if (!$TSSelection) { Write-Host "User Exited Script... Please Run again and select a Task Sequence."

Break}

If($CheckboxButton.CheckState -eq "Checked"){

Write-Host "Enabling Referenced Items for Task Sequence:"$TSSelection -foregroundcolor Yellow

$CheckBoxState = $True

}

Else{

Write-Host "Disabling Referenced Items for Task Sequence:"$TSSelection -foregroundcolor Yellow

$CheckBoxState = $False

}

$References = (Get-CMTaskSequence -Name ($TSSelection)).References

foreach ($Reference in $References){

if ($Reference.Type -eq "0"){

    $Programs = Get-CMProgram -PackageID $Reference.Package -ProgramName $Reference.Program | Where-Object {$_.NumOfPrograms -ne 0}

foreach ($Program in $Programs){

    Try{

    Write-Host "Setting EnableTaskSequence to $CheckBoxState for Package Name:"$Program.PackageName "and Program Name:" $Program.ProgramName

    Set-CMProgram -Id ($Program.PackageID) -StandardProgramName ($Program.ProgramName) -EnableTaskSequence $CheckBoxState

    }

    Catch

         {

"Error: $_.Exception"

         }

        }

    }

    Elseif ($Reference.Type -eq "1"){

    $Applications = Get-CMApplication -id * | Where-Object {$_.ModelName -eq ($Reference.Package)}

foreach ($Application in $Applications){

    Try{

    Write-Host "Setting AutoInstall to $CheckBoxState for Application Name:"$Application.LocalizedDisplayName

    Set-CMApplication -Id $Application.CI_ID -AutoInstall $CheckBoxState

    }

    Catch

         {

"Error: $_.Exception"

         }

        }

    }

    Else{

    Write-Host "Excluding as it is not a Package or Application..."

        }

}