Первым делом, мы опишем требования, которые мы должны предъявить к учетным записям сотрудников. А эти требования мы постараемся прикинуть, исходя из потребностей пользователя. Не секрет, что многие корпоративные системы, использующие аутентификацию через Active Directory, для отображения и в своих админках, и просто в ходе работы зачастую используют разнообразные поля учетных записей AD: это и Sharepoint, и Citrix, и многие-многие другие. В качестве примера такой системы я возьму известный всем MS Outlook, да не полностью, а лишь его адресную книгу, которая черпает свои данные напрямую из Active Directory.

Что использует пользователь? У нас в организации он зачастую ищет по имени телефон, адрес электронной почты и название подразделения. Конечно, неплохо заполнить еще и адресную информацию, но в связи с тем, что топик у нас о связке с абстрактной кадровой системой, мы адреса и телефоны оставим за скобками.
Первое, мы выписываем список полей, которые мы желаем забирать из кадровой системы, у нас это будут:

• Фамилия Имя Отчество
• Должность
• Организация
• Подразделение
• Почтовый индекс
• Тип занятости

На этом этапе полезно закрепить наш перечень полей и издать Приказ Именем Самого Большого Директора, обязывающий кадровиков и администраторов поддерживать эти данные в актуальном состоянии.

Механизм

Само собой ясно, что для того, чтобы связать персону из кадровой системы и персону из Active Directory, необходимо иметь некий идентификатор, связывающий эти две записи. Обычно таким идентификатором является табельный номер сотрудника, он присваивается при приеме на работу и более никогда не меняется, вместе с тем, я встречался с ситуациями, когда и табельный номер не статичен, в этом случае такой идентификатор следует выдумать.

Сведения о пользователе Active Directory не исчерпываются сведениями, которые можно увидеть в оснастке Active Directory Users and Computers (устоявшееся сокращение ADUC), причем очень далеко не исчерпываются. На самом деле объект пользователя имеет триллион атрибутов, и эти атрибуты даже могут быть добавлены администратором схемы. Например, есть такой атрибут, как carLicense, содержащий информацию о водительском удостоверении, или drink, характеризующий любимый напиток пользователя. В общем, Microsoft в этом смысле предусмотрела многое.

Использовать в моем примере я буду атрибуты employeeID для хранения идентификатора пользователя, и flags, для чего именно, сообщу чуть позже.

Также для заполнения полей пользователя мы будем использовать атрибуты:

• displayName и CN для хранения ФИО
• department для хранения подразделения
• company для хранения организации
• title для хранения должности
• employeeType для хранения типа сотрудника
• postalCode для хранения индекса

Педанты могут, конечно, дополнительно использовать givenName, initials и sn для хранения имени, инициалов и фамилии соответственно, но я думаю, что это уже тонкости.

Итак, наше приложение будет работать таким образом:

1. Перечислять учетные записи, у которых заполнен employeeID
2. Искать в кадровой системе для каждой учетной записи изменившиеся данные
3. Обновлять данные в Active Directory
4. Протоколировать изменения в файле

К делу

Первым делом следует проставить employeeID, который у нас представляет табельный номер, всем пользователям. Если пользователей мало, то сделать это проще всего через ADSI Edit, если их чуть больше, то можно прикрутить скрипт для прописывания, например вот так. А если пользователей много, расстановку идентификаторов необходимо делегировать, хочется приятный интерфейс и используются дополнительные фенечки, то можно создать вот такую дополнительную вкладку в ADUC:

впрочем, создание такой вкладки это само по себе тема для отдельного топика.

Второе тонкое место в том, что иногда случается так, что для некоторых людей менять следует только некоторые атрибуты. Есть, например, у нас сотрудник, назовем его Кудрымунбеков Садруддин Фатхулларович, но все его называют просто Сан Саныч. А есть генеральный директор, должность которого в кадрах записана не иначе, как Генеральный Директор Открытого Акционерного Общества Дальней Космической Связи «Рога И Копыта», которого в AD лучше бы просто оставить точно со связью, но точно без рогов и копыт. Таким образом, мы видим необходимость в закладывании в логику работы нашего приложения некоторых исключений, а хранить эти исключения мы будем там же, в Active Directory в атрибуте flags. Этот атрибут имеет величину в четыре байта, а значит, устанавливая тот или иной бит в то или иное значение, мы сможем при необходимости запомнить аж 32 исключения. Впрочем, использовать мы все равно будем только шесть.

