Создание задачи из письма

 
0
 
MS Office, Open Office, etc.
ava
Lord777 | 11.11.2016, 16:14
Добрый день!

Прошу помощи в написании скрипта.

Создаем правило, когда приходит письмо от определенного адресата, запускается скрипт, который:
Cкрипт автоматически переделывает письмо в задачу, "Тема письма - Тема задачи", "Текст в письме - описание задачи", "Срок задачи - сегодня"


Или другой скрипт, который при принятии задачи её переадресовывает отправителю, при этом сохраняет и срок и Тему...
Нашел в интернете вот этот скрипт (но он у меня почему-то не работает):

Sub AssignTask(myItem As Outlook.MailItem)

    Dim myItem As Outlook.TaskItem

    Dim myDelegate As Outlook.Recipient

    Set myItem = Application.CreateItem(olTaskItem)

    myItem.Assign
    Set myDelegate = myItem.Recipients.Add("[email protected]")

    myDelegate.Resolve


  If myDelegate.Resolved Then
        myItem.Subject = "test"
        myItem.DueDate = Now
        myItem.Display
        myItem.Send
    End If


End Sub



Заранее большое спасибо!!!
Kommentare (1)
ava
clibin009 | 09.10.2018, 08:57 #
lh181009
lacoste pas cher
kate spade
the north face
cheap jordan shoes
michael kors outlet
michael kors outlet store
canada goose outlet store
coach factory outlet
air jordan shoes
moncler outlet
moncler jackets
canada goose outlet store
michael kors outlet clearance
true religion outlet store
canada goose outlet
broncos jerseys
coach outlet online store 
pandora outlet
moncler coats
cheap ugg boots
mbt outlet
ugg outlet store
coach factory outlet
cheap uggs
michael kors handbags
cheap jordan shoes
uggs outlet online
polo ralph lauren
uggs canada
canada goose jackets
pandora jewelry
louboutin shoes
coach outlet online
uggs outlet online
christian louboutin
red bottoms
christian louboutin sale
coach outlet store online
kate spade purses
red bottoms
ugg outlet
canada goose sale
nike shoes sale
cheap ugg boots
coach factory outlet
ugg boots clearance
canada goose outlet store
ugg outlet store
ugg boots clearance
uggs outlet online
moncler outlet store
miu miu outlet
ugg boots
ray ban sunglasses outlet
coach factory outlet online
broncos jersey
cheap jordan shoes
cheap ugg boots
kate spade handbags
canada goose jackets clearance
coach outlet online
hermes online
ugg outlet online
coach outlet store online
canada goose uk
mbt shoes outlet
pandora charms sale clearance
michael kors outlet online
pandora outlet
michael kors outlet store
coach factory outlet
kate spade new york
cheap air jordans
ugg boots
cheap ugg boots
coach outlet online
cheap jordans
air jordan shoes
michael kors outlet clearance
mlb jerseys wholesale
cheap jordans
michael kors outlet clearance
christian louboutin sale
christian louboutin
cheap jordan shoes
kate spade handbags
oakley sunglasses wholesale
christian louboutin sale
christian louboutin sale
malone souliers shoes
coach outlet store online
cheap ray ban sunglasses
supreme shirts
nike air max schweiz
canada goose jackets
red bottoms
cheap oakley sunglasses
cheap jordan shoes
north face outlet
uggs outlet online
lh181009
Registrieren Sie sich oder melden Sie sich an, um schreiben zu können.
Unternehmen des Tages
Вы также можете добавить свою фирму в каталог IT-фирм, и публиковать статьи, новости, вакансии и другую информацию от имени фирмы.
Подробнее
Mitwirkende
advanced
Absenden