Вопрос : Помощь formating выход в Powershell

Здравствулте! специалисты Powershell, менеджер

My попросили список серверов и их серийных номеров.  Это как я собираю эту информацию:

$Servers = Получает-QADComputer - ManagedBy ЕГО | вид-предмет |

foreach Выбирать-Предмета названное ($server в $Servers) {
Get-WmiObject - типе Win32_SystemEnclosure - ComputerName $server. Имя |

How
serialnumber Выбирать-Предмета} может я получить выход в таблицу состоя из 2 колонок?  Я хотел был бы оно для того чтобы посмотреть подобие:

Name SerialNumber
Server1 1234
Server2 5678


I знает это будет вопрос о новобранца, но я рисую blank.

Thanks,
Nick
class=

Ответ : Помощь formating выход в Powershell

Имел typo.  Попытайтесь это угодите.

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: 31: 32: 33: 34: 35: 36: 37: 38: 39: 40: 41: 42: 43: 44: 45: 46: 47: 48: 49: 50: 51: 52: 53: 54: 55: 56: 57: 58: 59: 60: 61: 62: 63: 64: 65: 66: 67: 68:

На ошибке возобновьте затем Const ADS_SCOPE_SUBTREE = 2 'ищет предмет цели и все уровни подводной лодки Тусклое objRootDSE: Установите objRootDSE = GetObject («LDAP: //RootDSE») strDNSDomain = заменяет ть (замените (objRootDSE.Get («defaultNamingContext»),», DC= ", «."), «DC=», "") strADsPath = «LDAP: /» & objRootDSE.Get («defaultNamingContext») 'Соединитесь к активно директории Установите objConnection = CreateObject («ADODB.Connection») Установите objCommand = CreateObject («ADODB.Command») objConnection.Provider = «ADsDSOObject» objConnection.Open «активно провайдер директории» Установите objCommand.ActiveConnection = objConnection objCommand.Properties («размер страницы») = 1000 objCommand.Properties («Searchscope») = ADS_SCOPE_SUBTREE Тусклое objOU: Установите objOU = GetObject («LDAP: /» & TARGET_OU) Тусклое objExcel: Установите objExcel = CreateObject («Excel.Application») Затемните objWorkbook: Установите objWorkbook = objExcel.Workbooks.Open (EXCEL_FILE) 'Начните на рядке 2, после коллектора. Затемните intRow: intRow = 2 Не сделать до objExcel.Cells (intRow, 1).Value = "" Затемните strUserName: strUserName = objExcel.Cells (intRow, 1).Value Тусклое strDisplayName: strDisplayName = objExcel.Cells (intRow, 2).Value Тусклое strFirstName: strFirstName = objExcel.Cells (intRow, 3).Value Тусклое strLastName: strLastName = objExcel.Cells (intRow, 4).Value Тусклое strDS: strDS = objExcel.Cells (intRow, 5).Value 'Тусклое strOffice: strOffice = objExcel.Cells (intRow, 6).Value Тусклое strPWD: strPWD = objExcel.Cells (intRow, 7).Value 'Домен ОБЪЯВЛЕНИЯ поиска для проверки имени потребителя обычный уже не существует objCommand.CommandText = «ОТБОРНОЕ distinguishedName ОТ '» & strADsPath & _ ««ГДЕ objectCategory='user» И cn='" & strDisplayName & «'» Установите objRecordSet = objCommand.Execute Если objRecordSet.EOF после этого Тусклое objUser: Установите objUser = objOU.Create («потребителя», «CN=» & strDisplayName) objUser.Put «sAMAccountName», strUserName objUser.Put «userPrincipalName», strUserName & «@» & strDNSDomain objUser.Put «displayName», strDisplayName objUser.Put «sn», strLastName objUser.Put «givenName», strFirstName objUser.Put «описание», strDS 'objUser.Put «physicalDeliveryOfficeName», strOffice objUser.Put «homeDrive», «x: » objUser.Put «homeDirectory»,» \ \ shadowcom.local \ система \ профили \ «& strUsername objUser.SetInfo 'Sektion Separat до пароля af ввоза до brugerne objUser.userAccountControl = 512 strPWD objUser.SetPassword objUser.AccountDisabled = ложно objUser.SetInfo Закончитесь если intRow = intRow + 1 Петля objExcel.ActiveWorkbook.Save EXCEL_FILE objExcel.ActiveWorkbook.Close objExcel.Quit