Ветеран
Сообщения: 27449
Благодарности: 8087
|
Профиль
|
Отправить PM
| Цитировать
Учусь PowerShell'у:
читать дальше »
Код: ![Выделить весь код](images/misc/selectcode.png)
$sMachineList = "E:\Песочница\0084\1\pc.txt"
$sLog = "E:\Песочница\0084\1\out.txt"
Clear-Content -Path $sLog -ErrorAction SilentlyContinue
Get-Content -Path $sMachineList |`
ForEach-Object {
$sHost = $_
try {
$aIPAddress = [System.Net.Dns]::GetHostAddresses($sHost)
$OutLine = $sHost + " = " + $aIPAddress[0].IPAddressToString
} catch {
$OutLine = $sHost + " = (" + $_.Exception.InnerException.Message + ")"
}
Write-Host $OutLine
Add-Content -Path $sLog -Value $OutLine
}
|
Отправлено: 00:22, 11-10-2011
| #10
|