
正文
收集计算机分区信息,去除列中的重复值(Excel)(空行)
提示:扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
收集计算机分区信息
$servers = gc D:\serverlist.txt
$result = $results = $null
$results = @()
foreach ($server in $servers)
{
If ($server -eq "")
$UserName = "administrator"
$serverpass ="abcd"
$Password = ConvertTo-SecureString $serverpass -AsPlainText –Force
$cred = New-Object System.Management.Automation.PSCredential($UserName,$Password) $disks = Get-WmiObject -Class Win32_LogicalDisk -ComputerName $server -Credential $cred -Filter "DriveType=3"
foreach ($disk in $disks)
{
$result = ""|Select Server,DeviceID,FreeSize,TotalSize,Free_Percentage
$result.Server = $server
$result.DeviceID = $disk.deviceid
$result.FreeSize = ($disk.freespace/1GB).tostring("f1")
$result.TotalSize = ($disk.size/1GB).tostring("f1")
$result.Free_Percentage = "{0:p}" -f ($disk.freespace / $disk.size)
$results += $result
}
}
$results |export-csv D:\disks.csv -Encoding default -NoTypeInformation
收集结果如下图所示:

要求去除A列中的重复字段,去除后如下:

代码如下:
$dd = import-csv d:\disks.csv
#通过倒序方法去除列中重复值
for ($i=$dd.count-1;$i -ge 0;$i--)
{
$previous = $dd[$i-1].Server
$current = $dd[$i].Server
If ($current -eq $previous)
{
$dd[$i].Server = ""
}
}
$dd|export-csv d:\disks2.csv -Encoding default -NoTypeInformation







