none
获取指定 OU 中的计算机对象的信息 RRS feed

  • 问题

  • 烦请帮忙改一下如下脚本,获取路径改为从指定 OU 中计算机对象,并输出到 .csv 中,感激不尽。

    param (
    [array]$arrComputer="$env:computername"
    )

    "`n"

    Write-Host "Name|    NetworkCard                                  | IP          | SUBNET      | GateWay      | MacADD           | DNS "  -ForegroundColor Green 

    foreach ( $Computer in $arrComputer ) { 


    $nwINFO = Get-WmiObject -ComputerName $Computer Win32_NetworkAdapterConfiguration | Where-Object { $_.IPAddress -ne $null } #| Select-Object DNSHostName,Description,IPAddress,IpSubnet,DefaultIPGateway,MACAddress,DNSServerSearchOrder | format-Table * -AutoSize 
    #| Select-Object DNSHostName,Description,IPAddress,IpSubnet,DefaultIPGateway,MACAddress,DNSServerSearchOrder
    $nwServerName = $nwINFO.DNSHostName
    $nwDescrip = $nwINFO.Description
    $nwIPADDR = $nwINFO.IPAddress
    $nwSUBNET = $nwINFO.IpSubnet
    $nwGateWay = $nwINFO.DefaultIPGateway
    $nwMacADD = $nwINFO.MACAddress
    $nwDNS = $nwINFO.DNSServerSearchOrder
    # Server/CompName   |NetworkCard | IPAdress  |  SubnetMask|  Gateway | MAC Address|   DNS |
    Write-Host "$nwServerName | $nwDescrip | $nwIPADDR | $nwSUBNET | $nwGateWay | $nwMacADD | $nwDNS " | ft *

    }

    2017年11月6日 13:01

全部回复

  • 您好,

    根据您的描述,我编写了如下脚本,请将-SearchBase的值替换为您所需的OU的值,希望对您有所帮助:
    $adcomputers = Get-ADComputer -SearchBase 'OU=Computers,DC=domain,DC=com' -Filter *
    $info = foreach ($computer in $adcomputers)
    {
        Get-WmiObject -Class Win32_NetworkAdapterConfiguration -ComputerName $computer.DNSHostName | 
        Where-Object {$_.IPAddress -ne $null} | 
        Select-Object DNSHostName,Description,
        @{n='IpAddress';e={[string]::Join('; ',($_.IpAddress))}},
        @{n='IpSubnet';e={[string]::Join('; ',($_.IPSubnet))}},
        @{n='DefaultIPGateway';e={[string]::Join('; ',($_.DefaultIPGateway))}},
        @{n='MACAddress';e={[string]::Join('; ',($_.MACAddress))}},
        @{n='DNSServerSearchOrder';e={[string]::Join('; ',($_.DNSServerSearchOrder))}}
    }
    $info | Export-Csv -Path 'C:\1.csv' -NoTypeInformation

    如果需要进一步的帮助,请随时告诉我们。

    谢谢
    Albert Ling

    Please remember to mark the replies as an answers if they help.
    If you have feedback for TechNet Subscriber Support, contact tnmff@microsoft.com

    2017年11月7日 4:08
  • 您好,

    请问之前提供的脚本有帮助吗?如果有帮助,请将其标记为答复,感谢您的理解与配合。

    如果您需要进一步的帮助,请告诉我们。

    谢谢
    Albert Ling


    Please remember to mark the replies as an answers if they help.
    If you have feedback for TechNet Subscriber Support, contact tnmff@microsoft.com

    2017年11月9日 8:11
  • 您好,

    我正在查看这个问题的进度,如果您有任何问题,请随时与我们联系。

    如果您使用我们的方法解决了问题,请“将其标记为答案”,以帮助其他社区成员能够快速找到有帮助的答复。
    如果您使用自己的方法解决了问题,请在此分享您的经验,这将对其他有类似问题的社区成员非常有益。
    如果问题还没有解决,请回复并告诉我们目前的情况,以便我们能够提供进一步的帮助。

    期待您的反馈。

    谢谢
    Albert Ling

    Please remember to mark the replies as an answers if they help.
    If you have feedback for TechNet Subscriber Support, contact tnmff@microsoft.com

    2017年11月13日 8:39