8.х кнопка "Отправить по электронной почте"

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем zayaroslava, 23 май 2011.

  1. TopicStarter Overlay
    zayaroslava
    Offline

    zayaroslava Опытный в 1С

    Регистрация:
    27 янв 2010
    Сообщения:
    329
    Симпатии:
    1
    Баллы:
    26
    Создал внешнюю печатную форму(Счет на оплату) на основе готовой,подключил через Сервис->Внешние печатные формы и обработки->Внешние печатные формы...НО когда формирую эту форму из Предприятия,нету кнопки "Отправить по электронной почте" как ее туда вставить и сама форма выглядит как таблица =(
  2. Hr0n
    Offline

    Hr0n Опытный в 1С

    Регистрация:
    17 авг 2009
    Сообщения:
    353
    Симпатии:
    0
    Баллы:
    26
    Приложите скриншоты чтобы стало понятно, что у Вас за форма.
    А вообще чтобы появилась эта кнопка, надо чтобы печ. форма открылась в общей форме "ПечатьДокументов" или "ПечатьДокументовУправляемая", при присоединении внешней печ. формы так и должно происходить.
    В типовых конфигурациях программно вывод печатной формы на форму "ПечатьДокументов" происходит с помощью процедуры УниверсальныеМеханизмы.НапечататьДокумент()
  3. TopicStarter Overlay
    zayaroslava
    Offline

    zayaroslava Опытный в 1С

    Регистрация:
    27 янв 2010
    Сообщения:
    329
    Симпатии:
    1
    Баллы:
    26
    Прикрепил сам отчет и скрин...если есть возможность подскажите что поправить надо в коде чтобы эта кнопка появилась

    Вложения:

    • 1.JPG
      1.JPG
      Размер файла:
      108,9 КБ
      Просмотров:
      232
    • Счет.epf
      Размер файла:
      19,1 КБ
      Просмотров:
      64
  4. Hr0n
    Offline

    Hr0n Опытный в 1С

    Регистрация:
    17 авг 2009
    Сообщения:
    353
    Симпатии:
    0
    Баллы:
    26
    В таком виде выводится отчет в случае если использовать метод ТабДок.Показать();
    В самой внешней печ. форме вы случайно не используете этот метод вывода после формирования табличного документа? Киньте код вывода на печать
  5. TopicStarter Overlay
    zayaroslava
    Offline

    zayaroslava Опытный в 1С

    Регистрация:
    27 янв 2010
    Сообщения:
    329
    Симпатии:
    1
    Баллы:
    26
    ...
    Код:
    // Вывести Сумму прописью
    ОбластьМакета = Макет.ПолучитьОбласть("СуммаПрописью");
    ОбластьМакета.Параметры.Заполнить(ПараметрыПечати);
    ТабДокумент.Вывести(ОбластьМакета);
    
    // Вывести подписи
    Если Тип = "Счет" Тогда
    ОбластьМакета = Макет.ПолучитьОбласть("ПодвалСчета");
    Иначе
    ОбластьМакета = Макет.ПолучитьОбласть("ПодвалЗаказа");
    КонецЕсли; 
    
    ОбластьМакета.Параметры.Заполнить(ПараметрыПечати);
    
    ТабДокумент.Вывести(ОбластьМакета);
    ТабДокумент.АвтоМасштаб = Истина;
    
    ТабДокумент.Показать();
    //ТабДокумент.ТолькоПросмотр=Истина;
    
    
    Так и есть ТабДокумент.Показать(); , а на что надо поменять чтобы кнопка появилась?
  6. TopicStarter Overlay
    zayaroslava
    Offline

    zayaroslava Опытный в 1С

    Регистрация:
    27 янв 2010
    Сообщения:
    329
    Симпатии:
    1
    Баллы:
    26
    Всё получилось ...Поменял

    ТабДокумент.Показать();

    на

    Возврат ТабДокумент;


    ....
    Спасибо Hron
  7. v0233
    Offline

    v0233 Опытный в 1С

    Регистрация:
    23 авг 2010
    Сообщения:
    167
    Симпатии:
    0
    Баллы:
    26
    Добрый день.
    У меня тоже что то подобное, не могу прикрепить табличный документ к вложению чтобы отправить по эл.почте. Помогите пожалуйста
    Т1 у меня табличный документ. Т1.Показать() выводит таблицу со счетом,
    я хочу сделать чтобы этот табличный документ прикрепился к письму и отправился по почте.
    Вставляю я строку Сообщение.Вложения.Добавить(Новый ДвоичныеДанные(Т1),"счет на оплату.xls");
    Выдает ошибку Файл не обнаружен 'ТабличныйДокумент'

    {Документ.СчетаЗаУслуги.Форма.ФормаДокументаСчета(34)}: Ошибка при вызове конструктора (ДвоичныеДанные)
    Сообщение.Вложения.Добавить(Новый ДвоичныеДанные(Т1),"счет на оплату.xls");
    по причине:
    Файл не обнаружен 'ТабличныйДокумент'


    До этого отправлял jpg файлы
    Сообщение.Вложения.Добавить(Новый ДвоичныеДанные("D:\1\1.jpg"),"1.jpg");
    Все работает как по маслу.


    Помогите пожалуйста прикрепить табличный документ

    Вот весь код
    Код:
    Т1=Новый ТабличныйДокумент;    
    
    СформироватьСчет(Т1);
    
    Почта = Новый ИнтернетПочта;
    Попытка
    Почта.Подключиться(ПолучитьПрофиль());
    Исключение
    Сообщить(ОписаниеОшибки()); 
    Возврат;
    КонецПопытки;
    Сообщение = Новый ИнтернетПочтовоеСообщение;
    
    
    Сообщение.Вложения.Добавить(Новый ДвоичныеДанные(Т1),"счет на оплату.xls");
    
    Сообщение.Отправитель = "mail@mail.ru";
    Сообщение.ИмяОтправителя = "Алексей Алексеевич";
    ПочтовыеАдреса = Сообщение.Получатели;
    ПочтовыйАдрес = ПочтовыеАдреса.Добавить();
    ПочтовыйАдрес.Адрес = "mail@mail.ru";
    ПочтовыйАдрес.ОтображаемоеИмя="ООО Алексеич";
    Сообщение.Тема ="счет на оплату"; 
    
    ИнтернетТекстПочтовогоСообщения = Сообщение.Тексты.Добавить();
    ИнтернетТекстПочтовогоСообщения.Текст = "Этот счет сформирован автоматически, отвечать на него не нужно";
    ИнтернетТекстПочтовогоСообщения.ТипТекста = ТипТекстаПочтовогоСообщения.ПростойТекст;
    
    Попытка
    // Пытаемся послать письмо
    Почта.Послать(Сообщение);
    Исключение
    Сообщить(ОписаниеОшибки()); 
    Возврат;
    КонецПопытки;
    // отключение
    Почта.Отключиться();
    
    

Поделиться этой страницей