Здраствуйте! Хочу открыть вордовский файл для начала ( в дальнейшем надо будет записывать туда программно значения и сохранять в pdf)

Модуль формы

&НаКлиенте
Процедура ФайлНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
   
   Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
   Диалог.ПолноеИмяФайла = "";
   Текст = НСтр("ru = ""Текст""; en = ""Text""");
   Диалог.Фильтр = НСтр(Текст) + "(*.docx)|*.docx";
   Диалог.МножественныйВыбор = Истина;
   Диалог.Заголовок = "Выберите файл";
   
   Если Диалог.Выбрать() Тогда
       МассивФайлов = Диалог.ВыбранныеФайлы;
       Для Каждого ИмяФайла Из МассивФайлов Цикл
           ВыбФайл = Новый Файл(ИмяФайла);
           Объект.Файл = ВыбФайл.ПолноеИмя;
       КонецЦикла;
   Иначе
       Текст = "ru = ""Файл(ы) не выбран!""; en = ""File(s) not selected!""";
       Предупреждение(НСтр(Текст));
   КонецЕсли;
   

КонецПроцедуры


&НаКлиенте
Процедура ИзменитьОбъект(Команда)
   
   ПередатьОбъектДляИзменения(Объект.Файл);
   
КонецПроцедуры

&НаСервере
Процедура ПередатьОбъектДляИзменения(Файл)
   
   Обработки.ОбработкаДоговора.ИзменениеМакета(Файл);
   
КонецПроцедуры


Модуль менеджера:

Функция ИзменениеМакета (Файл) Экспорт
   
       
   // Заполняем шаблон  MS Word
   Шаблон = Новый COMОбъект("Word.Application");
   Шаблон.Documents.Add(Файл);
   Шаблон.ActiveDocument.Open();
   
   ////Заполнение шаблона заменой
   //Find = Шаблон.ActiveDocument.Range().Find;
   //Find.ClearFormatting();
   //Find.Forward = -1;
       
   
   
   //Find.Execute("{НомерДоговора}",,,,,,,,, СокрЛП(Объект.НомерДоговора),2);
   
КонецФункции

Ругается говорит мол файл поврежден, хотя вордом нормально открывается, а в 1ске нифига =(

это ты хвастаешься?

а сохранять в пдф без ворда не хочешь?

(2) а ты умеешь программно пдф заполнять? расскажи а?

Есть договор в ворде, его надо будет заполнить, а потом в формате пдф приклеить к отправке на мыло

(3) ТабДок умеет

(3) 8.2 умеет сохранять отчеты в PDF.

+(5) ну.. не заполнять, допустим, но записывать

(0)
Ворд = Новый COMОбъект("Word.Application");
Документ = Ворд.Documents.Open(ПолныйПуть);

Господа! Мне не нужно сохранять таб документ! У меня есть шаблон договора вордовский, в котором мне нужно заполнить поля о клиенте и приклеить вложением к отправке на почту

Чтобы что-то прикрепить, нужно что-то сохранить :)

(9) а ты прикреплять что собрался?

(10) так в том то и дело) мне нужно просто напросто внести небольшие изменения в уже существуещий шаблон (Тоесть заполнить информацию о клиенте) и потом уже через bullzip сохранить в пдф и приклеить

(12) ответь на (2) всё равно

(11) есть ЗаказКлиента когда мы печатаем счет ему и отправляем на мыло счет сохраненный в формате пдф(вот именно счет Печатную форму сохраняет в пдф), и к счету должно быть приложение Доп. Соглашение, которое мне начальник кинул в ворде, и его нужно сохранить в пдф и тоже приклеить предварительно заполнив вордовский шаблон

(12) Word 2010, кстати, сам может в PDF сохранять, без bullzip.

(13) мне начальник дал сначала шаблон в формате пдф, но порыскав по этому форуму и получив кучу ответов что никто не знает как редактировать pdf(тобишь заполнить что то данными 1ски) мне советовали wordом редактировать.

