Имя: Пароль:
1C
 
Как сохранить вложение электронного письма в нужный каталог?
0 Troxim
 
26.03.09
12:07
Подскажите пожалуйста как сохранить вложение... перебирать могу.. а вот сохранить что-то не могу сообразить где надо путь указать.. в интернете тоже нашёл только общее описание... написано следующее

Профиль = Новый ИнтернетПочтовыйПрофиль;
Профиль.АдресСервераSMTP = СокрЛП(Маил.SMTPСервер);    
Профиль.АдресСервераPOP3 = СокрЛП(Маил.POP3Сервер);    
Профиль.ПортSMTP = Маил.ПортSMTP;                
Профиль.ПортPOP3 = Маил.ПортPOP3;                
Профиль.Пользователь = СокрЛП(Маил.АдресЭлектроннойПочты);    
Профиль.Пароль = СокрЛП(Маил.Пароль);            
Профиль.ВремяОжидания = 60;
   
Почта = Новый ИнтернетПочта;            
Попытка
   состояние("Подключение к интернету");
   Почта.Подключиться(Профиль);
Исключение
   Сообщить(ОписаниеОшибки(),СтатусСообщения.Важное);
   Почта.Отключиться();
   Возврат;
КонецПопытки;

Заголовки = Почта.ПолучитьЗаголовки();
   
#Если Клиент Тогда
   Если Заголовки.Количество() = 0 Тогда
       Предупреждение("На сервере нет писем",,"На сервере нет писем");
   Возврат;
    КонецЕсли;
#КонецЕсли
       
Письма = Почта.Выбрать(Ложь, Заголовки);
Для Каждого Письмо Из Письма Цикл
   Для Каждого Влож Из Письмо.Вложения Цикл
   // Что тут надо написать что бы сохранить файл на диск С к примеру??        
   КонецЦикла;        
Конеццикла;
1 73
 
26.03.09
12:12
У Вложения свойство Данные смотри. Там Записать() есть.
2 Troxim
 
26.03.09
12:13
а путь.... Записать("С:\.....")   так что ли? а то я смотрел уже записать.. но вот куда путь передать
3 73
 
26.03.09
12:16
СП:
ДвоичныеДанные (BinaryData)
Записать (Write)
Синтаксис:
Записать(<Имя файла>)
Параметры:
<Имя файла> (обязательный)
Тип: Строка. Имя файла, в который необходимо записать двоичные данные. Если файл существует, он будет перезаписан, иначе - создан.
4 Troxim
 
26.03.09
12:19
спасибо.. разобрался
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан