powershell 用于服务器运行状况的Powershell GUI Tool v.1.3远程检查
https://gallery.technet.microsoft.com/scriptcenter/Power-shell-GUI-Tool-v10-41f92b49
Powershell GUI Tool v.1.3 for Server Health checks Remotely.ps1
########################################################################################################################################################
# Powershell GUI Tool for basic windows Administration###############
# Created by MLLSatyanarayana Email=mllsatyanarayana@gmail.com
# Version:1.3
# 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 key words or Event ID in the filter box
#
# # Note: Please copy "Lucida Sans Typewriter,9" font in your server where this tool is running in order to get the out put in clearly
#
#
# @@@@@@@@@@@@@@@@@@@@@You can covert this script to exe @@@@@@@@@@@@@@@@@@@@
########################################################################################################################################################
Add-Type -AssemblyName System.Windows.Forms
$Form = New-Object system.Windows.Forms.Form
$Form.Text = "Power-GUI Version 1.3 Created by mllsatyanarayana@gmail.com"
$Form.TopMost = $true
$Form.Width = 900
$Form.Height = 700
$Form.FormBorderStyle= "Fixed3D"
$form.StartPosition ="centerScreen"
$form.ShowInTaskbar = $true
$StatusBar = New-Object System.Windows.Forms.StatusBar
$StatusBar.Text = "Ready"
$StatusBar.Height = 22
$StatusBar.Width = 200
$StatusBar.Location = New-Object System.Drawing.Point( 0, 250 )
$Form.Controls.Add($StatusBar)
$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,420)
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(36, 36,255 )
$applicationbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$applicationbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(36, 255, 36)
$sysbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$sysbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$Setup.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$Setup.Cursor = [System.Windows.Forms.Cursors]::Hand
$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,370)
$Outputlb.Font = "Microsoft Sans Serif,20,style=Bold"
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$Upbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$Upbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$Upbutton.Add_Click({uptime})
$Form.controls.Add($Upbutton)
$NICbutton = New-Object system.windows.Forms.Button
$NICbutton.BackColor = "#5bd22c"
$NICbutton.Text = "Nicdetails"
$NICbutton.Width = 80
$NICbutton.Height = 22
$NICbutton.location = new-object system.drawing.point(309,200)
$NICbutton.Font = "Microsoft Sans Serif,8"
$NICbutton.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$NICbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$NICbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$NICbutton.Add_Click({nic})
$Form.controls.Add($NICbutton)
$WLAbutton = New-Object system.windows.Forms.Button
$WLAbutton.BackColor = "#5bd22c"
$WLAbutton.Text = "Windows OS Activation status"
$WLAbutton.Width = 180
$WLAbutton.Height = 22
$WLAbutton.location = new-object system.drawing.point(309,230)
$WLAbutton.Font = "Microsoft Sans Serif,8"
$WLAbutton.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$WLAbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$WLAbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$WLAbutton.Add_Click({WLA})
$Form.controls.Add($WLAbutton)
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$Serbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$Serbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$Biosbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$Biosbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$Listservicebutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$Listservicebutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$InstalledAppsbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$InstalledAppsbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$Pingbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$Pingbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$diskbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$diskbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$cpubutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$cpubutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$HWSbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$HWSbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$Membutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$Membutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$OSVbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$OSVbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$Process.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$Process.Cursor = [System.Windows.Forms.Cursors]::Hand
$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})
$commgmtbutton.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$commgmtbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$commgmtbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$LAdminbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$LAdminbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$DSAbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$DSAbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$portbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$portbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$Remoteshutbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$Remoteshutbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$Hotfixbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$Hotfixbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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.FlatAppearance.MouseOverBackColor = [System.Drawing.Color]::FromArgb(255, 255, 36)
$exitbutton.FlatStyle = [System.Windows.Forms.FlatStyle]::Flat
$exitbutton.Cursor = [System.Windows.Forms.Cursors]::Hand
$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 {
$statusBar.Text=("Processing the request")
progressbar
$outputBox.Clear()
$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")
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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")
$statusBar.Text=("Ready")
$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 = "MemoryUsage"; Expression = {“{0:N2}” -f ((($_.TotalVisibleMemorySize - $_.FreePhysicalMemory)*100)/ $_.TotalVisibleMemorySize) }},
@{Name = "FreeGB";Expression = {[math]::Round($_.FreePhysicalMemory/1mb,2)}},
@{Name = "PercentFree%"; Expression = {[math]::Round(($_.FreePhysicalMemory/$_.TotalVisibleMemorySize)*100,2)}}
}
function Memmoryuse {
progressbar
$outputBox.Clear()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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")
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$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()
$statusBar.Text=("Processing the request")
$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" )
$statusBar.Text=("Ready")
$Script:formt.close()
}
##################Processfunction Start########################################
function SAeventlogs{
progressbar
$outputBox.Clear()
$statusBar.Text=("Processing the request")
$date=Get-Date
$computers=$InputBox.lines.Split("`n")
$evs =$Dropdown.SelectedItem.ToString()
$app= $evs
$args = @{}
$args.Add("StartTime", ((Get-Date).AddHours(-24)))
$args.Add("EndTime", (Get-Date))
$args.Add("LogName", $app)
$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 -FilterHashtable $args -ComputerName $computer| Where-Object {($_.Message -match "$sname") -or ($_.ID -match "$sname")} |Select-Object Machinename,ID,Timecreated,Message
$evResult =$infev | ft -AutoSize -Wrap | Out-String
}
$outputBox.Appendtext("{0}`n" -f $evResult + "`n $ct")
$statusBar.Text=("Ready")
$Script:formt.close()
}
##################################################Nic Start ###############
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
}
}
}
}
function Nic {
progressbar
$outputBox.Clear()
$statusBar.Text=("Processing the request")
$computers=$InputBox.lines.Split("`n")
$date =Get-Date
$sname =$filterbox.text
$ct = "Task Completed @ " + $date
$Script:formt.Visible=$true
$infnic =@()
foreach ($computer in $computers)
{
$Script:formt.text="Working on $computer"
$infnic += NetIPdetails $computer
$nres = $infnic| ft -AutoSize | Out-String
}
$outputBox.Appendtext("{0}`n" -f $nres +"`n $ct" )
$statusBar.Text=("Ready")
$Script:formt.close()
}
##################################################End of the function###############
function Get-ActivationStatus {
[CmdletBinding()]
param(
[Parameter(ValueFromPipeline = $true, ValueFromPipelineByPropertyName = $true)]
[string]$DNSHostName = $Env:COMPUTERNAME
)
process {
try {
$wpa = Get-WmiObject SoftwareLicensingProduct -ComputerName $DNSHostName `
-Filter "ApplicationID = '55c92734-d682-4d71-983e-d6ec3f16059f'" `
-Property LicenseStatus -ErrorAction Stop
} catch {
$status = New-Object ComponentModel.Win32Exception ($_.Exception.ErrorCode)
$wpa = $null
}
$out = New-Object psobject -Property @{
ComputerName = $DNSHostName;
Status = [string]::Empty;
}
if ($wpa) {
:outer foreach($item in $wpa) {
switch ($item.LicenseStatus) {
0 {$out.Status = "Unlicensed"}
1 {$out.Status = "Licensed"; break outer}
2 {$out.Status = "Out-Of-Box Grace Period"; break outer}
3 {$out.Status = "Out-Of-Tolerance Grace Period"; break outer}
4 {$out.Status = "Non-Genuine Grace Period"; break outer}
5 {$out.Status = "Notification"; break outer}
6 {$out.Status = "Extended Grace"; break outer}
default {$out.Status = "Unknown value"}
}
}
} else { $out.Status = $status.Message }
$out
}
}
function WLA {
progressbar
$outputBox.Clear()
$statusBar.Text=("Processing the request")
$computers=$InputBox.lines.Split("`n")
$date =Get-Date
$sname =$filterbox.text
$ct = "Task Completed @ " + $date
$Script:formt.Visible=$true
$infwl =@()
foreach ($DNSHostName in $computers)
{
$Script:formt.text="Working on $computer"
$infwl += Get-ActivationStatus $DNSHostName
$wlres = $infwl| ft -AutoSize | Out-String
}
$outputBox.Appendtext("{0}`n" -f $wlres+"`n $ct" )
$statusBar.Text=("Ready")
$Script:formt.close()
}
[void]$Form.ShowDialog()
$Form.Dispose()powershell 从命令行浏览
ping_site.ps1
invoke-webrequest "https://somesite" -headers @{ "accept"= "application/json" } powershell 测试端口
Import-Module。\ Test-Port.ps1 <br/> Test-Port -ComputerName x.x.x.x -port xx <br/>
Test-Port.ps1
#requires -Version 1
function Test-Port
{
Param([string]$ComputerName,$port = 5985,$timeout = 1000)
try
{
$tcpclient = New-Object -TypeName system.Net.Sockets.TcpClient
$iar = $tcpclient.BeginConnect($ComputerName,$port,$null,$null)
$wait = $iar.AsyncWaitHandle.WaitOne($timeout,$false)
if(!$wait)
{
$tcpclient.Close()
return $false
}
else
{
# Close the connection and report the error if there is one
$null = $tcpclient.EndConnect($iar)
$tcpclient.Close()
return $true
}
}
catch
{
$false
}
}
powershell Mongodb快速修复
Mongodb快速修复
gistfile1.ps1
service mongod stop
rm /data/db/mongod.lock
rm /var/lib/mongo/mongod.lock
rm /var/log/mongodb/mongod.log
rm /tmp/mongodb-27017.sock
mongod --dbpath /data/db/ --repair
mongod --dbpath /data/db/
mongod --repair
chown -R mongod:mongod /data/db/
chown -R mongod:mongod /var/lib/mongo/
service mongod start
service mongod restart
Nguyen Thanh Toan commented 8 minutes ago
editdelete
Chú ý khi update mongodb
https://docs.mongodb.com/manual/release-notes/4.2-upgrade-standalone/
https://stackoverflow.com/questions/48318487/error-while-upgrading-mongodb-from-3-2-to-3-6powershell PowerShell配置文件
PSProfile
#_________________________________________________________________________________________
Write-Host "Initializing the Shell..." -ForegroundColor DarkCyan -BackgroundColor White
$global:sysvars = Get-Variable | Select-Object -ExpandProperty Name
$global:sysvars += 'sysvars'
$greetings =
'Welcome back Jake',
'Glad to see you Jake!',
'Happy coding Jake!',
'Have a great day Jake!',
'Be one with the Snover!',
'May the PowerShell be with you!'
#_________________________________________________________________________________________
<#
.SYNOPSIS
Clears all errors, variables, console, and sets locations back to C:\
.NOTES
System variables are not cleared - as they are gathered previously and left un-touched.
#>
function Clear-All {
$sysvariables = $sysvars
#clear all errors
$error.clear()
#clear all non-system variables
Get-Variable |
Where-Object {$sysvariables -notcontains $_.Name -and $_.Name -ne "sysvariables"} |
ForEach-Object {Remove-Variable $_.name -Scope Global}
Clear-Host
Set-Location C:\
}
<#
.SYNOPSIS
Opens explorer window to the current console path location
#>
function Open-Here {
explorer $pwd
}
<#
.SYNOPSIS
Get beautiful syntax for any cmdlet
#>
function Get-Syntax {
[CmdletBinding()]
param (
$Command,
[switch]
$PrettySyntax
)
$check = Get-Command -Name $Command
$params = @{
Name = if ($check.CommandType -eq 'Alias') {
Get-Command -Name $check.Definition
}
else {
$Command
}
Syntax = $true
}
$pretty = $true
if ($pretty -eq $true) {
(Get-Command @params) -replace '(\s(?=\[)|\s(?=-))', "`r`n "
}
else {
Get-Command @params
}
}
<#
.SYNOPSIS
Quickly and easily reverses a list
#>
function Sort-Reverse {
$rank = [int]::MaxValue
$input | Sort-Object {(--(Get-Variable rank -Scope 1).Value)}
}
<#
.SYNOPSIS
Get a nicely formatted output of recent errors.
#>
function Get-ErrorCount {
$Error `
| Group-Object `
| Sort-Object -Property Count -Descending `
| Format-Table -Property Count,Name -AutoSize
}
#_________________________________________________________________________________________
# set easy aliases for various functions
New-Alias -Name ca -value Clear-All
New-Alias -Name op -value Open-Here
New-Alias -Name syn -value Get-Syntax
New-Alias -Name sr -value Sort-Reverse
New-Alias -Name ec -value Get-ErrorCount
#_________________________________________________________________________________________
# Custom prompt function
function global:prompt {
$global:promptDateTime = [datetime]::Now
$Global:promptDate = $global:promptDateTime.ToString("dd/MM/yyyy")
$Global:promptTime = $global:promptDateTime.ToLongTimeString()
$global:promptPath = $pwd.ToString().split('\')[-2..-1] -join '\'
Write-Host -Object ("[{0} {1}]" -f $global:promptDate, $global:PromptTime) -ForegroundColor Green -NoNewline
(" {0}> " -f $global:promptPath)
Write-VcsStatus
return " "
}
#_________________________________________________________________________________________
# load up any desired modules
$modulesToLoad = @(
'posh-git'
)
foreach ($module in $modulesToLoad) {
Write-Host -ForegroundColor Gray ("Jake, at your request I am loading up the $module module...")
try {
Import-Module $module -ErrorAction Stop
Write-Host "$module loaded." -ForegroundColor Magenta
}
catch{
Write-Host "Jake, $module has failed to load." -ForegroundColor DarkRed
}
}
#_________________________________________________________________________________________
$ProgressPreference = 'SilentlyContinue'
#_________________________________________________________________________________________
Set-PSReadlineOption -ContinuationPrompt ">>>"
Write-Host "Initilization complete." ($greetings | Get-Random) -ForegroundColor Cyan -BackgroundColor Black
#_________________________________________________________________________________________powershell 修复Bug Mongodb
修复Bug Mongodb
Fix Bug Mongodb.ps1
Đợi repair xong
Xem lại phân quyền trên folder
https://dba.stackexchange.com/questions/95539/mongodb-doesnt-start-after-changing-the-data-directory
service mongod stop
sudo chown -R mongod:mongod /data/db
sudo chown -R mongod:mongod /var/lib/mongo/
service mongod start
service mongod restart
powershell 在Windows 10 1809上安装RSAT
Windows10-1809-RAST
# Get a list of RSAT Capabilities
Get-WindowsCapability -Name RSAT* -Online | Select-Object -Property DisplayName, State
# Install RSAT
Get-WindowsCapability -Name RSAT* -Online | Add-WindowsCapability -Online
powershell 愚蠢的字符串技巧
lowercase_sql_commands.ps1
# could be any file, but lowercase sql commands
$sqlFile = "somefile"
gc $sqlFile | % { [regex]::replace($_, "\b(INSERT|CROSS|JOIN|SELECT|DISTINCT|FROM|OUTPUT|LEFT|DELETE|WHERE|BEGIN|END|AND|IF|EXISTS|PRINT|OUTER|LOWER|CONVERT|HASHBYTES|INNER|UPDATE|INTO|SET|DECLARE|REPLACE|VALUES|QUOTED|IDENTIFIER|ON|OFF|OUTER)\b", { $args[0].Value.ToLower() } ) } | set-content -Encoding UTF8 $sqlFile
"inSERT","crOSS" | % { [regex]::replace($_, "\b(INSERT|CROSS|JOIN|SELECT|DISTINCT|FROM|OUTPUT|LEFT|DELETE|WHERE|BEGIN|END|AND|IF|EXISTS|PRINT|OUTER|LOWER|CONVERT|HASHBYTES|INNER|UPDATE|INTO|SET|DECLARE|REPLACE|VALUES|QUOTED|IDENTIFIER|ON|OFF|OUTER)\b", { $args[0].Value.ToLower() }, [Text.RegularExpressions.RegexOptions]::IgnoreCase ) }
## format [-f Format operator - PowerShell - SS64.com] (https://ss64.com/ps/syntax-f-operator.html)
"({0})" -f ('alpha','beta' -join '|' ) powershell 使用PowerShell注销远程用户
使用PowerShell注销远程用户
LogoffRemoteUser.ps1
$userName = '<account>'
$server = "<server>"
$sessionId = ((quser /server:$server | Where-Object { $_ -match $userName }) -split ' +')[2]
write-host $sessionId
logoff $sessionId /server:$server
# REF: https://4sysops.com/archives/how-to-force-a-user-logoff-remotely-with-powershell/powershell 使用PowerShell登录用户
使用PowerShell登录用户
Get-Users.ps1
$server = "<hostname>"
query user /server:$SERVER
# https://stackoverflow.com/questions/23219718/powershell-script-to-see-currently-logged-in-users-domain-and-machine-status