[dosperados]

Что-то ни кто даже слово не напишет) что все боятся запустить у себя этот скрипт!? Он ничего не удалит если не будет в контакте особых полей ($_.Mileage и $_.BusinessHomePage) с нужными значениями. только если два этих поля удовлетворили условию тогда этот контакт удалиться...

Мне нужен совет гуру, почему при тесте без использования $_.delete() все работает как положено, а с ним неправильно!!!
Ну или вообще как подругому сделать)

[Iska]

dosperados, возможно, это как-то связано с перемещением по коллекции. Я с чем-то подобным при работе с коллекциями сталкивался и под WSH.

Попробуйте работать не с коллекцией, а с выборкой по условию:

Код:

$outlook = New-Object -ComObject Outlook.Application
$mapi = $outlook.GetNamespace("MAPI")

$Contacts = $mapi.GetDefaultFolder(10).Items

$Contact = $Contacts.Find("[Mileage] = ""1"" AND [BusinessHomePage] = ""http://company.com/""")

while ($Contact -ne $null) {
    Write-Host $Contact.LastName $Contact.Email1Address $Contact.EntryID -ForegroundColor blue
    
    $Contact.Delete()
    $Contact = $Contacts.FindNext()
}

[dosperados]

Iska, Спасибо твой метод работает как положенно, но кто знает как реализовать мою задумку не через попу как сейчас, а правильно!?

[dosperados]

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

PHP код:

#Подключаемся к Outlook

$outlook = New-Object -ComObject Outlook.Application

$mapi = $outlook.GetNamespace("MAPI")

#Получаем папку контактов для сохранения новых

$Contacts =  $mapi.GetDefaultFolder(10)

  # Проверяем создана ли подпапка "контакты фирмы" если не создана, то создаем ее.

  $CompanyContFolder  =   $Contacts.Folders.Item("Контакты моей компании")

  if ($CompanyContFolder -eq $null) { 

  $CompanyContFolder  =   $Contacts.Folders.Add("Контакты моей компании")

  $CompanyContFolder  =   $Contacts.Folders.Item("Контакты моей компании") 

  Write-Host "Папка компании создана и выбрана" -ForegroundColor DarkRed }

  

  $CompanyContFolder = $outlook.Application.CreateItem(2)

    $CompanyContFolder.LastName = "Test_LastName"

    $CompanyContFolder.Email1Address = "test@email.ru"

    $CompanyContFolder.CompanyName = "Моя комания"

    $CompanyContFolder.Department = "test_Department"

    $CompanyContFolder.BusinessHomePage = "http://company.com/"

    $CompanyContFolder.Mileage = "1"

    #Сохраняем контакт

    $CompanyContFolder.Save() 

[Iska]

dosperados, попробуйте так:

Код:

$oOutlook    = New-Object -ComObject Outlook.Application
$oNameSpace  = $oOutlook.GetNamespace("MAPI")
$oMAPIFolder = $oNameSpace.GetDefaultFolder(10)

try {
    $oMyMAPIFolder = $oMAPIFolder.Folders.Item("Контакты моей компании")
} catch {
    $oMyMAPIFolder = $oMAPIFolder.Folders.Add("Контакты моей компании")
}

$oContact = $oMyMAPIFolder.Items.Add(2)

$oContact.LastName         = "Test_LastName"
$oContact.Email1Address    = "test@email.ru"
$oContact.CompanyName      = "Моя комания"
$oContact.Department       = "test_Department"
$oContact.BusinessHomePage = "http://company.com/"
$oContact.Mileage          = "1"

$oContact.Save()

[dosperados]

Iska, Ты гений так легко и просто решил две мои проблемы! Огромное тебе, человеческое спасибо!

Iska, Можно ещё один глупый вопрос зачем буковка o в переменных $oContact, она что-то значит или просто для красоты?

[dosperados]

Iska, Будь добр подскажи ещё раз! По отдельности все что ты мне помогал работает, а вот когда совмещаю все в одно, то работает не совсем так как нужно... папку создает и в ней контакты тоже, но удалить из папки контакты не получается.

PHP код:

#Подключаемся к Outlook

$oOutlook    = New-Object -ComObject Outlook.Application

$oNameSpace  = $oOutlook.GetNamespace("MAPI")

#Получаем папку "Контакты"

$oMAPIFolder = $oNameSpace.GetDefaultFolder(10)





#Получаем папку контактов для удаления

$oContact = $oMyMAPIFolder.Items.Find("[Mileage] = ""1"" AND [BusinessHomePage] = ""http://company.com/""")

while ($oContact -ne $null) {

    Write-Host $oContact.LastName $oContact.Email1Address        $oContact.EntryID -ForegroundColor blue

    $oContact.Delete()

    $oContact = $oContact.FindNext()

                            } 

[Iska]

зачем буковка o в переменных $oContact, она что-то значит или просто для красоты? »

С точки зрения PoSH — да, для красоты. Для меня — что эта переменная предназначена для хранения ссылки на объект.

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

Где, в каком месте и что именно «не работает»?

И на что мне ориентироваться? На код в предыдущем посте или тот, что Вы прислали в личку? Определитесь.

[dosperados]

Не работает вот эта часть скрипта, когда контакты созданы в подпапке т.е. ("\\Outlook\Контакты\контакты компании") невозможно их удалить.
В этой части скрипта я пытался получить папку "контакты компании" и методом Find найти все содержимое и в цикле удалить каждый найденный элемент, но мне возвращается ошибка что метода FindNext() нет для данного объекта. и что я делаю неправильно я непойму...

PHP код:

#Получаем папку контактов для удаления 

$oMAPIFolder = $oNameSpace.GetDefaultFolder(10).Items("контакты компании")

$oContact = $oMyMAPIFolder.Items.Find("[Mileage] = ""1"" AND [BusinessHomePage] = ""http://company.com/""") 

while ($oContact -ne $null) { 

    Write-Host $oContact.LastName $oContact.Email1Address        $oContact.EntryID -ForegroundColor blue 

    $oContact.Delete() 

    $oContact = $oContact.FindNext() 

                            } 

Удалить содержимое этой папки я пытался разными способами: Другой вариант удалить саму папку "контакты компании" такой вариант тоже мне подойдет... Ну или удалять содержимое этой папки по фильтрам. Но ни так у меня не получается.