Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Программирование, связанное с MS Office > сообщение outlook и присвоение ему статуса "к испо


Автор: Obsidian 17.4.2010, 22:30
В outlook есть возможность отправить письмо человеку с установленной датой напоминания, где у получателя сразу же создается напоминание о задаче. Само письмо создаю, проблем нет, а вот как пометить его чтобы было напоминание не в курсе.
Код


           Dim olApp As Outlook.Application
            olApp = CType (CreateObject ("Outlook.Application"), Outlook.Application)
            Dim olMailConsult As Outlook.MailItem
            olMailConsult = CType (olApp.CreateItem (Outlook.OlItemType.olMailItem), Outlook.MailItem)
            olMailConsult.ReminderTime = dtpDateReminder.Value
            olMailConsult.ReminderSet = True

последние 2 строчки кода вроде указывают само время напоминания, но пометка об этом не устанавливается, помогите пожалуйста найти нужный метод\свойство.

Автор: diadiavova 17.4.2010, 23:10
Obsidian, это вопрос не по языку VB.Net, а по офисным API.
Тема перенесена

Автор: artdev 18.4.2010, 08:49
Код

Sub MailReminder()
  Dim olApp As Outlook.Application
  Dim olMailConsult As Outlook.MailItem
  
  Set olApp = Outlook.Application
  Set olMailConsult = olApp.CreateItem(olMailItem)

  olMailConsult.FlagStatus = olFlagMarked
  olMailConsult.FlagDueBy = #4/19/2010# 
  olMailConsult.Subject = "К исполнению"
  olMailConsult.Display

  Set olMailConsult = Nothing
  Set olApp = Nothing
End Sub

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)