(14) У вас форма счета из 1С сразу в Ворде получается?

(14) Можно же сделать из этого вордовского шаблона макет в 1С-ке и заполнять его обычным образом.

(15) пользуюсь тем что есть)

(18) ActiveDocument Загрузить из файла?

(14) а можно в табличном документе сделать это доп. соглашение

(0) попробуй так работать с вордом:

   Попытка
       WordАрр = Новый COMОбъект("Word.Application");
   Исключение
       Предупреждение("Возможно не установлено приложение ""Microsoft Word"".",,"Формирование договора невозможно. ");
       Возврат Неопределено;
   КонецПопытки;    

   Попытка
       ActiveDocument = WordАрр.Application.Documents.Add(ИмяВременногоФайла);
       ActiveDocument.Activate();
   Исключение
       Предупреждение("Ошибка открытия файла шаблона.",,"Формирование договора невозможно. ");
       Возврат Неопределено;
   КонецПопытки;

Увы на таб документ я еще не умею натягивать вордовские шаблоны, а насчет актив и загрузить из файла так он вообще не загружает его кнопку жмешь а конструктору все непочем

(22) ну и в конце
       ActiveDocument.SaveAS(Каталог + "\" + ИмяФайла, ?(РасширениеФайла = "pdf", 17, 16));  //17-pdf   16-docx
       ActiveDocument.Close(0);
       WordАрр.Application.Quit();

(23) я тоже. но текстом его заполнять я умею

(23) Можно воспользоваться универсальным методом Copy&Paste.

(0) учитывая:

"Господа! Мне не нужно сохранять таб документ! У меня есть шаблон договора вордовский, в котором мне нужно заполнить поля о клиенте и приклеить вложением к отправке на почту"

и

"есть ЗаказКлиента когда мы печатаем счет ему и отправляем на мыло счет сохраненный в формате пдф(вот именно счет Печатную форму сохраняет в пдф), и к счету должно быть приложение Доп. Соглашение, которое мне начальник кинул в ворде, и его нужно сохранить в пдф и тоже приклеить предварительно заполнив вордовский шаблон"

Не понимаю проблемы автора и гемороя с Вордом?!

Шаблон у тебя есть! Заполнять тебе один хрен из 1С. Так сделай макет этого договора (соглашения) в 1С-ке (как обычный отчетик). Заполняй его, сохраняй в ПДФ (8.2 это умеет) и отправляй куда угодно.

При этом не надо гемороиться с Вордом + работать будет гораздо быстрее + уходят многие подводные камни (на которые ты обязательно наткнешься позже).

(26) а копи паст все сделает ровно?) и фоновый рисунок (лого компании) закрепит также как в ворде?) за текстом

(28) Что-то вручную, конечно, поправить придется. И полупрозрачный рисунок вставить возможность есть.

http://s41.radikal.ru/i092/1302/25/88fb35f16fc5.jpg =)

начало)

(30)  Это ПДФ-файл сформированный полностью из 1С (без вордов, виртуальных принтеров и т.д.)

http://s005.radikal.ru/i211/1302/c0/2fb1d170c2f5.jpg

П.С. и кстати он тожепотом по почте автоматом отправляется

Ладно. Всем спасибо за советы) буду пытаться их использовать или искать что то другое)

(32) он же ввиде табличного документа был? а потом его сохранили в формате pdf, насчет того как натянуть шаблон на макет я повторюсь, что пока у меня мало знаний для этого...

(30) Реализуемо средсвами 1С на 100%.
Вот тебе пример фонового рисунка: http://s017.radikal.ru/i415/1302/9c/22caba3f235f.png

(35) спасибо le_ буду пробовать)

(35) но форматировать придется дофига)

(35) у меня с бибишкой красивее :)

первый раз вижу, чтоб одинэсники pdf-ками мерялись...

(38) У меня красочнее )

(37) Ну, иногда в 1С-ке что-то приходится делать вручную.

(40) ща вставлю красный Астон Мартин!