axeffect
07.08.2012, 17:01
Есть проблема, хочу поставить пометку "к исполнению" при отправке письма
дату начала и дату исполнения в аутлуке проставляется, а вот что бы красный флажок появился, никак не могу сделать
вот кусок кода
&НаСервере
Процедура ОтправитьПисьмо() Экспорт
Outlook = Новый ComОбъект("Outlook.Application");
пАдресПолучателя = СокрЛП(АдресПолучателя());
Попытка
Письмо = Outlook.CreateItem(0);
пСтатусСообщения = Истина;
Письмо.Subject = Поручение;
Письмо.Body = Описание;
Письмо.Importance = Перечисления.ПриоритетВаж� �ости.Индекс(Важность);
Письмо.TaskStartDate = ТекущаяДата();
Письмо.TaskDueDate = СрокИсполнения;
Письмо.To = пАдресПолучателя;
Письмо.Send();
//Сообщить("Письмо отправлено!!!");
Исключение
//Сообщить("Письмо не отправлено!!!");
КонецПопытки;
КонецПроцедуры
помогите пожалуйста в решении этой проблемы
дату начала и дату исполнения в аутлуке проставляется, а вот что бы красный флажок появился, никак не могу сделать
вот кусок кода
&НаСервере
Процедура ОтправитьПисьмо() Экспорт
Outlook = Новый ComОбъект("Outlook.Application");
пАдресПолучателя = СокрЛП(АдресПолучателя());
Попытка
Письмо = Outlook.CreateItem(0);
пСтатусСообщения = Истина;
Письмо.Subject = Поручение;
Письмо.Body = Описание;
Письмо.Importance = Перечисления.ПриоритетВаж� �ости.Индекс(Важность);
Письмо.TaskStartDate = ТекущаяДата();
Письмо.TaskDueDate = СрокИсполнения;
Письмо.To = пАдресПолучателя;
Письмо.Send();
//Сообщить("Письмо отправлено!!!");
Исключение
//Сообщить("Письмо не отправлено!!!");
КонецПопытки;
КонецПроцедуры
помогите пожалуйста в решении этой проблемы