Переходим к реализации на powershell:

# Пример изменения учетных записей пользователей в Active Directory
# Егор Иванов
param($strServer, $strContainer, $strUserName, $strPassword, $strFileName, $strLogName)

function Write-LogFile([string]$logFileName)
{
Process
{
$_
$dt = Get-Date

$str = $dt.DateTime + » « + $_
$str | Out-File -FilePath $logFileName -Append

}
}

# Эта функция на самом деле заглушка, ее реализация зависит
# от той или иной кадровой системы. Тут может быть и соединение с 1С,
# и запрос в веб, у меня лично тут ковыряние Oracle e-Buisness suite,
# но демонстрации ради мы ограничимся чтением из csv-файла.
# Понятное дело, что вызывать каждый раз Import-CSV глупо,
# но как я и говорил, функция – заглушка, она лишь демонстрирует возможность

function Get-Employee($employeeID, $fileName, [ref]$title, [ref]$department, [ref]$displayName, [ref]$company, [ref]$postalCode, [ref]$employeeType)
{
$records = $fileName | Import-CSV -Delimiter «;»

$employee = $records | where-object {$_.EmployeeID -eq $employeeID}
if ($employee -eq $null) {return $false}
$title.Value = [string]$employee.Title

$department.Value = [string]$employee.Department
$displayName.Value = [string]$employee.Name

$company.Value = [string]$employee.Company
$postalCode.Value = [string]$employee.PostalCode

$employeeType.Value = [string]$employee.EmployeeType
return $true

}

# Будем писать в лог

«—» | Write-LogFile $strLogName
«Запускаю с параметрами:» | Write-LogFile $strLogName

«Сервер: « + $strServer | Write-LogFile $strLogName
«Контейнер: « + $strContainer | Write-LogFile $strLogName

«Имя пользователя: « + $strUserName | Write-LogFile $strLogName
«Пароль: « + $strPassword | Write-LogFile $strLogName

«Имя файла: « +$strFileName | Write-LogFile $strLogName
«Имя файла лога: « + $strLogName | Write-LogFile $strLogName

# Это наши константы, которые переводят те или иные атрибуты в режим только чтения
# Нетрудно заметить, что они имеют значения 000001, 000010, 000100, 001000, 010000 и 100000
# в двоичной системе. Это значит, что их комбинация однозначно определит,
# какие поля запретить изменять

New-Variable -Option constant -Name C_COMPANY_FLAG -Value 1

New-Variable -Option constant -Name C_POSTALCODE_FLAG -Value 2

New-Variable -Option constant -Name C_TITLE_FLAG -Value 4

New-Variable -Option constant -Name C_DEPARTMENT_FLAG -Value 8

New-Variable -Option constant -Name C_NAME_FLAG -Value 16

New-Variable -Option constant -Name C_EMPLOYEETYPE_FLAG -Value 32

# Ниже заглушка для атрибута title. Атрибут title к примеру
# http://msdn.microsoft.com/en-us/library/windows/desktop/ms680037(v=VS.85).aspx
# имеет 64 символа максимальный размер в Windows Server 2003
# или 128 символов максимальный размер в Windows Server 2008
# поэтому если не обрезать значение, случится конфуз

New-Variable -Option constant -Name C_PARAMETERS_LENGTH -Value 64

# (!userAccountControl:1.2.840.113556.1.4.803:=2) читать как «и при этом учетка не заблокирована»

$strFilter = «(&(objectClass=user)(!objectClass=computer)(employeeID=*)(!userAccountControl:1.2.840.113556.1.4.803:=2))»

# Можно, конечно, использовать навески для Active Directory под Windows Server 2008
# http://blogs.msdn.com/adpowershell
# Но я решил сделать приложение совместимым с Windows Server 2003 и Windows XP,

# поэтому обойдемся сухим дотнетом

