My Powershell Commands

Tuesday 9 January 2018

Powershell function to get theremote server IP details,Subnetmask,Gateway,DHCP Enabled status,DNS Servers,Wins and Macaddress

#Powershell function to get theremote server IP details,Subnetmask,Gateway,DHCP Enabled status,DNS Servers,Wins and Macaddress

# useage = to query one or more servers use {NetIpdetails -computername server1,server2 and more}

# if you want export to csv use { NetIpdetails -computername server1,server2 | export-csv IPdetails.csv}

# for bulk operation you can use foreach and export to csv belwo is the example

########################################################

# $servers = Get-Content -Path "C:\servers.txt"

# $infoip =@()

# foreach ($server in $servers)

# {

# $infoip += NetIPdetails -computerName $server

# }

# $IPresult = $Infoip

# $IPresult | Export-Csv Ipd.csv

#############################################################

function NetIPdetails ($computerName=$env:COMPUTERNAME)

{

foreach ($Computer in $ComputerName) {

if(Test-Connection -ComputerName $Computer -Count 1 -ea 0) {

try {

$Networks = Get-WmiObject Win32_NetworkAdapterConfiguration -ComputerName $Computer -EA Stop | ? {$_.IPEnabled}

} catch {

Write-Warning "Error occurred while querying $computer."

Continue

}

foreach ($Network in $Networks) {

$IPAddress = $Network.IpAddress[0]

$SubnetMask = $Network.IPSubnet[0]

$DefaultGateway = $Network.DefaultIPGateway

$DNSServers = $Network.DNSServerSearchOrder

$Description = $Network.Description

$WINS1 = $Network.WINSPrimaryServer

$WINS2 = $Network.WINSSecondaryServer

$WINS = @($WINS1,$WINS2)

$IsDHCPEnabled = $false

If($network.DHCPEnabled) {

$IsDHCPEnabled = $true

}

$MACAddress = $Network.MACAddress

$OutputObj = New-Object -Type PSObject

$OutputObj | Add-Member -MemberType NoteProperty -Name ComputerName -Value $Computer.ToUpper()

$OutputObj | Add-Member -MemberType NoteProperty -Name IPAddress -Value $IPAddress

$OutputObj | Add-Member -MemberType NoteProperty -Name SubnetMask -Value $SubnetMask

$OutputObj | Add-Member -MemberType NoteProperty -Name Gateway -Value ($DefaultGateway -join ",")

$OutputObj | Add-Member -MemberType NoteProperty -Name IsDHCPEnabled -Value $IsDHCPEnabled

$OutputObj | Add-Member -MemberType NoteProperty -Name DNSServers -Value ($DNSServers -join ",")

$OutputObj | Add-Member -MemberType NoteProperty -Name Description -Value $Description

$OutputObj | Add-Member -MemberType NoteProperty -Name WINSServers -Value ($WINS -join ",")

$OutputObj | Add-Member -MemberType NoteProperty -Name MACAddress -Value $MACAddress

$OutputObj

}

##################################################End of the function###############

Saturday 25 November 2017

Stability report

$date = get-date -f "dd/MM/yyy hh:mm:ss"

$b = @'
<html>
<body>
<span style="background-color:#00cc44;"> Wintel Health Checks Report</span>
</body>
</html>
'@

$title = "$b"
$ttr = "<center><h1>$title</h1></center>"

$a = "<style>"
$a = $a + "BODY{background-color:#F2F5F9;}"
$a = $a + "TABLE{border-width: 1px;border-style: solid;border-color: black;border-collapse: collapse;}"
$a = $a + "TH{border-width: 1px;padding: 0px;border-style: solid;border-color: black;background-color:#030f66}"
$a = $a + "TD{border-width: 1px;padding: 0px;border-style: solid;border-color: black;background-color:white}"
$a = $a + "</style>"

function ForEach-Parallel {

[cmdletbinding()]
param(
[Parameter(Mandatory=$false,position=0,ParameterSetName='ScriptBlock')]
[System.Management.Automation.ScriptBlock]$ScriptBlock,

[Parameter(Mandatory=$false,ParameterSetName='ScriptFile')]
[ValidateScript({test-path $_ -pathtype leaf})]
$scriptFile,

[Parameter(Mandatory=$true,ValueFromPipeline=$true)]
[PSObject]$InputObject,

[int]$Throttle=5,

[double]$sleepTimer = 200,

[double]$Timeout = 0
)
BEGIN {

#Build the scriptblock depending on the parameter used
switch ($PSCmdlet.ParameterSetName){
'ScriptBlock' {$ScriptBlock = $ExecutionContext.InvokeCommand.NewScriptBlock("param(`$_)`r`n" + $Scriptblock.ToString())}
'ScriptFile' {$scriptblock = [scriptblock]::Create($(get-content $scriptFile | out-string))}
Default {Write-Error ("Must provide ScriptBlock or ScriptFile"); Return}
}

#Define the initial sessionstate, create the runspacepool
Write-Verbose "Creating runspace pool with $Throttle threads"
$sessionState = [system.management.automation.runspaces.initialsessionstate]::CreateDefault()
$pool = [Runspacefactory]::CreateRunspacePool(1, $Throttle, $sessionState, $host)
$pool.open()

#array to hold details on each thread
$threads = @()

#If inputObject is bound get a total count and set bound to true
$bound = $false
if( $PSBoundParameters.ContainsKey("inputObject") ){
$bound = $true
$totalCount = $inputObject.count
}

}

PROCESS {

$run = @'
#For each pipeline object, create a new powershell instance, add to runspacepool
$powershell = [powershell]::Create().addscript($scriptblock).addargument($InputObject)
$powershell.runspacepool=$pool
$startTime = get-date

#add references to inputobject, instance, handle and startTime to threads array
$threads += New-Object psobject -Property @{
Object = $inputObject;
instance = $powershell;
handle = $powershell.begininvoke();
startTime = $startTime
}

Write-Verbose "Added $inputobject to the runspacepool at $startTime"
'@

#Run the here string. Put it in a foreach loop if it didn't come from the pipeline
if($bound){
$run = $run -replace 'inputObject', 'object'
foreach($object in $inputObject){
Invoke-Expression -command $run
}
}

else{

Invoke-Expression -command $run
}

}
END {
$notdone = $true

#Loop through threads.
while ($notdone) {

$notdone = $false
for ($i=0; $i -lt $threads.count; $i++) {
$thread = $threads[$i]
if ($thread) {

#If thread is complete, dispose of it.
if ($thread.handle.iscompleted) {
Write-verbose "Closing thread for $($thread.Object)"
$thread.instance.endinvoke($thread.handle)
$thread.instance.dispose()
$threads[$i] = $null
}

#Thread exceeded maxruntime timeout threshold
elseif( $Timeout -ne 0 -and ( (get-date) - $thread.startTime ).totalminutes -gt $Timeout ){
Write-Error "Closing thread for $($thread.Object): Thread exceeded $Timeout minute limit" -TargetObject $thread.inputObject
$thread.instance.dispose()
$threads[$i] = $null
}

#Thread is running, loop again!
else {
$notdone = $true
}
}
}

#Sleep for specified time before looping again
Start-Sleep -Milliseconds $sleepTimer
}
$pool.close()
}
}

#this is server list
$servers = Get-Content -Path 'C:\servers.txt'

#online servers Null variable
$online =@()
#offline servers Null variable
$offline=@()

#looping to get all online servers

$serverresult = $servers | ForEach-Parallel -Throttle 40 {

if(Test-Connection $_ -Count 1 -ea 0){
$res = ""|select ComputerName,Ping
$res.ComputerName = $_
$res.Ping = $true
$res
}
else{
$res = ""|select ComputerName,Ping
$res.ComputerName = $_
$res.Ping = $false
$res

}
}

$online = $serverresult | ?{$_.ping -eq $true} |select -ExpandProperty Computername
$offline = $serverresult | ?{$_.ping -eq $false} |select -ExpandProperty Computername

#Region Uptime Start

$infouptime =@()

$infouptime=$online |ForEach-Parallel -Throttle 5 {
function get-uptime {

param(
$computername =$env:computername
)

$os = Get-WmiObject win32_operatingsystem -ComputerName $computername -ea silentlycontinue

if($os){
$lastbootuptime =$os.ConvertTodateTime($os.LastBootUpTime)
$LocalDateTime =$os.ConvertTodateTime($os.LocalDateTime)
$up =$LocalDateTime - $lastbootuptime

$uptime ="$($up.Days) days, $($up.Hours)h, $($up.Minutes)mins"
$results =new-object psobject
$results |Add-Member noteproperty LastBootUptime $LastBootuptime
$results |Add-Member noteproperty ComputerName $computername
$results |Add-Member noteproperty uptime $uptime
$results | Select-Object computername,LastBootuptime,Uptime
}
else
{
$results =New-Object psobject
$results =new-object psobject
$results |Add-Member noteproperty LastBootUptime "Na"
$results |Add-Member noteproperty ComputerName $computername
$results |Add-Member noteproperty uptime "Na"
$results | Select-Object computername,LastBootUptime,Uptime
}
}
get-uptime -computername $_
}

$bootime=$infouptime

####################Uptime function Ends###################

######################################Memory function starts###################################

$infod=@()
$infod=$online |ForEach-Parallel -Throttle 5 {
Function Dinfo ($ComputerName=$ENV:ComputerName) {

foreach ($disk in $ComputerName){
Get-WmiObject win32_logicaldisk -ComputerName $ComputerName -Filter "Drivetype=3" |
Select-Object @{Label = "ServerName";Expression = {$_.__Server}},
@{Label = "Drive Letter";Expression = {$_.DeviceID}},
@{Label = "Total Capacity (GB)";Expression = {"{0:N1}" -f( $_.Size / 1gb)}},
@{Label = "Free Space (GB)";Expression = {"{0:N1}" -f( $_.Freespace / 1gb ) }},
@{Label="FreeSpace%"; Expression={"{0:N0}" -F (($_.Freespace/$_.Size)*100)}}
}
}
Dinfo $_
}

$diskstatus=$infod

$infom=@()

$infom=$online |ForEach-Parallel -Throttle 5 {
Function Get-MemmoryUtlization ($ComputerName=$ENV:ComputerName) {
Get-WmiObject Win32_OperatingSystem -ComputerName $ComputerName |
Select @{Name="Servername";Expression = {$_.__Server}},
@{Name = "TotalGB";Expression = {[int]($_.TotalVisibleMemorySize/1mb)}},
@{Name = "FreeGB";Expression = {[math]::Round($_.FreePhysicalMemory/1mb,2)}},
@{Name = "PercentFree%"; Expression = {[math]::Round(($_.FreePhysicalMemory/$_.TotalVisibleMemorySize)*100,2)}}
}
Get-MemmoryUtlization $_
}

$memorydetails= $infom

######################################Memory function ends###################################

######################################CPU function Starts#############################################################################################################################

$infocpu=@()
$infocpu = $online|ForEach-Parallel -Throttle 40 {
function Get-Cpu{
param(
$computername =$env:computername
)
$os = gwmi win32_perfformatteddata_perfos_processor -ComputerName $computername| ? {$_.name -eq "_total"} | select -ExpandProperty PercentProcessorTime -ea silentlycontinue
if(($os -match '\d+') -or ($os -eq '0')){
$results =new-object psobject
$results |Add-Member noteproperty Cputil $os
$results |Add-Member noteproperty ComputerName $computername
$results | Select-Object computername,Cputil
}
else{
$results =new-object psobject
$results |Add-Member noteproperty Cputil "Na"
$results |Add-Member noteproperty ComputerName $computername
$results | Select-Object computername,Cputil
}
}
Get-Cpu $_
}

###########################################################################End Cpu Function######################################################################################################

#############################Service report Starts########################################################################################
$ServicesReport = @()
foreach($computer in $online)
{
$Services = Get-WmiObject -Class Win32_Service -ComputerName $computer | Where {($_.StartMode -eq "Auto") -and ($_.State -eq "Stopped")}

foreach ($Service in $Services) {
$ro = New-Object -Type PSObject -Property @{
ComputerName =$Service.PSComputerName
Name = $Service.Name
StartMode = $Service.StartMode
SStatus = $Service.State
}
$ServicesReport += $ro

}

}

$servers = $ServicesReport

#############################Service report ends#######################################################################################
#endregion

Function Set-CellColor
{ <#
.SYNOPSIS
Function that allows you to set individual cell colors in an HTML table
.DESCRIPTION
To be used inconjunction with ConvertTo-HTML this simple function allows you
to set particular colors for cells in an HTML table. You provide the criteria
the script uses to make the determination if a cell should be a particular
color (property -gt 5, property -like "*Apple*", etc).

You can add the function to your scripts, dot source it to load into your current
PowerShell session or add it to your $Profile so it is always available.

To dot source:
.".\Set-CellColor.ps1"

.PARAMETER Property
Property, or column that you will be keying on.
.PARAMETER Color
Name or 6-digit hex value of the color you want the cell to be
.PARAMETER InputObject
HTML you want the script to process. This can be entered directly into the
parameter or piped to the function.
.PARAMETER Filter
Specifies a query to determine if a cell should have its color changed. $true
results will make the color change while $false result will return nothing.

Syntax
<Property Name> <Operator> <Value>

<Property Name>::= the same as $Property. This must match exactly
<Operator>::= "-eq" | "-le" | "-ge" | "-ne" | "-lt" | "-gt"| "-approx" | "-like" | "-notlike"
<JoinOperator> ::= "-and" | "-or"
<NotOperator> ::= "-not"

The script first attempts to convert the cell to a number, and if it fails it will
cast it as a string. So 40 will be a number and you can use -lt, -gt, etc. But 40%
would be cast as a string so you could only use -eq, -ne, -like, etc.
.PARAMETER Row
Instructs the script to change the entire row to the specified color instead of the individual cell.
.INPUTS
HTML with table
.OUTPUTS
HTML
.EXAMPLE
get-process | convertto-html | set-cellcolor -Propety cpu -Color red -Filter "cpu -gt 1000" | out-file c:\test\get-process.html

Assuming Set-CellColor has been dot sourced, run Get-Process and convert to HTML.
Then change the CPU cell to red only if the CPU field is greater than 1000.

.EXAMPLE
get-process | convertto-html | set-cellcolor cpu red -filter "cpu -gt 1000 -and cpu -lt 2000" | out-file c:\test\get-process.html

Same as Example 1, but now we will only turn a cell red if CPU is greater than 100
but less than 2000.

.EXAMPLE
$HTML = $Data | sort server | ConvertTo-html -head $header | Set-CellColor cookedvalue red -Filter "cookedvalue -gt 1"
PS C:\> $HTML = $HTML | Set-CellColor Server green -Filter "server -eq 'dc2'"
PS C:\> $HTML | Set-CellColor Path Yellow -Filter "Path -like ""*memory*""" | Out-File c:\Test\colortest.html

Takes a collection of objects in $Data, sorts on the property Server and converts to HTML. From there
we set the "CookedValue" property to red if it's greater then 1. We then send the HTML through Set-CellColor
again, this time setting the Server cell to green if it's "dc2". One more time through Set-CellColor
turns the Path cell to Yellow if it contains the word "memory" in it.

.EXAMPLE
$HTML = $Data | sort server | ConvertTo-html -head $header | Set-CellColor cookedvalue red -Filter "cookedvalue -gt 1" -Row

Now, if the cookedvalue property is greater than 1 the function will highlight the entire row red.

#>

[CmdletBinding()]
Param (
[Parameter(Mandatory,Position=0)]
[string]$Property,
[Parameter(Mandatory,Position=1)]
[string]$Color,
[Parameter(Mandatory,ValueFromPipeline)]
[Object[]]$InputObject,
[Parameter(Mandatory)]
[string]$Filter,
[switch]$Row
)

Begin {
Write-Verbose "$(Get-Date): Function Set-CellColor begins"
If ($Filter)
{ If ($Filter.ToUpper().IndexOf($Property.ToUpper()) -ge 0)
{ $Filter = $Filter.ToUpper().Replace($Property.ToUpper(),"`$Value")
Try {
[scriptblock]$Filter = [scriptblock]::Create($Filter)
}
Catch {
Write-Warning "$(Get-Date): ""$Filter"" caused an error, stopping script!"
Write-Warning $Error[0]
Exit
}
}
Else
{ Write-Warning "Could not locate $Property in the Filter, which is required. Filter: $Filter"
Exit
}
}
}

Process {
ForEach ($Line in $InputObject)
{ If ($Line.IndexOf("<tr><th") -ge 0)
{ Write-Verbose "$(Get-Date): Processing headers..."
$Search = $Line | Select-String -Pattern '<th ?[a-z\-:;"=]*>(.*?)<\/th>' -AllMatches
$Index = 0
ForEach ($Match in $Search.Matches)
{ If ($Match.Groups[1].Value -eq $Property)
{ Break
}
$Index ++
}
If ($Index -eq $Search.Matches.Count)
{ Write-Warning "$(Get-Date): Unable to locate property: $Property in table header"
Exit
}
Write-Verbose "$(Get-Date): $Property column found at index: $Index"
}
If ($Line -match "<tr( style=""background-color:.+?"")?><td")
{ $Search = $Line | Select-String -Pattern '<td ?[a-z\-:;"=]*>(.*?)<\/td>' -AllMatches
$Value = $Search.Matches[$Index].Groups[1].Value -as [double]
If (-not $Value)
{ $Value = $Search.Matches[$Index].Groups[1].Value
}
If (Invoke-Command $Filter)
{ If ($Row)
{ Write-Verbose "$(Get-Date): Criteria met! Changing row to $Color..."
If ($Line -match "<tr style=""background-color:(.+?)"">")
{ $Line = $Line -replace "<tr style=""background-color:$($Matches[1])","<tr style=""background-color:$Color"
}
Else
{ $Line = $Line.Replace("<tr>","<tr style=""background-color:$Color"">")
}
}
Else
{ Write-Verbose "$(Get-Date): Criteria met! Changing cell to $Color..."
$Line = $Line.Replace($Search.Matches[$Index].Value,"<td style=""background-color:$Color"">$Value</td>")
}
}
}
Write-Output $Line
}
}

End {
Write-Verbose "$(Get-Date): Function Set-CellColor completed"
}
}

$bootime = $bootime |ConvertTo-Html -Head $a -body "<H2>Uptime</H2>"
$diskstatus =$diskstatus|ConvertTo-HTML -head $a -body "<H2>Disk Information</H2>" | Set-CellColor 'FreeSpace%' Red -Filter "FreeSpace% -lt 80"
$memorydetails=$memorydetails|ConvertTo-HTML -head $a -body "<H2>Memory Status</H2>"| Set-CellColor 'PercentFree%' Red -Filter "PercentFree% -lt 80"
$ServicesReport=$ServicesReport|ConvertTo-HTML -head $a -body "<H2>Service Information</H2>" | Set-CellColor SStatus red -Filter "Sstatus -eq 'Stopped'"
$infocpu =$infocpu|ConvertTo-HTML -head $a -body "<H2>CPU Status</H2>"| Set-CellColor 'Cputil' Red -Filter "Cputil -gt 80"
$Serverchecksfinal = $ttr +"`n`n"+$bootime +"`n"+ $diskstatus + $infocpu+$memorydetails + $ServicesReport

$total= $Serverchecksfinal
#$total = $total -replace("<td>Stopped</td>",'<style> .blue { background: Red; }<td class="blue">Stopped</td>')

Send-MailMessage -To "dgadmins@supercom.com" -From "administrator@supercom.com" -SmtpServer "dc.supercom.com" -BodyAsHtml "$total" -Subject "Server Health checks on $date"

Friday 17 November 2017

Server Health checks

$date = get-date -f "dd/MM/yyy hh:mm:ss"
#this is server list
$servers = Get-Content -Path 'C:\servers.txt'

$count = $servers | Measure-Object
$c=$count.Count

$b = @'
<html>
<body>
<span style="background-color:#4DF903;"> Wintel Health Checks Report</span>
</body>
</html>
'@

$title = "$b"
$ttr = "<center><h1>$title</h1></center>"

$totalc ="<h2>Total $c Servers scanned</h2>"

$a = "<style>"
$a = $a + "BODY{background-color:#F2F5F9;}"
$a = $a + "TABLE{border-width: 1px;border-style: solid;border-color: black;border-collapse: collapse;}"
$a = $a + "TH{border-width: 1px;padding: 0px;border-style: solid;border-color: black;background-color:DodgerBlue}"
$a = $a + "TD{border-width: 1px;padding: 0px;border-style: solid;border-color: black;background-color:white}"
$a = $a + "</style>"

function ForEach-Parallel {

[cmdletbinding()]
param(
[Parameter(Mandatory=$false,position=0,ParameterSetName='ScriptBlock')]
[System.Management.Automation.ScriptBlock]$ScriptBlock,

[Parameter(Mandatory=$false,ParameterSetName='ScriptFile')]
[ValidateScript({test-path $_ -pathtype leaf})]
$scriptFile,

[Parameter(Mandatory=$true,ValueFromPipeline=$true)]
[PSObject]$InputObject,

[int]$Throttle=5,

[double]$sleepTimer = 200,

[double]$Timeout = 0
)
BEGIN {

#Build the scriptblock depending on the parameter used
switch ($PSCmdlet.ParameterSetName){
'ScriptBlock' {$ScriptBlock = $ExecutionContext.InvokeCommand.NewScriptBlock("param(`$_)`r`n" + $Scriptblock.ToString())}
'ScriptFile' {$scriptblock = [scriptblock]::Create($(get-content $scriptFile | out-string))}
Default {Write-Error ("Must provide ScriptBlock or ScriptFile"); Return}
}

#Define the initial sessionstate, create the runspacepool
Write-Verbose "Creating runspace pool with $Throttle threads"
$sessionState = [system.management.automation.runspaces.initialsessionstate]::CreateDefault()
$pool = [Runspacefactory]::CreateRunspacePool(1, $Throttle, $sessionState, $host)
$pool.open()

#array to hold details on each thread
$threads = @()

#If inputObject is bound get a total count and set bound to true
$bound = $false
if( $PSBoundParameters.ContainsKey("inputObject") ){
$bound = $true
$totalCount = $inputObject.count
}

}

PROCESS {

$run = @'
#For each pipeline object, create a new powershell instance, add to runspacepool
$powershell = [powershell]::Create().addscript($scriptblock).addargument($InputObject)
$powershell.runspacepool=$pool
$startTime = get-date

#add references to inputobject, instance, handle and startTime to threads array
$threads += New-Object psobject -Property @{
Object = $inputObject;
instance = $powershell;
handle = $powershell.begininvoke();
startTime = $startTime
}

Write-Verbose "Added $inputobject to the runspacepool at $startTime"
'@

#Run the here string. Put it in a foreach loop if it didn't come from the pipeline
if($bound){
$run = $run -replace 'inputObject', 'object'
foreach($object in $inputObject){
Invoke-Expression -command $run
}
}

else{

Invoke-Expression -command $run
}

}
END {
$notdone = $true

#Loop through threads.
while ($notdone) {

$notdone = $false
for ($i=0; $i -lt $threads.count; $i++) {
$thread = $threads[$i]
if ($thread) {

#If thread is complete, dispose of it.
if ($thread.handle.iscompleted) {
Write-verbose "Closing thread for $($thread.Object)"
$thread.instance.endinvoke($thread.handle)
$thread.instance.dispose()
$threads[$i] = $null
}

#Thread exceeded maxruntime timeout threshold
elseif( $Timeout -ne 0 -and ( (get-date) - $thread.startTime ).totalminutes -gt $Timeout ){
Write-Error "Closing thread for $($thread.Object): Thread exceeded $Timeout minute limit" -TargetObject $thread.inputObject
$thread.instance.dispose()
$threads[$i] = $null
}

#Thread is running, loop again!
else {
$notdone = $true
}
}
}

#Sleep for specified time before looping again
Start-Sleep -Milliseconds $sleepTimer
}
$pool.close()
}
}

#online servers Null variable
$online =@()
#offline servers Null variable
$offline=@()

#looping to get all online servers

$serverresult = $servers | ForEach-Parallel -Throttle 40 {

if(Test-Connection $_ -Count 1 -ea 0){
$res = ""|select ComputerName,Ping
$res.ComputerName = $_
$res.Ping = $true
$res
}
else{
$res = ""|select ComputerName,Ping
$res.ComputerName = $_
$res.Ping = $false
$res

}
}

$online = $serverresult | ?{$_.ping -eq $true} |select -ExpandProperty Computername
$offline = $serverresult | ?{$_.ping -eq $false} |select -ExpandProperty Computername

#Region Uptime Start

$infouptime =@()

$infouptime=$online |ForEach-Parallel -Throttle 5 {
function get-uptime {

param(
$computername =$env:computername
)

$os = Get-WmiObject win32_operatingsystem -ComputerName $computername -ea silentlycontinue

if($os){
$lastbootuptime =$os.ConvertTodateTime($os.LastBootUpTime)
$LocalDateTime =$os.ConvertTodateTime($os.LocalDateTime)
$up =$LocalDateTime - $lastbootuptime

$uptime ="$($up.Days) days, $($up.Hours)h, $($up.Minutes)mins"
$results =new-object psobject
$results |Add-Member noteproperty LastBootUptime $LastBootuptime
$results |Add-Member noteproperty ComputerName $computername
$results |Add-Member noteproperty uptime $uptime
$results | Select-Object computername,LastBootuptime,Uptime
}
else
{
$results =New-Object psobject
$results =new-object psobject
$results |Add-Member noteproperty LastBootUptime "Na"
$results |Add-Member noteproperty ComputerName $computername
$results |Add-Member noteproperty uptime "Na"
$results | Select-Object computername,LastBootUptime,Uptime
}
}
get-uptime -computername $_
}

$bootime=$infouptime

####################Uptime function Ends###################

######################################Memory function starts###################################

$infod=@()
$infod=$online |ForEach-Parallel -Throttle 5 {
Function Dinfo ($ComputerName=$ENV:ComputerName) {

foreach ($disk in $ComputerName){
Get-WmiObject win32_logicaldisk -ComputerName $ComputerName -Filter "Drivetype=3" |
Select-Object @{Label = "ServerName";Expression = {$_.__Server}},
@{Label = "Drive Letter";Expression = {$_.DeviceID}},
@{Label = "Total Capacity (GB)";Expression = {"{0:N1}" -f( $_.Size / 1gb)}},
@{Label = "Free Space (GB)";Expression = {"{0:N1}" -f( $_.Freespace / 1gb ) }},
@{Label="FreeSpace%"; Expression={"{0:N0}" -F (($_.Freespace/$_.Size)*100)}}
}
}
Dinfo $_
}

$diskstatus=$infod

$infom=@()

$infom=$online |ForEach-Parallel -Throttle 5 {
Function Get-MemmoryUtlization ($ComputerName=$ENV:ComputerName) {
Get-WmiObject Win32_OperatingSystem -ComputerName $ComputerName |
Select @{Name="Servername";Expression = {$_.__Server}},
@{Name = "TotalGB";Expression = {[int]($_.TotalVisibleMemorySize/1mb)}},
@{Name = "FreeGB";Expression = {[math]::Round($_.FreePhysicalMemory/1mb,2)}},
@{Name = "PercentFree%"; Expression = {[math]::Round(($_.FreePhysicalMemory/$_.TotalVisibleMemorySize)*100,2)}}
}
Get-MemmoryUtlization $_
}

$memorydetails= $infom

######################################Memory function ends###################################

######################################CPU function Starts#############################################################################################################################

$infocpu=@()
$infocpu = $online|ForEach-Parallel -Throttle 40 {
function Get-Cpu{
param(
$computername =$env:computername
)
$os = gwmi win32_perfformatteddata_perfos_processor -ComputerName $computername| ? {$_.name -eq "_total"} | select -ExpandProperty PercentProcessorTime -ea silentlycontinue
if(($os -match '\d+') -or ($os -eq '0')){
$results =new-object psobject
$results |Add-Member noteproperty Cputil $os
$results |Add-Member noteproperty ComputerName $computername
$results | Select-Object computername,Cputil
}
else{
$results =new-object psobject
$results |Add-Member noteproperty Cputil "Na"
$results |Add-Member noteproperty ComputerName $computername
$results | Select-Object computername,Cputil
}
}
Get-Cpu $_
}

###########################################################################End Cpu Function######################################################################################################

#############################Service report Starts########################################################################################
$ServicesReport = @()
foreach($computer in $online)
{
$Services = Get-WmiObject -Class Win32_Service -ComputerName $computer | Where {($_.StartMode -eq "Auto") -and ($_.State -eq "Stopped")}

foreach ($Service in $Services) {
$ro = New-Object -Type PSObject -Property @{
ComputerName =$Service.PSComputerName
Name = $Service.Name
StartMode = $Service.StartMode
SStatus = $Service.State
}
$ServicesReport += $ro

}

}

$servers = $ServicesReport

#############################Service report ends#######################################################################################
#endregion

Function Set-CellColor
{ <#
.SYNOPSIS
Function that allows you to set individual cell colors in an HTML table
.DESCRIPTION
To be used inconjunction with ConvertTo-HTML this simple function allows you
to set particular colors for cells in an HTML table. You provide the criteria
the script uses to make the determination if a cell should be a particular
color (property -gt 5, property -like "*Apple*", etc).

You can add the function to your scripts, dot source it to load into your current
PowerShell session or add it to your $Profile so it is always available.

To dot source:
.".\Set-CellColor.ps1"

.PARAMETER Property
Property, or column that you will be keying on.
.PARAMETER Color
Name or 6-digit hex value of the color you want the cell to be
.PARAMETER InputObject
HTML you want the script to process. This can be entered directly into the
parameter or piped to the function.
.PARAMETER Filter
Specifies a query to determine if a cell should have its color changed. $true
results will make the color change while $false result will return nothing.

Syntax
<Property Name> <Operator> <Value>

<Property Name>::= the same as $Property. This must match exactly
<Operator>::= "-eq" | "-le" | "-ge" | "-ne" | "-lt" | "-gt"| "-approx" | "-like" | "-notlike"
<JoinOperator> ::= "-and" | "-or"
<NotOperator> ::= "-not"

The script first attempts to convert the cell to a number, and if it fails it will
cast it as a string. So 40 will be a number and you can use -lt, -gt, etc. But 40%
would be cast as a string so you could only use -eq, -ne, -like, etc.
.PARAMETER Row
Instructs the script to change the entire row to the specified color instead of the individual cell.
.INPUTS
HTML with table
.OUTPUTS
HTML
.EXAMPLE
get-process | convertto-html | set-cellcolor -Propety cpu -Color red -Filter "cpu -gt 1000" | out-file c:\test\get-process.html

Assuming Set-CellColor has been dot sourced, run Get-Process and convert to HTML.
Then change the CPU cell to red only if the CPU field is greater than 1000.

.EXAMPLE
get-process | convertto-html | set-cellcolor cpu red -filter "cpu -gt 1000 -and cpu -lt 2000" | out-file c:\test\get-process.html

Same as Example 1, but now we will only turn a cell red if CPU is greater than 100
but less than 2000.

.EXAMPLE
$HTML = $Data | sort server | ConvertTo-html -head $header | Set-CellColor cookedvalue red -Filter "cookedvalue -gt 1"
PS C:\> $HTML = $HTML | Set-CellColor Server green -Filter "server -eq 'dc2'"
PS C:\> $HTML | Set-CellColor Path Yellow -Filter "Path -like ""*memory*""" | Out-File c:\Test\colortest.html

Takes a collection of objects in $Data, sorts on the property Server and converts to HTML. From there
we set the "CookedValue" property to red if it's greater then 1. We then send the HTML through Set-CellColor
again, this time setting the Server cell to green if it's "dc2". One more time through Set-CellColor
turns the Path cell to Yellow if it contains the word "memory" in it.

.EXAMPLE
$HTML = $Data | sort server | ConvertTo-html -head $header | Set-CellColor cookedvalue red -Filter "cookedvalue -gt 1" -Row

Now, if the cookedvalue property is greater than 1 the function will highlight the entire row red.

#>

[CmdletBinding()]
Param (
[Parameter(Mandatory,Position=0)]
[string]$Property,
[Parameter(Mandatory,Position=1)]
[string]$Color,
[Parameter(Mandatory,ValueFromPipeline)]
[Object[]]$InputObject,
[Parameter(Mandatory)]
[string]$Filter,
[switch]$Row
)

Begin {
Write-Verbose "$(Get-Date): Function Set-CellColor begins"
If ($Filter)
{ If ($Filter.ToUpper().IndexOf($Property.ToUpper()) -ge 0)
{ $Filter = $Filter.ToUpper().Replace($Property.ToUpper(),"`$Value")
Try {
[scriptblock]$Filter = [scriptblock]::Create($Filter)
}
Catch {
Write-Warning "$(Get-Date): ""$Filter"" caused an error, stopping script!"
Write-Warning $Error[0]
Exit
}
}
Else
{ Write-Warning "Could not locate $Property in the Filter, which is required. Filter: $Filter"
Exit
}
}
}

Process {
ForEach ($Line in $InputObject)
{ If ($Line.IndexOf("<tr><th") -ge 0)
{ Write-Verbose "$(Get-Date): Processing headers..."
$Search = $Line | Select-String -Pattern '<th ?[a-z\-:;"=]*>(.*?)<\/th>' -AllMatches
$Index = 0
ForEach ($Match in $Search.Matches)
{ If ($Match.Groups[1].Value -eq $Property)
{ Break
}
$Index ++
}
If ($Index -eq $Search.Matches.Count)
{ Write-Warning "$(Get-Date): Unable to locate property: $Property in table header"
Exit
}
Write-Verbose "$(Get-Date): $Property column found at index: $Index"
}
If ($Line -match "<tr( style=""background-color:.+?"")?><td")
{ $Search = $Line | Select-String -Pattern '<td ?[a-z\-:;"=]*>(.*?)<\/td>' -AllMatches
$Value = $Search.Matches[$Index].Groups[1].Value -as [double]
If (-not $Value)
{ $Value = $Search.Matches[$Index].Groups[1].Value
}
If (Invoke-Command $Filter)
{ If ($Row)
{ Write-Verbose "$(Get-Date): Criteria met! Changing row to $Color..."
If ($Line -match "<tr style=""background-color:(.+?)"">")
{ $Line = $Line -replace "<tr style=""background-color:$($Matches[1])","<tr style=""background-color:$Color"
}
Else
{ $Line = $Line.Replace("<tr>","<tr style=""background-color:$Color"">")
}
}
Else
{ Write-Verbose "$(Get-Date): Criteria met! Changing cell to $Color..."
$Line = $Line.Replace($Search.Matches[$Index].Value,"<td style=""background-color:$Color"">$Value</td>")
}
}
}
Write-Output $Line
}
}

End {
Write-Verbose "$(Get-Date): Function Set-CellColor completed"
}
}

$bootime = $bootime |ConvertTo-Html -Head $a -body "<H2>Uptime</H2>"
$diskstatus =$diskstatus|ConvertTo-HTML -head $a -body "<H2>Disk Information</H2>" | Set-CellColor 'FreeSpace%' Red -Filter "FreeSpace% -lt 80"
$memorydetails=$memorydetails|ConvertTo-HTML -head $a -body "<H2>Memory Status</H2>"| Set-CellColor 'PercentFree%' Red -Filter "PercentFree% -lt 80"
$ServicesReport=$ServicesReport|ConvertTo-HTML -head $a -body "<H2>Service Information</H2>" | Set-CellColor SStatus red -Filter "Sstatus -eq 'Stopped'"
$infocpu =$infocpu|ConvertTo-HTML -head $a -body "<H2>CPU Status</H2>"| Set-CellColor 'Cputil' Red -Filter "Cputil -gt 80"
$Serverchecksfinal = $ttr + $totalc +"`n`n"+$bootime +"`n"+ $diskstatus + $infocpu+$memorydetails + $ServicesReport

$total= $Serverchecksfinal
#$total = $total -replace("<td>Stopped</td>",'<style> .blue { background: Red; }<td class="blue">Stopped</td>')

Send-MailMessage -To "xxxxx" -From "xxxxx" -SmtpServer "xxxx" -BodyAsHtml "$total" -Subject "Server Health checks on $date"

##########################################################################

Tuesday 12 September 2017

Powershell GUI Tool

########################################################################################################################################################

# Powershell GUI Tool for basic windows Administration############### #

# Created by MLLSatyanarayana Email=mllsatyanarayana@gmail.com #

# Version:1.2 #

# Enter one or mutiple servers line by line under EnterServers box and click the buttons according to your requirement # #

# #

# In this tool all are self explantory except belwo ones #

# 1) Servic check #

# 2) Check Process #

# 3)Port check # #

# 4) Search Event logs #

# #

# For checking Services #

# example in order to check the specfic service name just enter first 3 letter of service name in the Filter box and click in service check #

# you will get the all the services list whih running with that words you mentioned #

# note: if you do not specify any words it will display all the services #

# For checking process #

# example in order to check the specfic process name just enter first 3 letter of processname in the Filter box and click in process check #

# you will get the all the services list whih running with that words you mentioned #

# note: if you do not specify any words it will display all the process #

# #

# For checking event logs #

# example: if you want to check the event logs system or applications select the log types and enter jey words in the filter box #

# #

# @@@@@@@@@@@@@@@@@@@@@You can covert this script to exe @@@@@@@@@@@@@@@@@@@@ #

########################################################################################################################################################

Add-Type -AssemblyName System.Windows.Forms

$Form = New-Object system.Windows.Forms.Form

$Form.Text = "Power-GUI v1.0 Created by mllsatyanarayana"

$Form.TopMost = $true

$Form.Width = 900

$Form.Height = 598

$Form.FormBorderStyle= "Fixed3D"

$form.StartPosition ="centerScreen"

$form.ShowInTaskbar = $true

#############

$InputBox = New-Object system.windows.Forms.TextBox

$InputBox.Multiline = $true

$InputBox.BackColor = "#A7D4F7"

$InputBox.Width = 280

$InputBox.Height = 132

$InputBox.ScrollBars ="Vertical"

$InputBox.location = new-object system.drawing.point(3,31)

$InputBox.Font = "Microsoft Sans Serif,10,style=Bold"

$Form.controls.Add($inputbox)

$outputBox= New-Object System.Windows.Forms.RichTextBox

$outputBox.Multiline = $true

$outputBox.BackColor = "#FDFEFE"

$outputBox.Width = 1200

$outputBox.Height = 300

$outputBox.ReadOnly =$true

$outputBox.ScrollBars = "Both"

$outputBox.WordWrap = $false

$outputBox.location = new-object system.drawing.point(9,350)

$outputBox.Font = "Lucida Sans Typewriter,9"

$Form.controls.Add($outputBox)

$label3 = New-Object system.windows.Forms.Label

$label3.Text = "EnterServers"

$label3.AutoSize = $true

$label3.Width = 25

$label3.Height = 10

$label3.location = new-object system.drawing.point(4,9)

$label3.Font = "Microsoft Sans Serif,10,style=Bold"

$Form.controls.Add($label3)

$filterbox= New-Object system.windows.Forms.TextBox

$filterbox.Multiline = $true

$filterbox.Width = 280

$filterbox.Height = 77

$filterbox.ScrollBars ="Vertical"

$filterbox.location = new-object system.drawing.point(6,191)

$filterbox.Font = "Microsoft Sans Serif,10"

$Form.controls.Add($filterbox)

$Filters = New-Object system.windows.Forms.Label

$Filters.Text = "Filters"

$Filters.AutoSize = $true

$Filters.Width = 25

$Filters.Height = 10

$Filters.location = new-object system.drawing.point(7,170)

$Filters.Font = "Microsoft Sans Serif,10,style=Bold"

$Form.controls.Add($Filters)

$Eventlb = New-Object system.windows.Forms.Label

$Eventlb.Text = "Search Eventlogs"

$Eventlb.AutoSize = $true

$Eventlb.Width = 25

$Eventlb.Height = 10

$Eventlb.location = new-object system.drawing.point(7,280)

$Eventlb.Font = "Microsoft Sans Serif,10,style=Bold"

$Form.controls.Add($Eventlb)

$applicationbutton = New-Object system.windows.Forms.Button

$applicationbutton.BackColor = "#F2FD48"

$applicationbutton.Text = "Application Logs"

$applicationbutton.Width = 100

$applicationbutton.Height = 25

$applicationbutton.location = new-object system.drawing.point(170,300)

$applicationbutton.Font = "Microsoft Sans Serif,8"

$applicationbutton.Add_Click({SAeventlogs})

$Form.controls.Add($applicationbutton)

$sysbutton= New-Object system.windows.Forms.Button

$sysbutton.BackColor = "#56ACF7"

$sysbutton.Text = "System Logs"

$sysbutton.Width = 100

$sysbutton.Height = 25

$sysbutton.location = new-object system.drawing.point(270,300)

$sysbutton.Font = "Microsoft Sans Serif,8"

$sysbutton.Add_Click({SAeventlogs})

$Form.controls.Add($sysbutton)

$Setup= New-Object system.windows.Forms.Button

$Setup.BackColor = "#FF5733"

$Setup.Text = "Setup Logs"

$Setup.Width = 100

$Setup.Height = 25

$Setup.location = new-object system.drawing.point(370,300)

$Setup.Font = "Microsoft Sans Serif,8"

$Setup.Add_Click({SAeventlogs})

$Form.controls.Add($Setup)

#Dropdown Box

$Dropdown = New-Object system.windows.Forms.ComboBox

$Dropdown.BackColor = "#e4f3fa"

$Dropdown.Width = 150

$Dropdown.Height = 20

$Dropdown.location = new-object system.drawing.point(9,300)

$Dropdown.Font = "Microsoft Sans Serif,10"

$Form.controls.Add($Dropdown)

$EVList=@("Application","System","Setup")

foreach ($EV in $EVList) {

$DropDown.Items.Add($EV)

}

##Dropdown Box End

$Outputlb = New-Object system.windows.Forms.Label

$Outputlb.Text = "Output"

$Outputlb.AutoSize = $true

$Outputlb.Width = 25

$Outputlb.Height = 10

$Outputlb.location = new-object system.drawing.point(12,330)

$Outputlb.Font = "Microsoft Sans Serif,10,style=Bold,Italic"

$Form.controls.Add($Outputlb)

$Upbutton = New-Object system.windows.Forms.Button

$Upbutton.BackColor = "#5bd22c"

$Upbutton.Text = "Uptime"

$Upbutton.Width = 80

$Upbutton.Height = 22

$Upbutton.location = new-object system.drawing.point(309,170)

$Upbutton.Font = "Microsoft Sans Serif,8"

$Upbutton.Add_Click({uptime})

$Form.controls.Add($Upbutton)

$IPbutton = New-Object system.windows.Forms.Button

$IPbutton.BackColor = "#5bd22c"

$IPbutton.Text = "IPConf"

$IPbutton.Width = 80

$IPbutton.Height = 22

$IPbutton.location = new-object system.drawing.point(309,200)

$IPbutton.Font = "Microsoft Sans Serif,8"

$IPbutton.Add_Click({IPconf})

$Form.controls.Add($IPbutton)

$Serbutton = New-Object system.windows.Forms.Button

$Serbutton.BackColor = "#5bd22c"

$Serbutton.Text = "Servicecheck"

$Serbutton.Width = 80

$Serbutton.Height = 22

$Serbutton.location = new-object system.drawing.point(309,50)

$Serbutton.Font = "Microsoft Sans Serif,8"

$Serbutton.Add_Click({Service})

$Form.controls.Add($Serbutton)

$Biosbutton = New-Object system.windows.Forms.Button

$Biosbutton.BackColor = "#5bd22c"

$Biosbutton.Text = "Bios Details"

$Biosbutton.Width = 80

$Biosbutton.Height = 22

$Biosbutton.location = new-object system.drawing.point(309,80)

$Biosbutton.Font = "Microsoft Sans Serif,8"

$Biosbutton.Add_Click({bios})

$Form.controls.Add($Biosbutton)

$Listservicebutton = New-Object system.windows.Forms.Button

$Listservicebutton.BackColor = "#5bd22c"

$Listservicebutton.Text = "List Services"

$Listservicebutton.Width = 80

$Listservicebutton.Height = 22

$Listservicebutton.location = new-object system.drawing.point(309,110)

$Listservicebutton.Font = "Microsoft Sans Serif,8"

$Listservicebutton.Add_Click({get-ser})

$Form.controls.Add($Listservicebutton)

$InstalledAppsbutton = New-Object system.windows.Forms.Button

$InstalledAppsbutton.BackColor = "#5bd22c"

$InstalledAppsbutton.Text = "InstalledApps"

$InstalledAppsbutton.Width = 80

$InstalledAppsbutton.Height = 22

$InstalledAppsbutton.location = new-object system.drawing.point(309,140)

$InstalledAppsbutton.Font = "Microsoft Sans Serif,8"

$InstalledAppsbutton.Add_Click({applist})

$Form.controls.Add($InstalledAppsbutton)

$Pingbutton = New-Object system.windows.Forms.Button

$Pingbutton.BackColor = "#5bd22c"

$Pingbutton.Text = "Ping"

$Pingbutton.Width = 80

$Pingbutton.Height = 22

$Pingbutton.location = new-object system.drawing.point(309,21)

$Pingbutton.Font = "Microsoft Sans Serif,8"

$Pingbutton.Add_Click({pingInfo})

$Form.controls.Add($Pingbutton)

$diskbutton = New-Object system.windows.Forms.Button

$diskbutton.BackColor = "#5bd22c"

$diskbutton.Text = "Drive Useage"

$diskbutton.Width = 80

$diskbutton.Height = 22

$diskbutton.location = new-object system.drawing.point(400,21)

$diskbutton.Font = "Microsoft Sans Serif,8"

$diskbutton.Add_Click({disk})

$Form.controls.Add($diskbutton)

$cpubutton = New-Object system.windows.Forms.Button

$cpubutton.BackColor = "#5bd22c"

$cpubutton.Text = "Cpu Utlization"

$cpubutton.Width = 80

$cpubutton.Height = 22

$cpubutton.location = new-object system.drawing.point(400,50)

$cpubutton.Font = "Microsoft Sans Serif,8"

$cpubutton.Add_Click({cpu})

$Form.controls.Add($cpubutton)

$HWSbutton = New-Object system.windows.Forms.Button

$HWSbutton.BackColor = "#5bd22c"

$HWSbutton.Text = "Get-HWSerial"

$HWSbutton.Width = 80

$HWSbutton.Height = 22

$HWSbutton.location = new-object system.drawing.point(400,140)

$HWSbutton.Font = "Microsoft Sans Serif,9"

$HWSbutton.Add_Click({Get-hwserial})

$Form.controls.Add($HWSbutton)

$Membutton = New-Object system.windows.Forms.Button

$Membutton.BackColor = "#5bd22c"

$Membutton.Text = "Memmoryuse"

$Membutton.Width = 80

$Membutton.Height = 22

$Membutton.location = new-object system.drawing.point(400,80)

$Membutton.Font = "Microsoft Sans Serif,8"

$Membutton.Add_Click({Memmoryuse})

$Form.controls.Add($Membutton)

$OSVbutton = New-Object system.windows.Forms.Button

$OSVbutton.BackColor = "#5bd22c"

$OSVbutton.Text = "OsVersion"

$OSVbutton.Width = 80

$OSVbutton.Height = 22

$OSVbutton.location = new-object system.drawing.point(490,140)

$OSVbutton.Font = "Microsoft Sans Serif,8"

$OSVbutton.Add_Click({get-osv})

$Form.controls.Add($OSVbutton)

$Process = New-Object system.windows.Forms.Button

$Process.BackColor = "#5bd22c"

$Process.Text = "Check Process"

$Process.Width = 80

$Process.Height = 22

$Process.location = new-object system.drawing.point(400,110)

$Process.Font = "Microsoft Sans Serif,8"

$Process.Add_Click({proc})

$Form.controls.Add($Process)

$commgmtbutton = New-Object system.windows.Forms.Button

$commgmtbutton.BackColor = "#55e72c"

$commgmtbutton.Text = "Compmgmt"

$commgmtbutton.Width = 80

$commgmtbutton.Height = 22

$commgmtbutton.location = new-object system.drawing.point(400,170)

$commgmtbutton.Font = "Microsoft Sans Serif,8"

$commgmtbutton.Add_Click({sysmgmt})

$Form.controls.Add($commgmtbutton)

$LAdminbutton = New-Object system.windows.Forms.Button

$LAdminbutton.BackColor = "#5bd22c"

$LAdminbutton.Text = "Get-localadmins"

$LAdminbutton.Width = 89

$LAdminbutton.Height = 22

$LAdminbutton.location = new-object system.drawing.point(490,21)

$LAdminbutton.Font = "Microsoft Sans Serif,8"

$LAdminbutton.Add_Click({Localadmins})

$Form.controls.Add($LAdminbutton)

$DSAbutton = New-Object system.windows.Forms.Button

$DSAbutton.BackColor = "#5bd22c"

$DSAbutton.Text = "DSA.MSC"

$DSAbutton.Width = 80

$DSAbutton.Height = 22

$DSAbutton.location = new-object system.drawing.point(490,50)

$DSAbutton.Font = "Microsoft Sans Serif,8"

$DSAbutton.Add_Click({dsamsc})

$Form.controls.Add($DSAbutton)

$portbutton = New-Object system.windows.Forms.Button

$portbutton.BackColor = "#5bd22c"

$portbutton.Text = "Port check"

$portbutton.Width = 80

$portbutton.Height = 22

$portbutton.location = new-object system.drawing.point(490,80)

$portbutton.Font = "Microsoft Sans Serif,8"

$portbutton.Add_Click({Get-portstatus})

$Form.controls.Add($portbutton)

$Remoteshutbutton = New-Object system.windows.Forms.Button

$Remoteshutbutton.BackColor = "#e3211d"

$Remoteshutbutton.Text = "RemoteShutdown"

$Remoteshutbutton.Width = 88

$Remoteshutbutton.Height = 22

$Remoteshutbutton.location = new-object system.drawing.point(490,110)

$Remoteshutbutton.Font = "Microsoft Sans Serif,7"

$Remoteshutbutton.Add_Click({poweroff})

$Form.controls.Add($Remoteshutbutton)

$Hotfixbutton= New-Object system.windows.Forms.Button

$Hotfixbutton.BackColor = "#5bd22c"

$Hotfixbutton.Text = "Hotfix"

$Hotfixbutton.Width = 80

$Hotfixbutton.Height = 22

$Hotfixbutton.location = new-object system.drawing.point(490,170)

$Hotfixbutton.Font = "Microsoft Sans Serif,8"

$Hotfixbutton.Add_Click({Get-update})

$Form.controls.Add($Hotfixbutton)

$exitbutton = New-Object system.windows.Forms.Button

$exitbutton.BackColor = "#5bd22c"

$exitbutton.Text = "Exit"

$exitbutton.Width = 80

$exitbutton.Height = 22

$exitbutton.location = new-object system.drawing.point(600,20)

$exitbutton.Font = "Microsoft Sans Serif,8"

$exitbutton.Add_Click({$form.close()})

$Form.controls.Add($exitbutton)

###################This function is to dispaly the progress############################

Function Progressbar

{

Add-Type -AssemblyName system.windows.forms

$Script:formt = New-Object System.Windows.Forms.Form

$Script:formt.Text = 'Please Wait'

$Script:formt.TopMost = $true

$Script:formt.StartPosition ="CenterScreen"

$Script:formt.Width = 500

$Script:formt.Height = 20

$Script:formt.MaximizeBox = $false

$Script:formt.MinimizeBox = $false

$Script:formt.Visible = $false

}

############################################## End of Progressbar function#############

############################################## PingFunction#############

function pingInfo {

progressbar

$outputBox.Clear()

$outputBox.text= "Pining the servers please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$infping =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$infping +=ping $computer -n 3

$pingResult=$infping| ft | out-string

}

$outputBox.Appendtext("{0}`n" -f $pingResult + "`n $ct")

$Script:formt.close()

}

####################end pingInfo########################################

####################################Uptime function start####################################

function get-uptime {

param(

$computername =$env:computername

)

$os = Get-WmiObject win32_operatingsystem -ComputerName $computername -ea silentlycontinue

if($os){

$lastbootuptime =$os.ConvertTodateTime($os.LastBootUpTime)

$LocalDateTime =$os.ConvertTodateTime($os.LocalDateTime)

$up =$LocalDateTime - $lastbootuptime

$uptime ="$($up.Days) days, $($up.Hours)h, $($up.Minutes)mins"

$results =new-object psobject

$results |Add-Member noteproperty LastBootUptime $LastBootuptime

$results |Add-Member noteproperty ComputerName $computername

$results |Add-Member noteproperty uptime $uptime

#Display the results

$results | Select-Object computername,LastBootuptime,Uptime

}

else

{

$results =New-Object psobject

$results =new-object psobject

$results |Add-Member noteproperty LastBootUptime "Na"

$results |Add-Member noteproperty ComputerName $computername

$results |Add-Member noteproperty uptime "Na"

#display the results

$results | Select-Object computername,LastBootUptime,Uptime

}

$infouptime =@()

foreach($allserver in $allservers){

$infouptime += get-uptime $allserver

}

$infouptime

function uptime {

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting Uptime Please wait"

$computers=$InputBox.lines.Split("`n")

$date = Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$infouptime = @()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$infouptime += get-uptime $computer

$res =$infouptime | ft -AutoSize | Out-String

}

$outputBox.Appendtext("{0}`n" -f $res +"`n $ct" )

$Script:formt.close()

}

####################################Uptime function end####################################

#####################################Disk Functions start############################################

Function Dinfo ($ComputerName=$ENV:ComputerName) {

foreach ($disk in $ComputerName){

Get-WmiObject win32_logicaldisk -ComputerName $ComputerName -Filter "Drivetype=3" |

Select-Object @{Label = "ServerName";Expression = {$_.__Server}},

@{Label = "Drive Letter";Expression = {$_.DeviceID}},

@{Label = "Total Capacity (GB)";Expression = {"{0:N1}" -f( $_.Size / 1gb)}},

@{Label = "Free Space (GB)";Expression = {"{0:N1}" -f( $_.Freespace / 1gb ) }},

@{Label="FreeSpace%"; Expression={"{0:N0}" -F (($_.Freespace/$_.Size)*100)}}

}

function disk {

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting Drive status Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$infod=@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$infod += Dinfo $computer

$dpres= $infod | ft -AutoSize | Out-String

}

$outputBox.Appendtext("{0}`n" -f $dpres +"`n $ct" )

$Script:formt.close()

}

#####################################Disk Functions start############################################

###############################Remote shutdown#####################################

function poweroff{

$po=shutdown -i

Write-Host $po

}

function sysmgmt{

$outputBox.Text ="opening mmc console for computer management Please wait"

$cm= compmgmt.msc

Write-Host $cm

}

function dsamsc{

$outputBox.Text ="opening DSA.MSC console for computer management Please wait"

$cm= DSA.msc

Write-Host $cm

}

###############################Remote shutdown END #####################################

##################################Service function#################################

function Service{

progressbar

$outputBox.Clear()

$outputBox.Text = "Getting Service status please wait"

$computers=$InputBox.lines.Split("`n")

$sname =$filterbox.text

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$infserv =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

#$s= Get-Service -ComputerName $computer -Name $sname| Select-Object MachineName,Name,Status | ft -AutoSize | Out-String

$infserv +=Get-WmiObject -Class win32_service -ComputerName $computer -Filter "Name Like '%$sname%'" | Select-Object PSComputerName,Name,StartMode,State

$s = $infserv| ft -AutoSize | Out-String

}

$outputBox.Appendtext("{0}`n" -f $s+"`n $ct")

$Script:formt.close()

}

##################################Service function end #################################

####################################################memmoryFunctions ###start#########################

Function Get-MemmoryUtlizatio ($ComputerName=$ENV:ComputerName) {

Get-WmiObject Win32_OperatingSystem -ComputerName $ComputerName |

Select @{Name="Servername";Expression = {$_.__Server}},

@{Name = "TotalGB";Expression = {[int]($_.TotalVisibleMemorySize/1mb)}},

@{Name = "FreeGB";Expression = {[math]::Round($_.FreePhysicalMemory/1mb,2)}},

@{Name = "PercentFree%"; Expression = {[math]::Round(($_.FreePhysicalMemory/$_.TotalVisibleMemorySize)*100,2)}}

}

function Memmoryuse {

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting Memmory Useage Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$infoms =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$infoms += Get-MemmoryUtlizatio $computer

$mres = $infoms |ft -AutoSize | Out-String

}

$outputBox.Appendtext("{0}`n" -f $mres + "`n $ct" )

$Script:formt.close()

}

