$serverlists=@()
###北京
$serverlist=@()
$serverlist=New-Object PSObject
$serverlist|Add-Member -MemberType NoteProperty -Name ip -Value <北京DHCP服务器IP>
$serverlist|Add-Member -MemberType NoteProperty -Name 办公区 -Value 北京
$serverlists+=$serverlist
###上海
$serverlist=@()
$serverlist=New-Object PSObject
$serverlist|Add-Member -MemberType NoteProperty -Name ip -Value <上海DHCP服务器IP>
$serverlist|Add-Member -MemberType NoteProperty -Name 办公区 -Value 上海
$serverlists+=$serverlist

$OutMess=@()
foreach($server in $serverlists){
    $DHCPList = Get-DhcpServerv4Scope -ComputerName $server.ip | Where-Object State -eq 'Active'
    foreach($DHCPListS in $DHCPList){
    $DHCPScope = Get-DhcpServerv4ScopeStatistics -ComputerName $server.ip -ScopeId $DHCPListS.ScopeId
     $OutMess+=$DHCPListS|Select-Object @{Name = '办公区'; Expression = {$server.办公区}},`
                                        @{Name = '作用域名称'; Expression = {$_.Name}},`
                                        @{Name = '描述'; Expression = {$_.Description}},`
                                        @{Name = '起始IP'; Expression = {$_.StartRange}},`
                                        @{Name = '结束IP'; Expression = {$_.EndRange}},`
                                        @{Name = '子网掩码'; Expression = {$_.SubnetMask}},`
                                        @{Name = '租期'; Expression = {$_.LeaseDuration}},`
                                        @{Name = '剩余IP'; Expression = {$DHCPScope.AddressesFree}},`
                                        @{Name = '使用IP'; Expression = {$DHCPScope.AddressesInUse}},`
                                         @{Name = '使用率'; Expression = {$DHCPScope.PercentageInUse}}

    }
}
#导出到本地文件
$OutMess|Export-Csv -Path D:\DHCP报表统计\DHCP.csv  -NoTypeInformation -Encoding UTF8