$objDomain = New-Object System.DirectoryServices.DirectoryEntry(«LDAP://»+$strServer+«/»+$strContainer)

$objSearcher = New-Object System.DirectoryServices.DirectorySearcher
$objSearcher.SearchRoot = $objDomain

$objSearcher.PageSize = 1000
$objSearcher.Filter = $strFilter
$objSearcher.SearchScope = «Subtree»

$colProplist = «employeeID»,«postalCode»,«title»,«department», «displayName», «cn», «employeeType»

foreach ($i in $colPropList)
{
$objSearcher.PropertiesToLoad.Add($i)
}

$colResults = $objSearcher.FindAll()

# Теперь в colResults мы имеем все необходимые учетки

$startTime = Get-Date

$totalCount = $colResults.Count
$i = 0
foreach ($objResult in $colResults)
{
$objItem = $objResult.Properties

$aDEmployeeID = $objItem.employeeid

# Тут ясно, мы смотрим в атрибут flags, если у нас есть запрет на изменение
# поля, то мы это на будущее запоминаем, поднимая тот или иной флажок

$flagProtectCompany = $false

$flagProtectPostalCode = $false
$flagProtectTitle = $false
$flagProtectDepartment = $false

$flagProtectName = $false
$flagProtectEmployeeType = $false

if (!($objItem.flags -eq $null))
{
$flags = $objItem.flags

if (($flags[0] -band $C_COMPANY_FLAG) -ne 0) {$flagProtectCompany = $true}
if (($flags[0] -band $C_POSTALCODE_FLAG) -ne 0) {$flagProtectPostalCode = $true}
if (($flags[0] -band $C_TITLE_FLAG) -ne 0) {$flagProtectTitle = $true}
if (($flags[0] -band $C_DEPARTMENT_FLAG) -ne 0) {$flagProtectDepartment = $true}
if (($flags[0] -band $C_NAME_FLAG) -ne 0) {$flagProtectName = $true}
if (($flags[0] -band $C_EMPLOYEETYPE_FLAG) -ne 0) {$flagProtectEmployeeType = $true}
}

# Это не обязательно, но я предпочитаю все обнулить

$cSVName = «»
$cSVTitle = «»
$cSVDepartment = «»

$cSVCompany = «»
$cSVPostalCode = «»
$cSVEmployeeType = «»

# Тут следует обратить внимание на вызов функции в PowerShell, он не совсем
# такой, как в привычных языках

$rc = Get-Employee $aDEmployeeID $strFileName ([ref]$cSVTitle) ([ref]$cSVDepartment) ([ref]$cSVName) ([ref]$cSVCompany) ([ref]$cSVPostalCode) ([ref]$cSVEmployeeType)

if ($rc)
{
# Здесь мы соединяемся со службой каталогов уже под другим именем и паролем, нежели был

# запущен сценарий. Неразумно осуществлять изменения от имени администратора домена,
# разумнее делегировать изменения того, того, того и сего атрибута служебной учетке
# с ограниченными правами

$objDirectoryEntry = new-object System.DirectoryServices.DirectoryEntry($objItem.adspath, $strUsername, $strPassword, [System.DirectoryServices.AuthenticationTypes]::Secure)

$oTitle = $cSVTitle

if ($oTitle.Length -gt $C_PARAMETERS_LENGTH) {$oTitle = $oTitle.Substring(0,$C_PARAMETERS_LENGTH)}
$oDepartment = $cSVDepartment

if ($oDepartment.Length -gt $C_PARAMETERS_LENGTH) {$oDepartment = $oDepartment.Substring(0,$C_PARAMETERS_LENGTH)}
$newEmployeeType = $cSVEmployeeType

# Здесь и далее мы проверяем, совпадает ли то значение, которое мы хотим присвоить, тому значению,
# которое уже присвоено (и не забываем про флажок). Это чтоб не напрягать службу каталогов

if (($newEmployeeType -ne $objItem.employeetype) -and -not $flagProtectEmployeeType)
{
«Изменение EmployeeType пользователя ««» + $objDirectoryEntry.name + «»«» | Write-LogFile $strLogName

«с ««» + $objDirectoryEntry.employeetype + «»» на ««» + $newEmployeeType + «»«» | Write-LogFile $strLogName

$objDirectoryEntry.employeetype = [string]$newEmployeeType
$objDirectoryEntry.CommitChanges()
}
if (($cSVCompany -ne $objItem.company) -and -not $flagProtectCompany)
{
«Изменение организации пользователя ««» + $objDirectoryEntry.name + «»«» | Write-LogFile $strLogName

«с ««» + $objDirectoryEntry.company + «»» на ««» + $cSVCompany + «»«» | Write-LogFile $strLogName

$objDirectoryEntry.company = [string]$cSVCompany
$objDirectoryEntry.CommitChanges()
}
if (($cSVPostalCode -ne $objItem.postalcode) -and -not $flagProtectPostalCode)
{
«Изменение индекса пользователя ««» + $objDirectoryEntry.name + «»«» | Write-LogFile $strLogName

«с ««» + $objDirectoryEntry.postalCode + «»» на ««» + $cSVPostalCode + «»«» | Write-LogFile $strLogName

$objDirectoryEntry.postalCode = $cSVPostalCode
$objDirectoryEntry.CommitChanges()
}
if (($oTitle -ne $objItem.title) -and -not $flagProtectTitle)
{
«Изменение должности пользователя ««» + $objDirectoryEntry.name + «»«» | Write-LogFile $strLogName

«с ««» + $objDirectoryEntry.title + «»» на ««» + $cSVTitle + «»«» | Write-LogFile $strLogName

if ($title.Length -gt $C_PARAMETERS_LENGTH)
{
$objDirectoryEntry.title = $cSVTitle.Substring(0,$C_PARAMETERS_LENGTH)
}
else

{
$objDirectoryEntry.title = $cSVTitle.ToString()
}
$objDirectoryEntry.CommitChanges()
}
if (($oDepartment -ne $objItem.department) -and -not $flagProtectDepartment)
{
«Изменение подразделения пользователя ««» + $objDirectoryEntry.name + «»«» | Write-LogFile $strLogName

«с ««» + $objDirectoryEntry.department + «»» на ««» + $cSVDepartment + «»«» | Write-LogFile $strLogName

if ($department.Length -gt $C_PARAMETERS_LENGTH)
{
$objDirectoryEntry.department = $cSVDepartment.Substring(0,$C_PARAMETERS_LENGTH)
}
else

{
$objDirectoryEntry.department = $cSVDepartment.ToString()
}
$objDirectoryEntry.description = $cSVDepartment.ToString()
$objDirectoryEntry.CommitChanges()
}
if ((($cSVName -ne $objItem.displayname) -or ($cSVName -ne $objItem.cn)) -and -not $flagProtectName)
{
«Изменение имени пользователя ««» + $objDirectoryEntry.name + «»«» | Write-LogFile $strLogName

«с ««» + $objDirectoryEntry.displayname + «»» на ««» + $cSVName + «»«» | Write-LogFile $strLogName

$objDirectoryEntry.displayName = $cSVName
$objDirectoryEntry.CommitChanges()
$objDirectoryEntry.Rename(«cn=»+$cSVName)
}
$i++

# Здесь мы сформируем статусную строку и будем ее демонстрировать, простые математические действия

# укажут нам, когда же, наконец, процесс прочесывания миллиардов наших пользователей прекратится

$status = $i.ToString() + » of « + $totalCount.ToString() + » complete – « + $objDirectoryEntry.name

$currentTime = Get-Date
$diffTime = [int][System.Math]::Round(($currentTime – $startTime).Ticks / $i)
$delta = $diffTime*$totalCount

$endTime = $startTime.Add([int64]($delta))
$activityString = «Перебор пользователей. Расчетное время завершения « + $endTime

Write-Progress -Activity $activityString -Status $status -PercentComplete (($i / $totalCount) * 100)
}
}

«Работа окончена» | Write-LogFile $strLogName

# И не забыть пропищать из динамика, мало ли

Write-Host `a

Создадим тестовую среду, абсолютно произвольно присвоим имена учетным записям:

Теперь запускаем скрипт с параметрами. Разумеется, его можно зашедулить и выполнять по расписанию, только не забыть учетной записи, от имени которой выполняется задание, присвоить право входа в качестве пакетного задания:

Как видим, после выполнения, мы получили хорошие читаемые имена, отличные должности и великолепные наименования компаний:

Конечно, путем неглубокой модификации скрипта, мы можем заполнять пользователю все: от телефонов и адресов до пресловутых любимых напитков, был бы источник. А если скрипт запускать с определенной регулярностью, то мы добиваемся того, что все данные о пользователях будут актуальны.

• в нужной категории есть список програм с описанием, выбираешь сразу ту, что нужна,
• устанавливается последняя версия, опубликованная на официальном сайте,
• Программа устанавливается сама, не требуется выставлять «Я согласен с условиями» и прочее.

Итак, это программа Speed Install 2.0. Она создается российскими разработчиками, издается на двух языках: русский и английский.

Удобный интерфейс

Все делается легко и просто, программа все делает за вас. Так что
можносчитать, что интерфейс Спид Инстал выполняет свою задачу на все
сто. Не надо думать − просто выбираешь программу и нажимаешь
«Установить». К хорошему быстро привыкаешь.

Поиск по категориям

Я храню у себя на диске некоторые программы. И иногда не могу найти
нужную по папкам. Ребятам, кажется, удалось создать именно такой
каталог, по которому все легко найти:

Дополнительные плюшки

Если какие-то программы нужно просто постоянно обновлять до последней
версии − это можно делать автоматически. Просто собираете программы в
список, и назначаете этот список обновляемым в автоматическом режиме.

Еще понравилась функция, которая после установки удаляет икнки с
рабочего стола. Я люблю чистый рабочий стол, мне эта функция нкжна по
зарез.

Вот официальное описание с официального сайта:

• Сотни программ в БД.
• Полностью автоматическая тихая установка.
• Постоянно обновляющаяся база приложений.
• Установка последних версий программ.
• Мультиязычный интерфейс.
• 32/64 битные установки.
• Создание оффлайн установщика.
• Создание, редактирование своих списков программ.
• Быстрый поиск.
• Дружественный интерфейс.
• Все программы скачиваются только с официальных сайтов (вирусов нет).
• HTML/XML отчеты.
• Контроль создания ярлыков во время установки.
• Создание исполняемых файлов с программами.
• Контроль зависимостей (.Net, Java, etc).

Подтверждаю про постоянные обновления. Пока я писал эту статью версия обновилась до 2.0.1.1533.

Что запланировано

• Удаленная установка на компьютеры в сети.
• Возможность добавлять свой софт (качается по расписанию и устанавливается).
• Список установленных программ.
• Список программ для обновления (updater).
• Рейтинговый центр (возможность поставить оценки программам).
• Деинсталятор программ.
• База программ будет расти.

Что бы я добавил:

Дизайн интерфейса на мой взгляд несколько отстает от тенденций
дизайна. Надеюсь, это улучшится. Хотя, дизайн хорош тогда, когда все
понятно. И в этом плане дизайн меня полностью устраивает.

Пожалуй я был бы рад, если кроме короткого описания в программе было
бы и описание подробное. Можно было бы еще добавить отзывы,
положительные и отрицательные, которые могут добавить зарегистрированные
пользователи.

Полез смотреть «Application event log», а там вот так:

Решение проблемы помогли найти коллеги net_andy и blic дав ссылку на форм, где подобное явление уже обсуждалось.

Решение проблемы простое. В редакторе реестра открываем ветку «HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa» и создаем параметр «DWORD» с именем «LmCompatibilityLevel» и значением «2″.

Param (
[string[]]$Address = $(1..20 | %{"192.168.1.$_"}),
[int]$Threads = 5
)            

write-host "Distributing addresses around jobs"
$JobAddresses = @{}
$CurJob = 0
$CurAddress = 0
while ($CurAddress -lt $Address.count)
{
    $JobAddresses[$CurJob] += @($Address[$CurAddress])
    $CurAddress++
    if ($CurJob -eq $Threads -1)
    {
        $CurJob = 0
    }
    else
    {
        $CurJob++
    }
}            

$Jobs = @()
foreach ($n in 0 .. ($Threads-1))
{
    Write-host "Starting job $n, for addresses $($JobAddresses[$n])"
    $Jobs += Start-Job -ArgumentList $JobAddresses[$n] -ScriptBlock {
        $ping = new-object System.Net.NetworkInformation.Ping
        Foreach ($Ip in $Args)
        {
            trap {
                new-object psobject -Property {
                    Status = "Error: $_"
                    Address = $Ip
                    RoundtripTime = 0
                }
                Continue
            }
            $ping.send($Ip,100) | select `                 @{name="Status"; expression={$_.Status.ToString()}},
                @{name = "Address"; expression={$Ip}}, RoundtripTime
        }
    }
}            

