(get-content -path $file) | where-object -filterscript {$_.trim() -ne ''} | set-content -path $file[/quot]

# сначала посчитать 
sls '^\s+$' $file | measure


# или сохранить разницу

$lines = (gc $file)
$lines | ?{ $_ -notmatch '^\s+$}' > sc $file
$lines.Count - (gc $file.Count)

cls
$assemblyPath = “C:\Microsoft.Lync.Model.DLL”

Add-Type -Path $assemblyPath
#add-type -assemblyname $assemblyPath
 
$IMType = 1
$PlainText = 0

$cl = [Microsoft.Lync.Model.LyncClient]::GetClient() 
$conv = $cl.ConversationManager.AddConversation()
$gs = $cl.ContactManager.Groups

$i = 0

#search for user in contacts list
$callbackAddContact = [AsyncCallback]{
    param($asyncResult)

    # callback code
    if ($asyncResult.isCompleted)
    {
        $mygroup.EndAddContact($asyncResult)
    }
}  

foreach ($g in $gs)
{
    foreach ($contact in $g)
    {
        if ($contact.GetContactInformation("PrimaryEmailAddress") -eq “tim@mail.ru”)
        {
            $i++                   
         
            break
        }
    }

    if ($i -eq 0)
    {
        $g = $gs[0]
        $contact = $cl.ContactManager.GetContactByUri(“tim@mail.ru”)
        $g.BeginAddContact($contact,$callbackAddContact,$state)
    }
}

#prepare conversation participant
foreach ($g in $gs)
{
    foreach ($contact in $g)
    {
        if ($contact.GetContactInformation("PrimaryEmailAddress") -eq “tim@mail.ru”)
        {
            $i++
       
            $null= $conv.AddParticipant($contact)
         
            break
        }
    }

    if ($i -gt 0) {break}
}
 
#send message
$d = New-Object “System.Collections.Generic.Dictionary[Microsoft.Lync.Model.Conversation.InstantMessageContentType,String]”
$d.Add($PlainText, “текст сообщения”) 
$m = $conv.Modalities[$IMType]

$myCallback = [AsyncCallback]{
    param( $asyncResult)
    
    # callback code
    if ($asyncResult.isCompleted)
    {
        Write-Host "Message Sent"
    }
}

[void]$m.BeginSendMessage($d, $myCallback, $d)

Add-Type : Невозможно загрузить файл или сборку "Microsoft.Lync.Model, Version=1
5.0.0.0, Culture=neutral, PublicKeyToken=71e9bce111e9429c" или один из зависимых
 от них компонентов. Сбой при проверке правильности строгого имени. (Исключение 
из HRESULT: 0x8013141A)
C:\lync and PS.ps1:4 знак:9
+ Add-Type <<<<  -Path $assemblyPath
    + CategoryInfo          : NotSpecified: (:) [Add-Type], FileLoadException
    + FullyQualifiedErrorId : System.IO.FileLoadException,Microsoft.PowerShell. 
   Commands.AddTypeCommand

$files = split-path -path $MyInvocation.MyCommand.Path #Текущий каталог
Get-Content $files\servers.txt| %{
$computername = $_ #имена серверов
#Сбор инфы
Get-WMIObject Win32_Process -filter "name='explorer.exe'" -computername $computername  |
ForEach-Object {
$owner = $_.GetOwner()
‘{0}’ -f $owner.User} |
ForEach-Object {
$rv = 1 | Select-Object ComputerName, User
$rv.ComputerName = $computername 
$rv.User = $_ 
$rv  
}
}

Get-WmiObject -Class Win32_Processor  -ComputerName $comps | Select-Object -Property name | format-table -HideTableHeaders

 (Get-WmiObject -Class Win32_Processor  -ComputerName $comps).Name

# ИНФОРМАЦИЯ О КОМПЬЮТЕРАХ
# СПИСОК КОМПЬЮТЕРОВ В ФАЙЛЕ servers.txt 
  (создается заранее)
# КОТОРЫЙ ФОРМИРУЕТСЯ В EXCEL ФАЙЛ
##########################################

cls
# Создаём объект Excel
$Excel = New-Object -ComObject Excel.Application

# Делаем его видимым
$Excel.Visible = $true

# Добавляем рабочую книгу
$WorkBook = $Excel.Workbooks.Add()

# Начинаем работать с первым листом. 
#Для простоты  обращения к нему создаём соответствующую переменную
$info_comp = $WorkBook.Worksheets.Item(1)

# Переименовываем лист
$info_comp.Name = 'The information on computers'

# Заполняем ячейки - шапку таблицы
$info_comp.Cells.Item(1,1) = '[Computer]'
$info_comp.Cells.Item(1,2) = '[Operation System]'
$info_comp.Cells.Item(1,3) = '[SP]'
$info_comp.Cells.Item(1,4) = '[Architecture]'
$info_comp.Cells.Item(1,5) = '[Motherboard]'
$info_comp.Cells.Item(1,6) = '[Processor]'
$info_comp.Cells.Item(1,7) = '[RAM(GB)]'
$info_comp.Cells.Item(1,8) = '[Graphic adapter]'
$info_comp.Cells.Item(1,9) = '[Disk]'
$info_comp.Cells.Item(1,10) = '[Free(GB)]'
$info_comp.Cells.Item(1,11) = '[Total(GB)]'


# Переходим на следующую строку...
$Row = 2
$Column = 1

$files = split-path -path $MyInvocation.MyCommand.Path #Текущий каталог
#$srv = read-host "Список серверов"
Get-Content $files\servers.txt| %{
$comps = $_ #имена серверов
#Сбор инфы
if (Test-connection -Quiet $comps -count 1) {
#Имя компьютера
    $info_comp.Cells.Item($Row, $Column) = $comps
    $Column++

#Операционная система
$OS = (Get-WmiObject -Class Win32_operatingSystem -ComputerName $comps).caption 
$info_comp.Cells.Item($Row, $Column) = $OS
    $Column++
    
$SP = (Get-WmiObject -Class Win32_operatingSystem -ComputerName $comps).servicepackmajorversion 
if ($SP -gt 0){
$info_comp.Cells.Item($Row, $Column) = $SP}
else {$SP1 = ""
      $info_comp.Cells.Item($Row, $Column) = $SP1
     }
    $Column++

$Arch = (Get-WmiObject -Class Win32_operatingSystem -ComputerName $comps).osarchitecture
if ($Arch -eq "64-bit"){
$info_comp.Cells.Item($Row, $Column) = $Arch}
else {$Arch1 = "32-bit"
      $info_comp.Cells.Item($Row, $Column) = $Arch1}
    $Column++         

#Материнская плата
$Moth = (Get-WmiObject -Class Win32_BaseBoard -ComputerName $comps).product
$info_comp.Cells.Item($Row, $Column) = $Moth
    $Column++

#Процессор
$CPU_ = (Get-WmiObject -Class Win32_Processor  -ComputerName $comps).deviceid
    if($CPU_ -ne "CPU0")
  {
   $CPU1 = (Get-WmiObject -Class Win32_Processor  -ComputerName $comps)[0].Name
   $info_comp.Cells.Item($Row, $Column) = $CPU1
    }
else {
      $CPU =  (Get-WmiObject -Class Win32_Processor  -ComputerName $comps).Name
      $info_comp.Cells.Item($Row, $Column) = $CPU
     }

    $Column++

#Оперативная память
$total = 0
$RAM = (gwmi win32_physicalmemory -ComputerName $comps) | foreach { $total += ($_.capacity / 1Gb) }
$RAM = '{0}' -f $total
$info_comp.Cells.Item($Row, $Column) = $RAM
    $Column++

#Видеоподсистема
$GPU = (Get-WmiObject -Class Win32_VideoController  -ComputerName $comps).name
$GPU1 = (Get-WmiObject -Class Win32_VideoController  -ComputerName $comps)[0].name
$GPU2 = (Get-WmiObject -Class Win32_VideoController  -ComputerName $comps)[1].name

#$d1 = "DameWare Development Mirror Driver 64-bit"
#$d2 = "DameWare Development Mirror Driver"
#$C = "ConfigMgr Remote Control Driver"
$drivers = "*Driver*"

   if ($GPU -ne $Null)
     {
     $info_comp.Cells.Item($Row, $Column) = $GPU
     $Column++
     }
     
     
   if($GPU1 -like $drivers -or $GPU1 -like $drivers)
     {
     $info_comp.Cells.Item($Row, $Column) = $GPU2
     $Column++
     }
        else 
            {
             $info_comp.Cells.Item($Row, $Column) = $GPU1
             $Column++
            }  
     
#Носители информации
          
    # локальные диски
     Get-WmiObject Win32_LogicalDisk -Filter   "DriveType=3" -ComputerName $comps | ForEach-Object `
{
    # Name_PC 
    $dev_id = $_.deviceID
  
    $info_comp.Cells.Item($Row, $Column) = $dev_id
    $Column++
 
    # Free Space
    $info_comp.Cells.Item($Row, $Column) = ([Math]::Round($_.FreeSpace/1GB, 2))
    $Column++
    
    # Size
    $info_comp.Cells.Item($Row, $Column) = ([Math]::Round($_.Size/1GB, 2))
    $Column++
        
    $Column = 9


###########################################################################
# Номер начальной строки
$InitialRow = $Row
# Возвращаемся на одну строку назад
#$Row--

$DataRange = $info_comp.Range(("A{0}" -f $InitialRow), ("K{0}" -f $Row))
7..12 | ForEach-Object `
{
    $DataRange.Borders.Item($_).LineStyle = 1
    $DataRange.Borders.Item($_).Weight = 2
}

$Row++
#############################################################################
}
##############    
$Column = 1
##############
}

} #end

# Выделяем жирным шапку таблицы
$info_comp.Rows.Item(1).Font.Bold = $true
$info_comp.Rows.Item(1).Font.Size = 12
$info_comp.Rows.Item(1).Font.Color = 8210719

# Переменная $UsedRange содержит все занятые ячейки (эквивалентно однократному нажатию Ctrl+A)
$UsedRange = $info_comp.UsedRange
$UsedRange.EntireColumn.AutoFit() | Out-Null

###########################################################################
# Номер начальной строки
$InitialRow = $Row
# Возвращаемся на одну строку назад
#$Row--

$DataRange = $info_comp.Range(("A{0}" -f $InitialRow), ("K{0}" -f $Row))
7..12 | ForEach-Object `
{
    $DataRange.Borders.Item($_).LineStyle = 1
    $DataRange.Borders.Item($_).Weight = 2
}

$Row++
#############################################################################

 cls

$file = "c:\test.syslog"

foreach ($f in $file)
{
$f = (Select-String -path $file -Encoding default -SimpleMatch '9069:' -Context 1)[-3]

$f.Line
$f.Context.PostContext 
}