clear-host
$bansifile= "desktop/result.html"
$global:servers= "DEN-DC-01", "DEN-GW-01", "DEN-SRV-01","DEN-SRV-02""<table border=1 cellpadding=4><tr><th align = center>No.</th><th>Server</th><th>test</th></tr>" >> $bansifile
FUNCTION wout([string]$Server,[string]$test)
{
$Server="<font color = ""ORANGE"">$Server</font>"
$test = "<font color = ""GREEN"">$test</font>""<tr><td align = center>$tn</td><td>"+ $Server + "</td><td>"+ $test + "</td></tr>" >> $bansifile
}
function service ($server)
{
Invoke-Command -ComputerName $server -ScriptBlock {
$DisTime = set-ItemProperty -Path 'HKLM:\System\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp' -name "MaxDisconnectionTime" -Value 28800000 -erroraction silentlycontinue
$IdleTime = set-ItemProperty -Path 'HKLM:\System\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp' -name "MaxIdleTime" -Value 21600000 -erroraction silentlycontinue
$r=get-ItemProperty -Path 'HKLM:\System\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp' -name "MaxDisconnectionTime"
$s=get-ItemProperty -Path 'HKLM:\System\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp' -name "MaxIdleTime"
return ($r, $s)
}
}
foreach ($srv in $servers)
{
write-host "The server is $srv"
$remote= service($srv)
$object = New-Object –TypeName PSObject
$object | Add-Member -MemberType NoteProperty –Name MaxDisconnectionTime –Value $remote[0].MaxDisconnectionTime
$object | Add-Member –MemberType NoteProperty –Name MaxIdleTime –Value $remote[1].MaxIdleTime
wout $srv $remote
$tn=$tn+1
}
# http://www.ifunky.net/Blog/post/How-To-Enable-PowerShell-Remoting-(WinRM).aspx