write-host "Waiting for jobs"
$ReceivedJobs = 0
while ($ReceivedJobs -le $Jobs.Count)
{
    foreach ($CompletedJob in ($Jobs | where {$_.State -eq "Completed"}))
    {
        Receive-Job $CompletedJob | select status, address, roundtriptime
        $ReceivedJobs ++
        sleep 1
    }
}            

Remove-Job $Jobs
write-host "Done." 

Оригинал

Команда отображает содержимое всего журнала, что в корне нас не устраивает. Но все не так плохо, то что мы видим на скриншоте, не просто текст, а объекты с свойствами. Получить свойства данных объектов позволяет комадлет Get-Member. Выполнив в командной строке Get-EventLog security | Get-Member, мы получим в результате список свойств всех объектов выводимых Get-EventLog.

Зная список свойств, можно манипулировать результатами работы Get-EventLog. Например, что бы получить список всех событий за сегодняшний день, самым простым способом будет использование параметра -after. Полный список параметров командлета Get-EventLog можно узнать используя командлет Get-Help или здесь. В результате у нас получится команда Get-EventLog security -after (Get-date -hour 0 -minute 0 -second 0), где командлет Get-Date выдает текущую дату и время, но параметры hour, minute и second задают вывод времени с начала текущего дня. В результате мы получим список событий произошедших за сегодня.
Нам необходимо получить список всех пользователей совершавших вход на сервер по протоколу RPD, для этого используем значения EventID и EntryType.

