Имя: Пароль:
1C
1С v8
Перенос фото из одной базы в другую по ком
,
0 asder117
 
10.04.13
13:51
Господа. как можно осуществить перенос фото из одной базы в другую по ком. платформа 82. уже несколько дней круч не могу разобраться
1 H A D G E H O G s
 
10.04.13
13:56
ДанныеСтрокой=v8Connect.Base64Строка(КартинкаВУдаленнойБазе.ПолучитьДвоичныеДанные());

Двоичное=Base64Значение(ДанныеСтрокой);
КартинкаТут=Новый Картинка(Двоичное);
2 asder117
 
10.04.13
14:03
(1) спасибо.
КартинкаТут=Новый Картинка(Двоичное); - енто писать в другой базе?
3 H A D G E H O G s
 
10.04.13
14:04
(2) Это все писать в базе, из которой подключаешься.
4 asder117
 
10.04.13
14:07
(3) понял. написал так:
ДанныеСтрокой=глСоединениеСЦБ.Base64Строка(Ссылка.ОсновноеИзображение.ПолучитьДвоичныеДанные());

Двоичное=Base64Значение(ДанныеСтрокой);
КартинкаТут=Новый Картинка(Двоичное);    

пишет ошибку:
{Форма.Форма.Форма(332)}: Метод объекта не обнаружен (ПолучитьДвоичныеДанные)
ДанныеСтрокой=глСоединениеСЦБ.Base64Строка(Ссылка.ОсновноеИзображение.ПолучитьДвоичныеДанные());
5 H A D G E H O G s
 
10.04.13
14:13
попробуй так
ДанныеСтрокой=глСоединениеСЦБ.Base64Строка(Ссылка.ОсновноеИзображение.Получить().ПолучитьДвоичныеДанные());
6 asder117
 
10.04.13
14:16
(5) {Форма.Форма.Форма(332)}: Метод объекта не обнаружен (Получить)
ДанныеСтрокой=глСоединениеСЦБ.Base64Строка(Ссылка.ОсновноеИзображение.Получить().ПолучитьДвоичныеДанные());
7 H A D G E H O G s
 
10.04.13
14:20
(6) Давай коннект, проще глянуть
8 asder117
 
10.04.13
14:22
(7)
Функция ПолучитьТаблицуНоменклатурыОсновнойБазы()    
   ТаблицаНоменклатурыОсновнойБазы=Новый ТаблицаЗначений;
   ТаблицаНоменклатурыОсновнойБазы.Колонки.Добавить("ЭтоГруппа", Новый ОписаниеТипов("Булево"));
   ТаблицаНоменклатурыОсновнойБазы.Колонки.Добавить("Код", Новый ОписаниеТипов("Строка"));
   ТаблицаНоменклатурыОсновнойБазы.Колонки.Добавить("Наименование", Новый ОписаниеТипов("Строка"));
   ТаблицаНоменклатурыОсновнойБазы.Колонки.Добавить("ОсновноеИзображение",Новый ОписаниеТипов("Строка"));
   ТаблицаНоменклатурыОсновнойБазы.Колонки.Добавить("ХранилищеЗначений");
   
   СистемнаяИнформация=Новый СистемнаяИнформация;
   ВерсияПлатфомы=Лев(СистемнаяИнформация.ВерсияПриложения,3);
   Если ВерсияПлатфомы="8.0" Тогда
       Коннектор=Новый COMОбъект("V8.COMConnector");
   ИначеЕсли ВерсияПлатфомы="8.1" Тогда
       Коннектор=Новый COMОбъект("V81.COMConnector");
   ИначеЕсли ВерсияПлатфомы="8.2" Тогда
       Коннектор=Новый COMОбъект("V82.COMConnector");
   Иначе
       Предупреждение("Вы используете марсианскую версию программы. Эта обработка предназначена только для жителей Земли.");
       Возврат Ложь;    
   КонецЕсли;    
   Попытка
       //БазаДанных=Коннектор.Connect("File=""C:\Documents and Settings\Zharinov_av\Мои документы\InfoBase1""; Usr =""Жаринов Андрей Вадимович"";");    
//        БазаДанных=Коннектор.Connect("file='"+ПутьКОсновнойБазе+"'; usr='"+ИмяПользователяБазы+"'; pwd='"+ПарольПользователяБазы+"';");
   Исключение
       Сообщить(ОписаниеОшибки());
       Возврат Ложь;    
   КонецПопытки;
       
   Запрос=глСоединениеСЦБ.NewObject("Запрос");
   Запрос.Текст="
       |ВЫБРАТЬ
       |    ЭтоГруппа,
       |    Код,
       |    Наименование,
       |   ссылка,
       |   ОсновноеИзображение,
       |   ОсновноеИзображение.Хранилище
       |ИЗ
       |    Справочник.ФизическиеЛица
       |ГДЕ
       |    НЕ ЭтоГруппа
       |";
   Выборка=Запрос.Выполнить().Выбрать();
   Пока Выборка.Следующий() Цикл
       СтрокаТаблицы=ТаблицаНоменклатурыОсновнойБазы.Добавить();
       СтрокаТаблицы.ЭтоГруппа=Выборка.ЭтоГруппа;
       СтрокаТаблицы.Код=Выборка.Код;
       СтрокаТаблицы.Наименование=Выборка.Наименование;
       СтрокаТаблицы.ОсновноеИзображение=Выборка.ОсновноеИзображение;
   КонецЦикла;  
   Если ТаблицаНоменклатурыОсновнойБазы.Количество()=0 Тогда
       Предупреждение("В подключаемой базе данных не найдено");
       Возврат Ложь;
   КонецЕсли;
   Возврат Истина;
КонецФункции


ДанныеСтрокой=глСоединениеСЦБ.Base64Строка(Ссылка.ОсновноеИзображение.get().ПолучитьДвоичныеДанные());

Двоичное=Base64Значение(ДанныеСтрокой);                        
КартинкаТут=Новый Картинка(Двоичное);
9 asder117
 
10.04.13
14:23
(7) глСоединениеСЦБ - глобальная переменная соединения
10 asder117
 
10.04.13
14:40
(7) сделал так:
ДанныеСтрокой=глСоединениеСЦБ.Base64Строка(Ссылка.ОсновноеИзображение.хранилище.get().ПолучитьДвоичныеДанные());
вроде проскачило без ошибок.
а картинка тут - енто можно впихнуть на форму уже или с ним еще что-то сделать надо?
11 Fragster
 
гуру
10.04.13
14:46
я за XMLСтрока/XMLЗначение
12 asder117
 
10.04.13
14:57
(11) а этим как? никогда не пробовал
13 asder117
 
10.04.13
15:03
(11) (7) пишет поле объекта "основноеизображение" недоступно для записи
Есть два вида языков, одни постоянно ругают, а вторыми никто не пользуется.