####################################memmory function end#####################################################

####################################################Installed Appst##########################################

function Get-InstalledApps

{

[CmdletBinding()]

[OutputType([int])]

Param

(

[Parameter(Mandatory=$true,

ValueFromPipelineByPropertyName=$true,

Position=0)]

$computer

)

Begin

{

}

Process

{

$win32_product = @(get-wmiobject -class ‘Win32_Product’ -computer $computer)

foreach ($app in $win32_product){

$applications = New-Object PSObject -Property @{

Name = $app.Name

Version = $app.Version

InstallDate=$app.InstallDate

Computername=$app.PSComputerName

}

Write-Output $applications | Select-Object Computername,Name,Version, InstallDate

}

End

{

}

function Applist {

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting Installed appliations Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$m = Get-InstalledApps $computer |Out-String

Write-Host $m | ft -AutoSize

$outputBox.Appendtext("{0}`n" -f $m +"`n $ct" )

$Script:formt.close()

}

####################################################Installed Appstend#############################################

######################################################################

# Powershell script to get the the Services on remote servers

# It will give the services status

# Customized script useful to every one

# Please contact mllsatyanarayana@gmail.com for any suggestions#

#########################################################################

function Get-servies

{

[CmdletBinding()]

[OutputType([int])]

Param

(

[Parameter(Mandatory=$true,

ValueFromPipelineByPropertyName=$true,

Position=0)]

$computer

)

Begin

{

}

Process

{

$win32_product = @(get-wmiobject -class ‘win32_service’ -computer $computer)

foreach ($app in $win32_product){

$applications = New-Object PSObject -Property @{

Name = $app.Name

StartMode = $app.StartMode

State=$app.State

Computername=$app.PSComputerName

}

Write-Output $applications | Select-Object Computername,Name,StartMode, State

}

End

{

}

function Get-ser {

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting Services status Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$infser =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$infser += Get-servies $computer

$sl = $infser| ft -AutoSize |Out-String

}

$outputBox.Appendtext("{0}`n" -f $sl +"`n $ct" )

$Script:formt.close()

}

####function end###

#########################################HOTFIX################################

function Get-hotfixes

{

[CmdletBinding()]

[OutputType([int])]

Param

(

[Parameter(Mandatory=$true,

ValueFromPipelineByPropertyName=$true,

Position=0)]

$computer

)

Begin

{

}

Process

{

$win32_product = @(get-wmiobject -class ‘Win32_QuickfixEngineering’ -computer $computer)

foreach ($app in $win32_product){

$applications = New-Object PSObject -Property @{

Name = $app.Name

Description = $app.Description

HotFixID=$app.HotFixID

InstalledBy=$app.InstalledBy

InstalledOn=$app.InstalledOn

Computername=$app.PSComputerName

}

Write-Output $applications | Select-Object Computername,HotFixID ,InstalledBy, InstalledOn

}

End

{

}

function Get-update {

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting windows updates list Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$m = Get-hotfixes $computer | ft -AutoSize|Out-String

$outputBox.Appendtext("{0}`n" -f $m +"`n $ct" )

$Script:formt.close()

}

#########################################HOTFIXEND################################

############################################OSTYPE#####################################

function Get-ostype

{

[CmdletBinding()]

[OutputType([int])]

Param

(

[Parameter(Mandatory=$true,

ValueFromPipelineByPropertyName=$true,

Position=0)]

$computer

)

Begin

{

}

Process

{

$win32_product = @(get-wmiobject -class ‘ Win32_OperatingSystem ’ -computer $computer)

foreach ($app in $win32_product){

$applications = New-Object PSObject -Property @{

Name = $app.Name

caption = $app.caption

OSArchitecture=$app.OSArchitecture

ServicePackMajorVersion=$app.ServicePackMajorVersion

Computername=$app.PSComputerName

}

Write-Output $applications | Select-Object Computername, caption,OSArchitecture, ServicePackMajorVersion

}

End

{

}

function Get-osv {

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting OS version Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$osver =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$osver += Get-ostype $computer

$osvr = $osver | ft -AutoSize|Out-String

}

$outputBox.Appendtext("{0}`n" -f $osvr+"`n $ct" )

$Script:formt.close()

}

############################################OSTYPE#####################################

####################serial start####################################################################

function get-serial {

param(

$computername =$env:computername

)

$os = Get-WmiObject Win32_bios -ComputerName $computername -ea silentlycontinue

if($os){

$SerialNumber =$os.SerialNumber

$servername=$os.PSComputerName

$results =new-object psobject

$results |Add-Member noteproperty SerialNumber $SerialNumber

$results |Add-Member noteproperty ComputerName $servername

#Display the results

$results | Select-Object computername,SerialNumber

}

else

{

$results =New-Object psobject

$results =new-object psobject

$results |Add-Member noteproperty SerialNumber "Na"

$results |Add-Member noteproperty ComputerName $servername

#display the results

$results | Select-Object computername,SerialNumber

}

$infserial =@()

foreach($allserver in $allservers){

$infserial += get-serial $allserver

}

$infserial

function Get-hwserial {

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting Serialnumbers Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$infserial =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$infserial += Get-serial $computer

$res = $infserial | ft -AutoSize | Out-String

}

$outputBox.Appendtext("{0}`n" -f $res +"`n $ct" )

$Script:formt.close()

}

####################serial start###############################################################

#############Bios start#######################################################################

function get-Bios {

param(

$computername =$env:computername

)

$os = Get-WmiObject Win32_bios -ComputerName $computername -ea silentlycontinue

if($os){

$SerialNumber =$os.SerialNumber

$servername=$os.PSComputerName

$Name= $os.Name

$SMBIOSBIOSVersion=$os.SMBIOSBIOSVersion

$Manufacturer=$os.Manufacturer

$results =new-object psobject

$results |Add-Member noteproperty SerialNumber $SerialNumber

$results |Add-Member noteproperty ComputerName $servername

$results |Add-Member noteproperty Name $Name

$results |Add-Member noteproperty SMBIOSBIOSVersion $SMBIOSBIOSVersion

$results |Add-Member noteproperty Manufacture $Manufacture

#Display the results

$results | Select-Object computername,SMBIOSBIOSVersion,Name,Manufacture ,SerialNumber

}

else

{

$results =new-object psobject

$results |Add-Member noteproperty SerialNumber "Na"

$results |Add-Member noteproperty ComputerName $servername

$results |Add-Member noteproperty Name $Name

$results |Add-Member noteproperty SMBIOSBIOSVersion $SMBIOSBIOSVersion

$results |Add-Member noteproperty Manufacture $Manufacture

#display the results

$results | Select-Object computername,SMBIOSBIOSVersion,Name,Manufacture ,SerialNumber

}

$infbios =@()

foreach($allserver in $allservers){

$infbios += get-Bios $allserver

}

$infbios

function bios {

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting Bios details Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$infbios =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$infbios += get-Bios $computer

$res = $infbios | ft -AutoSize | Out-String

}

$outputBox.Appendtext("{0}`n" -f $res +"`n $ct" )

$Script:formt.close()

}

#############################Bios start#######################################################################

###############################################pstart###########################################

function checkport {

param(

$computername =$env:computername

)

$sname =$filterbox.text

$os = Test-NetConnection -ComputerName $computername -port $sname -ea silentlycontinue

if($os){

$TcpTestSucceeded =$os.TcpTestSucceeded

$servername=$os.ComputerName

$results =new-object psobject

$results |Add-Member noteproperty TcpTestSucceeded $TcpTestSucceeded

$results |Add-Member noteproperty ComputerName $servername

#Display the results

$results | Select-Object computername,TcpTestSucceeded

}

else

{

$results =New-Object psobject

$results =new-object psobject

$results |Add-Member noteproperty TcpTestSucceeded "Na"

$results |Add-Member noteproperty ComputerName $servername

#display the results

$results | Select-Object computername,TcpTestSucceeded

}

$infoport =@()

foreach($allserver in $allservers){

$infoport += checkport $allserver

}

$infoport

function Get-portstatus {

progressbar

$outputBox.Clear()

$outputBox.Text ="Checking Port status Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$infoport =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$infoport += checkport $computer

$pres= $infoport| ft -AutoSize | Out-String

}

$outputBox.Appendtext("{0}`n" -f $pres +"`n $ct")

$Script:formt.close()

}

###############################################pstartend###########################################

function exit{

$global:QUIT = $true

$objForm.Close()

}

############local admin start###########

function get-localadmin {

param ($computerName)

$admins = Gwmi win32_groupuser –computer $computerName

$admins = $admins |? {$_.groupcomponent –like '*"Administrators"'}

$admins |% {

$_.partcomponent –match “.+Domain\=(.+)\,Name\=(.+)$” > $nul

$matches[1].trim('"') + “\” + $matches[2].trim('"')

}

$inflocaladmin =@()

foreach($allserver in $allservers){

$inflocaladmin += get-localadmin $allserver

}

$inflocaladmin

function Localadmins{

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting Local admins list Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$inflocaladmin =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$inflocaladmin += get-localadmin $computer

$infres = $inflocaladmin| ft -AutoSize|Out-String

}

$outputBox.Appendtext("{0}`n" -f $infres +"`n $ct" )

$Script:formt.close()

}

############local admin function ends###########

################CPU Function Start#############################################

function Get-Cpu{

param(

$computername =$env:computername

)

$os = gwmi win32_perfformatteddata_perfos_processor -ComputerName $computername| ? {$_.name -eq "_total"} | select -ExpandProperty PercentProcessorTime -ea silentlycontinue

if(($os -match '\d+') -or ($os -eq '0')){

$results =new-object psobject

$results |Add-Member noteproperty Cputil $os

$results |Add-Member noteproperty ComputerName $computername

$results | Select-Object computername,Cputil

}

else{

$results =new-object psobject

$results |Add-Member noteproperty Cputil "Na"

$results |Add-Member noteproperty ComputerName $computername

$results | Select-Object computername,Cputil

}

function cpu {

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting cpu details Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$infcpu =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$infcpu += get-Cpu $computer

$res = $infcpu | ft -AutoSize | Out-String

}

$outputBox.Appendtext("{0}`n" -f $res +"`n $ct" )

$Script:formt.close()

}

################CPU Function end#############################################

##################Processfunction Start########################################

Function Processutil ($computerName=$env:COMPUTERNAME) {

if ($osp = Get-wmiobject win32_process -ComputerName $ComputerName | where{$_.name -like "*$sname*"} | Sort ws -desc | ft Pscomputername,Name,ProcessId,@{Name="Mem Useage (MB)";Expression={[math]::round($_.ws / 1mb)}} -AutoSize )

{

$osp

}

else

{

$outputbox.text = "Server offlne or no process running"

}

function proc {

progressbar

$outputBox.Clear()

$outputBox.Text ="Getting Process info Please wait"

$computers=$InputBox.lines.Split("`n")

$date =Get-Date

$sname =$filterbox.text

$ct = "Task Completed @ " + $date

$Script:formt.Visible=$true

$infproc =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$infproc += Processutil $computer

$pres = $infproc| ft -AutoSize | Out-String

}

$outputBox.Appendtext("{0}`n" -f $pres +"`n $ct" )

$Script:formt.close()

}

##################Processfunction Start########################################

function SAeventlogs{

progressbar

$outputBox.Clear()

$outputBox.text= "Getting Eventlogs please wait"

$date=Get-Date

$computers=$InputBox.lines.Split("`n")

$evs =$Dropdown.SelectedItem.ToString()

$ct = "Task Completed @ " + $date

$sname =$filterbox.text

$Script:formt.Visible=$true

$infev =@()

foreach ($computer in $computers)

{

$Script:formt.text="Working on $computer"

$infev += Get-winevent $evs -ComputerName $computer| Where-Object {($_.Message -match "$sname") -or ($_.ID -match "$sname")} |Select-Object Machinename,ID,Timecreated,Message

$evResult =$infev | ft -AutoSize | Out-String

}

$outputBox.Appendtext("{0}`n" -f $evResult + "`n $ct")