Значения EventID

• 528 — Успешный вход пользователя на компьютер.
• 529 — Отказ входа в систему. Не правильное имя пользователя или пароль.

Значения EntryType

• 10 — RemoteInteractive. Пользователь выполнил удаленный вход на этот компьютер, используя Terminal Services или Remote Desktop.

От фильтруем события из дополнив команду новыми вводными:
Get-EventLog security -message "*Тип входа:?10*" -after (Get-date -hour 0 -minute 0 -second 0) | ?{$_.eventid -eq 528}

Параметр -message отражает полностью сообщение нашего события, в котором содержится «Entry type» («Тип входа»), через шаблоны мы задаем поиск интересующей нас строки. Далее передаем ч\з конвейер командлету Where-Object (?) для фильтрации сообщений «Успешного входа пользователя в систему». Для фильтрации сообщений «Отказа входа в систему"{$_.eventid -eq 528} заменить на {$_.eventid -eq 529}.

Результатом выполнения будет следующее:

Пойдем дальше, создадим файл-срипт»test.ps1″.

# В переменную "$Events" загружаем массив событий "Удаленного успешного входа в систему"
$Events = Get-EventLog security -message "*Тип входа:?10*" -after (get-date -hour 0 -minute 0 -second 0) | ?{$_.eventid -eq 528 }

