This PowerShell script generates an html report listing all accounts used as logon account by services on servers in an Active Directory domain.
The script has filters to ignore accounts : NT Service, NT AUTHORITY and LocalSystem
Apply filter by servers and services
$FilterServerLike = "*" ## Select all servers
$FilterServiceLike = "*" ## Select all services
Ignore accounts
$IgnoreAccount_NT_Service = 1 ## NT Service
$IgnoreAccount_NT_AUTHORITY = 1 ## NT AUTHORITY
$IgnoreAccount_LocalSystem = 1 ## LocalSystem
Powershell script to find servers and services
<#
report-service-server.ps1
Reads service configuration from all Windows servers in the current domain
and generates report listing all service logon account.
Version history:
08.08.2020 First release
#Reference : https://gallery.technet.microsoft.com/scriptcenter/PowerShell-script-to-find-6fc15ecb
* Use Job and missing nice features
#>
Clear
## Begin Configuration ##
$FilterServerLike = "*" ## Filter server
$FilterServiceLike = "*" ## Filter service
## Search for all server and all services ##
#$FilterServerLike = "**" ## Search all server : "*"
#$FilterServiceLike = "*" ## Search all service
## Search for all server *sql* and all services mssql* ##
#$FilterServerLike = "*sql*" ## Search all server with name *SQL*
#$FilterServiceLike = "MSSQL*" ## Search service MSSQL*
$IgnoreAccount_NT_Service = 1 ## NT Service
$IgnoreAccount_NT_AUTHORITY = 1 ## NT AUTHORITY
$IgnoreAccount_LocalSystem = 1 ## LocalSystem
$ListServer = 1 ## Create table -- Server | #Services | Access status
$reportFile = "$env:TEMP\report_service_server.html"
## End Configuration ##
## Global variables ##
$ErrorActionPreference = "Stop"
$currentDomain = $env:USERDOMAIN.ToUpper()
$ServiceList = @{}
$ServerList = @{}
[string[]]$warnings = @()
function get-server-info()
{
param( $hostname )
if ( Test-Connection -ComputerName $hostname -Count 3 -Quiet ){
try {
# retrieve service list form a remove machine
$serviceList = @( gwmi -Class Win32_Service -ComputerName $hostname -Property Name,StartName,SystemName -ErrorAction Stop )
##$serviceList
##############################
# reads service list
if ( $serviceList.GetType() -eq [Object[]] ){
try
{
$serviceList = $serviceList | ? { $_.StartName.toUpper() }
if ($serviceList.Count -ge 1)
{
$arrID = $script:ServerList.Count+1
$ItemInfo = $hostname, $($serviceList.Count), ""
$script:ServerList.Add( $arrID, @( $ItemInfo ) )
} else
{
$arrID = $script:ServerList.Count+1
$ItemInfo = $hostname, "", "no services"
$script:ServerList.Add( $arrID, @( $ItemInfo ) )
}
#Apply Filter
if ($IgnoreAccount_NT_Service -eq 1) { $serviceList = $serviceList | Where-Object {$_.StartName -notlike "NT Service*" } | ? { $_.StartName } }
if ($IgnoreAccount_NT_AUTHORITY -eq 1) { $serviceList = $serviceList | Where-Object {$_.StartName -notlike "NT AUTHORITY*" } | ? { $_.StartName } }
if ($IgnoreAccount_LocalSystem -eq 1) { $serviceList = $serviceList | Where-Object {$_.StartName -notlike "LocalSystem" } | ? { $_.StartName } }
if ($FilterServiceLike -ne "*") { $serviceList = $serviceList | Where-Object {$_.Name -like $FilterServiceLike } }
foreach( $service in $serviceList ){
$arrID = $script:ServiceList.Count+1
$ItemInfo = $service.StartName, $($service.Name), $($service.SystemName)
$script:ServiceList.Add( $arrID, @( $ItemInfo ) )
}
}
catch {}
}
elseif ( $data.GetType() -eq [String] )
{
$script:warnings += "Fail to read service info"
}
}
catch
{
$global:warnings += @("$hostname | Failed to retrieve data $($_.toString())")
$arrID = $script:ServerList.Count+1
$ItemInfo = $hostname, "", "Failed"
$script:ServerList.Add( $arrID, @( $ItemInfo ) )
}
}
else
{
$global:warnings += @("$hostname | unreachable")
$arrID = $script:ServerList.Count+1
$ItemInfo = $hostname, "", "Unreachable"
$script:ServerList.Add( $arrID, @( $ItemInfo ) )
}
}
################# MAIN #################
## Add-WindowsFeature RSAT-AD-PowerShell
Import-Module ActiveDirectory
# read computer accounts from current domain
Write-Progress -Activity "Retrieving server list from ActiveDirectory" -Status "Processing..." -PercentComplete 0
$serverServiceList = Get-ADComputer -Filter {OperatingSystem -like "Windows Server*"} -Properties DNSHostName, cn | Where-Object {$_.Name -like $FilterServerLike } | ? { $_.enabled }
$count_servers = 0
foreach( $server in $serverServiceList ){
$dnshostname = $server.dnshostname
$dnshostname
++$count_servers
Write-Progress -Activity "Retrieving data from server $dnshostname ( $count_servers / $($serverServiceList.Count) ) " -Status "Processing..." -PercentComplete ( $count_servers * 100 / $serverServiceList.Count )
get-server-info $server.dnshostname
}
# prepare data table for report
Write-Progress -Activity "Generating report" -Status "Please wait..." -PercentComplete 0
$ServiceTable = @()
foreach( $value in $serviceList.Values )
{
$row = new-object psobject
Add-Member -InputObject $row -MemberType NoteProperty -Name "Account" -Value $(($value)[0])
Add-Member -InputObject $row -MemberType NoteProperty -Name "Service" -Value $(($value)[1])
Add-Member -InputObject $row -MemberType NoteProperty -Name "Server" -Value $(($value)[2])
$ServiceTable += $row
}
$ServerTable = @()
foreach( $value in $ServerList.Values )
{
$row = new-object psobject
Add-Member -InputObject $row -MemberType NoteProperty -Name "Server" -Value $(($value)[0])
Add-Member -InputObject $row -MemberType NoteProperty -Name "Services" -Value $(($value)[1])
Add-Member -InputObject $row -MemberType NoteProperty -Name "Status" -Value $(($value)[2])
$ServerTable += $row
}
#################
# create report
$datenow = Get-Date -format "yyyy-MMM-dd HH:mm"
$report = "
<!DOCTYPE html>
<html>
<head>
<style>
TABLE{border-width: 1px;border-style: solid;border-color: black;border-collapse: collapse;white-space:nowrap;}
TH{border-width: 1px;padding: 4px;border-style: solid;border-color: black}
TD{border-width: 1px;padding: 2px 10px;border-style: solid;border-color: black}
</style>
</head>
<body>
<H1>Service & Server report for $currentDomain domain</H1>
<H3>Server Filter : $FilterServerLike</br>
Service Filter : $FilterServiceLike</br>
Login : $env:UserDomain$env:UserName</br>
Date : $datenow
</H3>
<H2>Discovered service accounts</H2>
$( $ServiceTable | Sort Account | ConvertTo-Html Account, Service, Server -Fragment )
Discovered $($ServiceTable.count) services.
</br>
<H2>Discovered servers</H2>
$( $ServerTable | Sort Status, Server | ConvertTo-Html Server, Services, Status -Fragment )
$($serverList.count) servers processed.
</br>
<H2>Warning messages</H2>
$( $warnings | % { "<p>$_</p>" } )
</body>
</html>"
Write-Progress -Activity "Generating report" -Status "Please wait..." -Completed
$report | Set-Content $reportFile -Force
Invoke-Expression $reportFile
Sources :
https://gallery.technet.microsoft.com/scriptcenter/PowerShell-script-to-find-6fc15ecb
https://devblogs.microsoft.com/scripting/the-scripting-wife-uses-powershell-to-find-service-accounts/
It just monitor a folder for new files with Powershell.
#My function
function Do-MonitorNewFile-TODO($Event_name, $Event_FullPath, $Event_changeType, $Event_TimeGenerated)
{
Write-Host "The file '$Event_name' was $Event_changeType at $Event_TimeGenerated" -ForegroundColor red
}
function Do-MonitorNewFile($Sourcepath, $MonitorName)
{
# Remove previous event
Unregister-Event -SourceIdentifier "$MonitorName" -ErrorAction SilentlyContinue
Remove-Event -SourceIdentifier "$MonitorName" -ErrorAction SilentlyContinue
# Watcher
$watcher = New-Object System.IO.FileSystemWatcher
$watcher.IncludeSubdirectories = 1
$watcher.Path = $Sourcepath
$watcher.EnableRaisingEvents = 1
#action
$action = {
$Event_name = $Event.SourceEventArgs.Name
$Event_FullPath = $Event.SourceEventArgs.FullPath
$Event_changeType = $Event.SourceEventArgs.ChangeType
$Event_TimeGenerated = $Event.TimeGenerated
# Call my function
Do-MonitorNewFile-TODO "$Event_name" "$Event_FullPath" "$Event_changeType" "$Event_TimeGenerated"
}
$oEvent = Register-ObjectEvent $watcher Created -Action $action -SourceIdentifier "$MonitorName"
}
# Call - monitor a folder
Do-MonitorNewFile "C:\TEMP\" "MyMonitorName"
Source : http://blog.danskingdom.com/powershell-ise-multiline-comment-and-uncomment-done-right-and-other-ise-gui-must-haves/
| Ctrl + K |
Comment Selected Lines |
| Ctrl + Shift + K |
Uncomment Selected Lines |
# Define our constant variables.
[string]$NEW_LINE_STRING = "`r`n"
[string]$COMMENT_STRING = "#"
function Select-EntireLinesInIseSelectedTextAndReturnFirstAndLastSelectedLineNumbers([bool]$DoNothingWhenNotCertainOfWhichLinesToSelect = $false)
{
<#
.SYNOPSIS
Exands the selected text to make sure the entire lines are selected.
Returns $null if we can't determine with certainty which lines to select and the
.DESCRIPTION
Exands the selected text to make sure the entire lines are selected.
.PARAMETER DoNothingWhenNotCertainOfWhichLinesToSelect
Under the following edge case we can't determine for sure which lines in the file are selected.
If this switch is not provided and the edge case is encountered, we will guess and attempt to select the entire selected lines, but we may guess wrong and select the lines above/below the selected lines.
If this switch is provided and the edge case is encountered, no lines will be selected.
Edge Case:
- When the selected text occurs multiple times in the document, directly above or below the selected text.
Example:
abc
abc
abc
- If only the first two lines are selected, when you run this command it may comment out the 1st and 2nd lines correctly, or it may comment out the 2nd and 3rd lines, depending on
if the caret is on the 1st line or 2nd line when selecting the text (i.e. the text is selected bottom-to-top vs. top-to-bottom).
- Since the lines are typically identical for this edge case to occur, you likely won't really care which 2 of the 3 lines get selected, so it shouldn't be a big deal.
But if it bugs you, you can provide this switch.
.OUTPUT
PSObject. Returns a PSObject with the properties FirstLineNumber and LastLineNumber, which correspond to the first and last line numbers of the selected text.
#>
# Backup all of the original info before we modify it.
[int]$originalCaretLine = $psISE.CurrentFile.Editor.CaretLine
[string]$originalSelectedText = $psISE.CurrentFile.Editor.SelectedText
[string]$originalCaretLineText = $psISE.CurrentFile.Editor.CaretLineText
# Assume only one line is selected.
[int]$textToSelectFirstLine = $originalCaretLine
[int]$textToSelectLastLine = $originalCaretLine
#------------------------
# Before we process the selected text, we need to make sure all selected lines are fully selected (i.e. the entire line is selected).
#------------------------
# If no text is selected, OR only part of one line is selected (and it doesn't include the start of the line), select the entire line that the caret is currently on.
if (($psISE.CurrentFile.Editor.SelectedText.Length -le 0) -or !$psISE.CurrentFile.Editor.SelectedText.Contains($NEW_LINE_STRING))
{
$psISE.CurrentFile.Editor.SelectCaretLine()
}
# Else the first part of one line (or the entire line), or multiple lines are selected.
else
{
# Get the number of lines in the originally selected text.
[string[]] $originalSelectedTextArray = $originalSelectedText.Split([string[]]$NEW_LINE_STRING, [StringSplitOptions]::None)
[int]$numberOfLinesInSelectedText = $originalSelectedTextArray.Length
# If only one line is selected, make sure it is fully selected.
if ($numberOfLinesInSelectedText -le 1)
{
$psISE.CurrentFile.Editor.SelectCaretLine()
}
# Else there are multiple lines selected, so make sure the first character of the top line is selected (so that we put the comment character at the start of the top line, not in the middle).
# The first character of the bottom line will always be selected when multiple lines are selected, so we don't have to worry about making sure it is selected; only the top line.
else
{
# Determine if the caret is on the first or last line of the selected text.
[bool]$isCaretOnFirstLineOfSelectedText = $false
[string]$firstLineOfOriginalSelectedText = $originalSelectedTextArray[0]
[string]$lastLineOfOriginalSelectedText = $originalSelectedTextArray[$originalSelectedTextArray.Length - 1]
# If the caret is definitely on the first line.
if ($originalCaretLineText.EndsWith($firstLineOfOriginalSelectedText) -and !$originalCaretLineText.StartsWith($lastLineOfOriginalSelectedText))
{
$isCaretOnFirstLineOfSelectedText = $true
}
# Else if the caret is definitely on the last line.
elseif ($originalCaretLineText.StartsWith($lastLineOfOriginalSelectedText) -and !$originalCaretLineText.EndsWith($firstLineOfOriginalSelectedText))
{
$isCaretOnFirstLineOfSelectedText = $false
}
# Else we need to do further analysis to determine if the caret is on the first or last line of the selected text.
else
{
[int]$numberOfLinesInFile = $psISE.CurrentFile.Editor.LineCount
[string]$caretOnFirstLineText = [string]::Empty
[int]$caretOnFirstLineArrayStartIndex = ($originalCaretLine - 1) # -1 because array starts at 0 and file lines start at 1.
[int]$caretOnFirstLineArrayStopIndex = $caretOnFirstLineArrayStartIndex + ($numberOfLinesInSelectedText - 1) # -1 because the starting line is inclusive (i.e. if we want 1 line the start and stop lines should be the same).
[string]$caretOnLastLineText = [string]::Empty
[int]$caretOnLastLineArrayStopIndex = ($originalCaretLine - 1) # -1 because array starts at 0 and file lines start at 1.
[int]$caretOnLastLineArrayStartIndex = $caretOnLastLineArrayStopIndex - ($numberOfLinesInSelectedText - 1) # -1 because the stopping line is inclusive (i.e. if we want 1 line the start and stop lines should be the same).
# If the caret being on the first line would cause us to go "off the file", then we know the caret is on the last line.
if (($caretOnFirstLineArrayStartIndex -lt 0) -or ($caretOnFirstLineArrayStopIndex -ge $numberOfLinesInFile))
{
$isCaretOnFirstLineOfSelectedText = $false
}
# If the caret being on the last line would cause us to go "off the file", then we know the caret is on the first line.
elseif (($caretOnLastLineArrayStartIndex -lt 0) -or ($caretOnLastLineArrayStopIndex -ge $numberOfLinesInFile))
{
$isCaretOnFirstLineOfSelectedText = $true
}
# Else we still don't know where the caret is.
else
{
[string[]]$filesTextArray = $psISE.CurrentFile.Editor.Text.Split([string[]]$NEW_LINE_STRING, [StringSplitOptions]::None)
# Get the text of the lines where the caret is on the first line of the selected text.
[string[]]$caretOnFirstLineTextArray = @([string]::Empty) * $numberOfLinesInSelectedText # Declare an array with the number of elements required.
[System.Array]::Copy($filesTextArray, $caretOnFirstLineArrayStartIndex, $caretOnFirstLineTextArray, 0, $numberOfLinesInSelectedText)
$caretOnFirstLineText = $caretOnFirstLineTextArray -join $NEW_LINE_STRING
# Get the text of the lines where the caret is on the last line of the selected text.
[string[]]$caretOnLastLineTextArray = @([string]::Empty) * $numberOfLinesInSelectedText # Declare an array with the number of elements required.
[System.Array]::Copy($filesTextArray, $caretOnLastLineArrayStartIndex, $caretOnLastLineTextArray, 0, $numberOfLinesInSelectedText)
$caretOnLastLineText = $caretOnLastLineTextArray -join $NEW_LINE_STRING
[bool]$caretOnFirstLineTextContainsOriginalSelectedText = $caretOnFirstLineText.Contains($originalSelectedText)
[bool]$caretOnLastLineTextContainsOriginalSelectedText = $caretOnLastLineText.Contains($originalSelectedText)
# If the selected text is only within the text of when the caret is on the first line, then we know for sure the caret is on the first line.
if ($caretOnFirstLineTextContainsOriginalSelectedText -and !$caretOnLastLineTextContainsOriginalSelectedText)
{
$isCaretOnFirstLineOfSelectedText = $true
}
# Else if the selected text is only within the text of when the caret is on the last line, then we know for sure the caret is on the last line.
elseif ($caretOnLastLineTextContainsOriginalSelectedText -and !$caretOnFirstLineTextContainsOriginalSelectedText)
{
$isCaretOnFirstLineOfSelectedText = $false
}
# Else if the selected text is in both sets of text, then we don't know for sure if the caret is on the first or last line.
elseif ($caretOnFirstLineTextContainsOriginalSelectedText -and $caretOnLastLineTextContainsOriginalSelectedText)
{
# If we shouldn't do anything since we might comment out text that is not selected by the user, just exit this function and return null.
if ($DoNothingWhenNotCertainOfWhichLinesToSelect)
{
return $null
}
}
# Else something went wrong and there is a flaw in this logic, since the selected text should be in one of our two strings, so let's just guess!
else
{
Write-Error "WHAT HAPPENED?!?! This line should never be reached. There is a flaw in our logic!"
return $null
}
}
}
# Assume the caret is on the first line of the selected text, so we want to select text from the caret's line downward.
$textToSelectFirstLine = $originalCaretLine
$textToSelectLastLine = $originalCaretLine + ($numberOfLinesInSelectedText - 1) # -1 because the starting line is inclusive (i.e. if we want 1 line the start and stop lines should be the same).
# If the caret is actually on the last line of the selected text, we want to select text from the caret's line upward.
if (!$isCaretOnFirstLineOfSelectedText)
{
$textToSelectFirstLine = $originalCaretLine - ($numberOfLinesInSelectedText - 1) # -1 because the stopping line is inclusive (i.e. if we want 1 line the start and stop lines should be the same).
$textToSelectLastLine = $originalCaretLine
}
# Re-select the text, making sure the entire first and last lines are selected. +1 on EndLineWidth because column starts at 1, not 0.
$psISE.CurrentFile.Editor.Select($textToSelectFirstLine, 1, $textToSelectLastLine, $psISE.CurrentFile.Editor.GetLineLength($textToSelectLastLine) + 1)
}
}
# Return the first and last line numbers selected.
$selectedTextFirstAndLastLineNumbers = New-Object PSObject -Property @{
FirstLineNumber = $textToSelectFirstLine
LastLineNumber = $textToSelectLastLine
}
return $selectedTextFirstAndLastLineNumbers
}
function CommentOrUncommentIseSelectedLines([bool]$CommentLines = $false, [bool]$DoNothingWhenNotCertainOfWhichLinesToSelect = $false)
{
$selectedTextFirstAndLastLineNumbers = Select-EntireLinesInIseSelectedTextAndReturnFirstAndLastSelectedLineNumbers $DoNothingWhenNotCertainOfWhichLinesToSelect
# If we couldn't determine which lines to select, just exit without changing anything.
if ($selectedTextFirstAndLastLineNumbers -eq $null) { return }
# Get the text lines selected.
[int]$selectedTextFirstLineNumber = $selectedTextFirstAndLastLineNumbers.FirstLineNumber
[int]$selectedTextLastLineNumber = $selectedTextFirstAndLastLineNumbers.LastLineNumber
# Get the Selected Text and convert it into an array of strings so we can easily process each line.
[string]$selectedText = $psISE.CurrentFile.Editor.SelectedText
[string[]] $selectedTextArray = $selectedText.Split([string[]]$NEW_LINE_STRING, [StringSplitOptions]::None)
# Process each line of the Selected Text, and save the modified lines into a text array.
[string[]]$newSelectedTextArray = @()
$selectedTextArray | foreach {
# If the line is not blank, add a comment character to the start of it.
[string]$lineText = $_
if ([string]::IsNullOrWhiteSpace($lineText)) { $newSelectedTextArray += $lineText }
else
{
# If we should be commenting the lines out, add a comment character to the start of the line.
if ($CommentLines)
{ $newSelectedTextArray += "$COMMENT_STRING$lineText" }
# Else we should be uncommenting, so remove a comment character from the start of the line if it exists.
else
{
# If the line begins with a comment, remove one (and only one) comment character.
if ($lineText.StartsWith($COMMENT_STRING))
{
$lineText = $lineText.Substring($COMMENT_STRING.Length)
}
$newSelectedTextArray += $lineText
}
}
}
# Join the text array back together to get the new Selected Text string.
[string]$newSelectedText = $newSelectedTextArray -join $NEW_LINE_STRING
# Overwrite the currently Selected Text with the new Selected Text.
$psISE.CurrentFile.Editor.InsertText($newSelectedText)
# Fully select all of the lines that were modified. +1 on End Line's Width because column starts at 1, not 0.
$psISE.CurrentFile.Editor.Select($selectedTextFirstLineNumber, 1, $selectedTextLastLineNumber, $psISE.CurrentFile.Editor.GetLineLength($selectedTextLastLineNumber) + 1)
}
function Comment-IseSelectedLines([switch]$DoNothingWhenNotCertainOfWhichLinesToComment)
{
<#
.SYNOPSIS
Places a comment character at the start of each line of the selected text in the current PS ISE file.
If no text is selected, it will comment out the line that the caret is on.
.DESCRIPTION
Places a comment character at the start of each line of the selected text in the current PS ISE file.
If no text is selected, it will comment out the line that the caret is on.
.PARAMETER DoNothingWhenNotCertainOfWhichLinesToComment
Under the following edge case we can't determine for sure which lines in the file are selected.
If this switch is not provided and the edge case is encountered, we will guess and attempt to comment out the selected lines, but we may guess wrong and comment out the lines above/below the selected lines.
If this switch is provided and the edge case is encountered, no lines will be commented out.
Edge Case:
- When the selected text occurs multiple times in the document, directly above or below the selected text.
Example:
abc
abc
abc
- If only the first two lines are selected, when you run this command it may comment out the 1st and 2nd lines correctly, or it may comment out the 2nd and 3rd lines, depending on
if the caret is on the 1st line or 2nd line when selecting the text (i.e. the text is selected bottom-to-top vs. top-to-bottom).
- Since the lines are typically identical for this edge case to occur, you likely won't really care which 2 of the 3 lines get commented out, so it shouldn't be a big deal.
But if it bugs you, you can provide this switch.
#>
CommentOrUncommentIseSelectedLines -CommentLines $true -DoNothingWhenNotCertainOfWhichLinesToSelect $DoNothingWhenNotCertainOfWhichLinesToComment
}
function Uncomment-IseSelectedLines([switch]$DoNothingWhenNotCertainOfWhichLinesToUncomment)
{
<#
.SYNOPSIS
Removes the comment character from the start of each line of the selected text in the current PS ISE file (if it is commented out).
If no text is selected, it will uncomment the line that the caret is on.
.DESCRIPTION
Removes the comment character from the start of each line of the selected text in the current PS ISE file (if it is commented out).
If no text is selected, it will uncomment the line that the caret is on.
.PARAMETER DoNothingWhenNotCertainOfWhichLinesToUncomment
Under the following edge case we can't determine for sure which lines in the file are selected.
If this switch is not provided and the edge case is encountered, we will guess and attempt to uncomment the selected lines, but we may guess wrong and uncomment out the lines above/below the selected lines.
If this switch is provided and the edge case is encountered, no lines will be uncommentet.
Edge Case:
- When the selected text occurs multiple times in the document, directly above or below the selected text.
Example:
abc
abc
abc
- If only the first two lines are selected, when you run this command it may uncomment the 1st and 2nd lines correctly, or it may uncomment the 2nd and 3rd lines, depending on
if the caret is on the 1st line or 2nd line when selecting the text (i.e. the text is selected bottom-to-top vs. top-to-bottom).
- Since the lines are typically identical for this edge case to occur, you likely won't really care which 2 of the 3 lines get uncommented, so it shouldn't be a big deal.
But if it bugs you, you can provide this switch.
#>
CommentOrUncommentIseSelectedLines -CommentLines $false -DoNothingWhenNotCertainOfWhichLinesToSelect $DoNothingWhenNotCertainOfWhichLinesToUncomment
}
#==========================================================
# Add ISE Add-ons.
#==========================================================
# Add a new option in the Add-ons menu to comment all selected lines.
if (!($psISE.CurrentPowerShellTab.AddOnsMenu.Submenus | Where-Object { $_.DisplayName -eq "Comment Selected Lines" }))
{
$psISE.CurrentPowerShellTab.AddOnsMenu.Submenus.Add("Comment Selected Lines",{Comment-IseSelectedLines},"Ctrl+K")
}
# Add a new option in the Add-ons menu to uncomment all selected lines.
if (!($psISE.CurrentPowerShellTab.AddOnsMenu.Submenus | Where-Object { $_.DisplayName -eq "Uncomment Selected Lines" }))
{
$psISE.CurrentPowerShellTab.AddOnsMenu.Submenus.Add("Uncomment Selected Lines",{Uncomment-IseSelectedLines},"Ctrl+Shift+K")
}