Задача есть сканер , надо прикрутить к 1С 8.1 , чтобы сканировать первичку и изображение привязывать к электронной накладной, чтобы потом можно было из накладной нажав на кнопку получить картинку отсканированного оригинала . С чего начать ?

(0) что есть "привязывать к электронной накладной" ??? я надеюсь ты не хочешь все эти сканы в базе хранить?!?!?!?!

(1) почему нет?
(0) с получения изображения со сканера )

+2 вернее, я бы хранил их в отдельной базе

(1) нет , на жестяке , а привязывать имя файла и потом его доставать поисков :) искал на инфостате нашел Clipboard.dll но скачать не могу :)

(4) поиск по мисте,
TWAIN - ключевое слово

(2) "почему нет?" - потому как база будет пухнуть ОЧЕНЬ СИЛЬНО!!!

(3) "+2 вернее, я бы хранил их в отдельной базе"  а если нужно из 1С-ки открыть картинку, будешь комами подключаться и открывать??? Зачем эти заморочки???

(5) чего-то в книге знаний не работают ссылки библиотеку скачать

(7) http://www.google.ru/search?q=TWAIN+site:forum.mista.ru&hl=ru&newwindow=1&prmd=imvnsb&ei=oud6TqqFGISk8QPszJEb&start=10&sa=N&biw=1600&bih=1068

(8)Спс :) пошел курить

все получилось , спасибо большое

(10) код выложи,
спасибо в конфу не вставишь

/// работа со сканером
Процедура Подключиться(Флаг = 0)
   
   Если Флаг = 1 Тогда
       Если Сканеры.Подключиться() = 0 Тогда
           Сообщить("Не удалось подключиться к сканеру");
       КонецЕсли;
   Иначе
       Если Сканеры.Отключиться() = 0 Тогда
           Сообщить("Не удалось отключиться от сканера");
       Иначе
       КонецЕсли;
   КонецЕсли;

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



Процедура ОсновныеДействияФормыСканировать(Кнопка)
   // Вставить содержимое обработчика.
   
   // грузим компоненту

Попытка
   ПолноеИмяКомпоненты=КаталогПрограммы()+"1CScan.dll";
   ЗагрузитьВнешнююКомпоненту(ПолноеИмяКомпоненты);
       Сканеры = Новый ("AddIn.ScanManager");
   Исключение
       Сообщить("Не удалось загрузить внешнюю компоненту 1CScan.dll:
               |" + ИнформацияОбОшибке().Описание, СтатусСообщения.Важное);
       Возврат ;
   КонецПопытки;
   
   Если Сканеры.ВыбратьСканеры() <> 1 Тогда
       Сообщить("Не удалось выбрать сканеры","!");
       Возврат ;
   КонецЕсли;
       
    Сканеры.ПолучитьСканер();    
   
   Если Сканеры.Подключен() = 1 Тогда
       Подключиться(0);
   КонецЕсли;
   
   Подключиться(1);
   ИмяФайла=СокрЛП(Номер)+".jpg";
   Сканеры.УстановитьПараметр("ГлубинаЦвета",2);
   Сканеры.УстановитьПараметр("РазрешениеX",300);
   Сканеры.УстановитьПараметр("РазрешениеY",300);

    Если Сканеры.ПолучитьФайлBMP("E:\Docs\" + ИмяФайла) <> 1 Тогда
    Сообщить("Не удалось получить файл со сканера","!");
           Возврат;
         КонецЕсли;
         
         ГрафическаяКопия=ИмяФайла;
   
   
   
КонецПроцедуры

(12) спасибки от форума

ПЕРЕМ Сканеры -глобальная ; 5 минут полет нормальный :)
теперь вопрос , а как-то сразу при нажатии кнопки ПРОСМОТР можно запускать пердварительный просмотр из под 8-ки ?

+(13) библиотека нужна 1CScan.dll

(14) Можно ЗапуститьПриложение(имяФайла)

(16) Ништяк, заработало ... спс