# Создаем переменную «$Data» с параметрами Время, Имя пользователя, IP адрес.
$Data = New-Object System.Management.Automation.PSObject
$Data | Add-Member NoteProperty Time ($null)
$Data | Add-Member NoteProperty UserName ($null)
$Data | Add-Member NoteProperty Address ($null)

# Пройдемся по каждому объекту из массива «$Events".
$Events | %{

# Наполняем переменную «$Data» данными.
$Data.time = $_.TimeGenerated

# В переменную «$message» загружаем массив строк, которые разделяются символом переноса строки (‘n).
# Функции trimstart(), trimend() убирают все лишние символы в конце и в начале строки.
# Функция split разделяет строку.
$message = $_.message.split(«`n») | %{$_.trimstart()} | %{$_.trimend()}

# В массиве «$message» мы ищем совпадения по строке «Пользователь:» и «Адрес сети источника:»
$Data.UserName = ($message | ?{$_ -like «Пользователь:*»} | %{$_ -replace «^.+:.»} )
$Data.Address = ($message | ?{$_ -like «Адрес сети источника:*»} | %{$_ -replace «^.+:.»})

# Вывод результата.
$Data
}

Запускаем скрипт ".\test.ps1«.

Если скрипт не запустился, то скорее всего ваш PoSh не настроен на выполнение скриптов. Выполните команду Set-ExecutionPolicy RemoteSignet .

Выглядит вполне хорошо, но думаю можно улучшить скрипт. Для удобства внесем в него возможность задания параметров, и выделения строк цветом по маске IP адреса.

param ($key1,$val1,$val2,$val3,$val4,$val5,$val6)

if ($val1 -eq $null) {$val1=0};

$mydate = Get-date -hour 0 -minute 0 -second 0;

if ($key1 -eq «year») { $mydate = (Get-date -hour 0 -minute 0 -second 0 -day 1 -month 1); $mydate = $mydate.addyears(-$val1); };

if ($key1 -eq «month») { $mydate = (Get-date -hour 0 -minute 0 -second 0 -day 1); $mydate = $mydate.addmonths(-$val1); };

if ($key1 -eq «day») { $mydate = $mydate.adddays(-$val1) };

if ($key1 -eq «date») { $mydate = (Get-date -hour 0 -minute 0 -second 0 -day $val1 -month $val2 -year $val3); };

# здесь реализуем возможность задания интервала

if ($val4 -eq $null) {$Events = Get-EventLog security -message «*Тип входа:?10*» -after ($mydate) | ?{$_.eventid -eq 528 }}
if ($val4 -ne $null) {$Events = Get-EventLog security -message «*Тип входа:?10*» -after ($mydate) -before (get-date -hour 0 -minute 0 -second 0 -day $val4 -month $val5 -year $val6) | ?{$_.eventid -eq 528 }}
$Data = New-Object System.Management.Automation.PSObject
$Data | Add-Member NoteProperty Time ($null)
$Data | Add-Member NoteProperty UserName ($null)
$Data | Add-Member NoteProperty Address ($null)

$Events | %{

$Data.time = $_.TimeGenerated

$message = $_.message.split(«`n») | %{$_.trimstart()} | %{$_.trimend()}

$Data.UserName = ($message | ?{$_ -like «Пользователь:*»} | %{$_ -replace «^.+:.»} )
$Data.Address = ($message | ?{$_ -like «Адрес сети источника:*»} | %{$_ -replace «^.+:.»})

$textcolor = $host.ui.rawui.foregroundcolor

$host.ui.rawui.foregroundcolor = «red»

if ($data.address -like «192.168.0*») {$host.ui.rawui.foregroundcolor = «DarkGreen»}
if ($data.address -like «10.*») {$host.ui.rawui.foregroundcolor = «yellow»}

$data

$host.ui.rawui.foregroundcolor = $textcolor

}

