Распознование PDF файлов
Обработки - Универсальные обработки
Обработка распознавания файлов в формате PDF.
К сожалению в 1С нет возможности распознавать сканированные файлы. Поработав в сети я наткнулся на некоторые файлы. Которые после некоторых изменений превратились вот в эту обработку.
Вкратце что необходимо знать:
Обработка корректно может распознать только те файлы которые были пересохранены с Word-a или Excel-я в файл с расширением PDF.
В остальных случаях за чистоту результата не ручаюсь.
Немного как появилась необходимость в написании такой обработки.
1. У меня на работе Есть 1С сервер установленный на Windows (его обслуживают админы их много);
2. На всех клиентских машинах 1С подключена через RDP (со всеми вытекающими плюсами и минусами);
3. В тех задании стояла задача загружать произвольную информацию сохраненных в семействе продуктов Office.
файлы Word и Excel загружаться не будут т.к.
Админ мотивировал отказ тем что, по правилам должно докупаться лицензия на каждую терминальную сессию, а это дорого и не рационально.
Пришлось идти в гугл и вот результат. Нашел бесплатные библиотеки, женил с 1с и получилась вот такая вот вещь.
Вот пример кода:
p.s. Коды все открыты. можете поковыряться
Вкратце что необходимо знать:
Обработка корректно может распознать только те файлы которые были пересохранены с Word-a или Excel-я в файл с расширением PDF.
В остальных случаях за чистоту результата не ручаюсь.
Немного как появилась необходимость в написании такой обработки.
1. У меня на работе Есть 1С сервер установленный на Windows (его обслуживают админы их много);
2. На всех клиентских машинах 1С подключена через RDP (со всеми вытекающими плюсами и минусами);
3. В тех задании стояла задача загружать произвольную информацию сохраненных в семействе продуктов Office.
файлы Word и Excel загружаться не будут т.к.
Админ мотивировал отказ тем что, по правилам должно докупаться лицензия на каждую терминальную сессию, а это дорого и не рационально.
Пришлось идти в гугл и вот результат. Нашел бесплатные библиотеки, женил с 1с и получилась вот такая вот вещь.
Вот пример кода:
ФайлPDF = ДиалогОткрытияФайла.ПолноеИмяФайла;
КаталогВременныхФайлов = КаталогВременныхФайлов();
МакетУтилиты = ПолучитьМакет("pdftotext");Адрес = ПоместитьВоВременноеХранилище(МакетУтилиты, Новый УникальныйИдентификатор);
ФайлУтилиты1 = КаталогВременныхФайлов + "pdftotext.exe";
ДанныеХранилища = ПолучитьИзВременногоХранилища(Адрес);
УдалитьИзВременногоХранилища(Адрес);
ДанныеХранилища.Записать(ФайлУтилиты1);
МакетУтилиты = ПолучитьМакет("hstart");Адрес = ПоместитьВоВременноеХранилище(МакетУтилиты, Новый УникальныйИдентификатор);
ФайлУтилиты2 = КаталогВременныхФайлов + "hstart.exe";
ДанныеХранилища = ПолучитьИзВременногоХранилища(Адрес);
УдалитьИзВременногоХранилища(Адрес);
ДанныеХранилища.Записать(ФайлУтилиты2);
p.s. Коды все открыты. можете поковыряться
См. также
Комментарии