param ($key1,$val1,$val2,$val3,$val4,$val5,$val6) — определяет параметры, передаваемые скрипту.

if ($key1 -eq "day") {$mydate = $mydate.adddays(-$val1)}; проверяем переданные параметры на соответствие ключу, если ключ совпадает, то корректируем дату согласно задаваемым параметрам. В данном случае в качестве параметра передается ключ «day» аргументом которого мы будем переводить дату на определенное количество дней назад. Т.е. будет выведен лог за определенное количество дней, остальные условия выполняются по аналогии, за месяц и за год. Если указан ключ «date» то за начало отсчета берется конкретная дата, указанная через пробел, например «01 05 2011», если мы так же через пробел укажем другую дату, то на экран будет выведен определенный период, указанный в этих датах.

А если задать {$_.eventid -eq 529 } то результатом будут все попытки входа с неправильными паролями.

Источник

PS.

Пусть автор поста на меня не серчает, кое какие фразы, формулировки исправил.

Cкрипт можно сделал немного изящнее внеся в него изменения:

# Параметры
param ($EventID,$key1,$val1,$StartDate,$EndDate)

# Начальное время суток
$TimeofDay = (get-date).date

if ($val1 -eq $null) {$val1=0};

# Год
if ($key1 -eq «year») {$mydate = ((Get-date $TimeofDay -day 1 -month 1)).addyears(-$val1)}

# Месяц
if ($key1 -eq «month») {$mydate = ((Get-date $TimeofDay -day 1)).addmonths(-$val1)}

# День
if ($key1 -eq «day») {$mydate = $TimeofDay.adddays(-$val1)}

# Конкретная
if ($key1 -eq «date») {$mydate = (Get-date $StartDate)}

# Интервал
if ($key1 -eq «interval») {$After = (Get-date $StartDate);$Before = (Get-date $EndDate)}

# Загружаем массив событий
if (!$After -and !$Before) {$Events = Get-EventLog security -message «*Тип входа:?10*» -after $mydate | ?{$_.eventid -eq $EventID }}
else {$Events = Get-EventLog security -message «*Тип входа:?10*» -after $After -before $Before | ?{$_.eventid -eq $EventID }}

Есть сервер с win2008 r2 sp1. На нем развернут терминал 1с, установлены принтеры, порядка 30. К серверу подключаются удаленные объекты, соединенные VPN каналом. Скорость канала варьируется от 96-512 Кбит/с. Периодически, при печати на принтер, задание останавливается ошибкой и висит со статусом «ошибка». Для продолжения работы необходимо открыть принтер, выбрать задание с ошибкой правой кнопкой, и нажать «Перезапустить». Задание перезапускается и печатается.

Так как принтеров большое кол-во и задания зависают ошибкой довольно часто, есть возможность проверять принтеры на ошибку скриптом. В инете нашел такой скрипт:
strComputer = «.»
Set objWMIService = GetObject(«winmgmts:» _
& «{impersonationLevel=impersonate}!\\» & strComputer & «\root\cimv2″)
Set colPrintJobs =  objWMIService.ExecQuery _
(«Select * from Win32_PrintJob where status=’Error’»)
For Each objPrintJob in colPrintJobs
objPrintJob.Resume
Next
Однако, этот скрипт возобновляет печать, только если задание было приостановлено, а перезапускать не хочет. Перезапуск спулера помогает, однако при этом перезапускаются все параллельные очереди на других принтерах. Есть ли метод или скрипт для класса objPrintJob, чтобы перезапустить задание, как это можно сделать визуально?

Собственно cамо решение:

#Определяем способ работы с потоками (threads)
$host.Runspace.ThreadOptions = «ReuseThread»
#Подключаем сборку System.Printing
Add-Type -AssemblyName System.Printing
#Создаем объект PrintServer (для локального компьютера)
$PrintServer = new-object System.Printing.PrintServer
#Получаем перечень очередей печати (PrintQueues)
$PrintQueues = $PrintServer.GetPrintQueues()
#Для каждой очереди печати…
foreach ($PrnQueue in $PrintQueues) {
#…обновим свойства объекта PrnQueue значениями, полученными от принтера
#и утилит очередей печати, запущенных на компьютере
$PrnQueue.Refresh()
#Получаем перечень заданий печати для текущей Очереди печати
$PrintJobs=$PrnQueue.GetPrintJobInfoCollection()
#Для каждого задания печати…
foreach ($PrnJob in $PrintJobs) {
   #…проверяем статус задания
if ($PrnJob.JobStatus.ToString() -like «*error*») {
      #если статус задания, содержит слово error, то перезапускаем задание.
$PrnJob.Restart()
}
}
}

Источник

Download Windows PowerShell Cheat Sheet

Источник

Для начала немного теории. Разберем SID (S-1-5-21-3879291865-2298129343-1096376209-3741) по частям:

• S — говорит нам о том, что это именно SID;
• 1 — уровень контроля;
• 5 — полномочие идентификатора;
• 21 — первое подчиненное полномочие идентификатора;
• 3879291865, 2298129343 и 1096376209 — остальные подчиненные полномочия идентификатора, все вместе они обозначают домен или компьютер, который издал идентификатор SID;
• 3741 — относительный идентификатор.

Более подробно о можно почитать тут.

Теперь сам скрипт. Лучше всего создать функцию, а потом просто вызывать ее с параметром:

--Проверяем существует ли функция, если да то удаляем и создаем.

SELECT dbo.StringSIDToLogin('S-1-5-21-1106671424-631848431-2339101832-7032') AS [Login]

Как оказалось всё просто. Саму идею подсказали на форуме.

автор: antonick

Архив содержит руководства по всем продуктам, кроме Lync, входящим в состав Office Professional Plus 2010. Каждое руководство представляет 70-страничный pdf-файл.

Скачать руководства (28 Мб)