Доброго дня, подскажите кто сталкивался.

В базе SQL хранятся файлы, тип колонки varbinary(max)
пробую выгрузить из 1С в файл:

            Команда.CommandText = "select CuratorDB.dbo.FileData.FileName,CuratorDB.dbo.FileData.Content  from CuratorDB.dbo.FileData where Oid='"+ФайлМассив+"'";
              RecordSet = Команда.Execute();

            Stream=Новый COMОбъект("ADODB.Stream");
            Stream.Type=1;
            Stream.Mode=3;
                                        
            RecordSet.MoveFirst();
            
            Пока Не RecordSet.EOF() Цикл
                Stream.Open();
                
                Stream.Position = 0;
                
                НаименованиеФайла = RecordSet.Fields.Item("FileName").Value;
                Контент = RecordSet.Fields.Item("Content").Value;
                
                ИмяФайла = Каталог+"1.pdf";
                
                Сообщить(ИмяФайла);
                Stream.Write(Контент);
                Stream.SaveToFile(ИмяФайла,2);
                Stream.Close();                
                
                RecordSet.MoveNext();
            КонецЦикла;

в контент попадают данные типа comsafearray, а при Stream.SaveToFile(ИмяФайла,2); появляется ошибка
Ошибка при вызове метода контекста (SaveToFile): Произошла исключительная ситуация (ADODB.Stream): Не удается записать файл.

ИмяФайла куда указывает?

C:\Users\petrunin_av\Desktop\1.pdf

Доступ туда у пользователя ОС, который выполняет код, есть? Например, у сервера, на котором все работает.

(0) А если сделать так:
ИмяФайла = ПолучитьИмяВременногоФайла();

(4) так тоже пробовал
C:\Users\USR1CV83\AppData\Local\Temp\1.pdf

но, у меня такого каталога нет

(3) у пользователя USR1CV83 ?

(5) Ну вот. А у сервера нет C:\Users\petrunin_av\Desktop

Смекаешь?

(5) :-D

(7) тоже закрались такие подозрения, спасип

#Если Сервер Тогда
Сообщить("Сервер, ты где?");
#КонецЕсли

Хнык, хнык... я тоже хочу "Спасибо!" :(
:)

(11) И тебе Спасип

Мне, так кажется, что нужно писать во временный файл и копировать его "к себе" по сети. Так, по крайней мере, будешь всегда знать где именно проблема.

(13) пробовал, он вроде так пишет, но потом не понятно, где файл. Такой папки нет

А не всё ли равно где она есть? В смысле видна/доступна юзверу. Сервер пишет ну и ладно :)

(15) в принципе все равно, да, проверил, пишет на серваке во временную папку... а дальше сервака доступа нивкуда нет

Что совсем нет каталогов с общим доступом у сервера и клиента? Хмм... бывает, не повезло. Может быть тогда серверный файл есть смысл "с сервера" передать "на клиента" внутри программы через хранилище, например?

Другая теперь проблема, файлы получаются битые

а одинэс же с ДД работает сейчас, ADODB.Stream может лишний?

(19) ДД есть, но вот из SQL идет массив байтов

Апну, кто-нить сталкивался?
глазками пробежался по файлу, сравнил в блокноте, вроде одинаковые, но если из SQL выгружаю, то они нормальные, открываются, если я программно выгружаю, они не открываются, пишет поврежденный файл

Сверил 2 файла, получаются разные сделал Контент.Выгрузить().Количество() получилось 98801.
Выгрузил из софта файл, загрузил в поток, проверил, получилось 100 238.

Кто - нить сталкивался? Не представляю куда теперь копать.

(22)
либо сравните файлы и отрезайте лишнее
либо либо найдите рабочий код раз не умеет работать с документацией

(23) Из запроса получается меньше файл. Была бы документация

это понятно что файл меньше и к нему что-то дописано

кстати почему
Stream.Mode=3; ?

чтение и запись

(25) Убрал Mode Вообще, ничего не изменилось, Запрос возвращает так.

(22) Выбери ещё DATALENGTH(Content)
Если получишь 98801, то поздравляю, разработчики софта, в котором ты ковыряется, люди грамотные и сжимают файлы при хранении.

велосипеды - они такие :)

100% работающий сабж - http://catalog.mista.ru/public/16687/

(23) Отрезать лишнее, чтобы файл увеличился... Батенька, да вы философ. Что вы там писали про чтение?

(28) и что теперь делать? да, получилось 98801

(31)
- Обратиться к разработчикам софта
- Попытаться угадать метод сжатия (там скорей всего какой-нибудь zip без заголовка)
- Смириться (:

(29) разовая работа, выгрузка документов из стороннего софта в документооборот

(32)
Спасибо, попробую поискать 2 вариант.
Первый - разругались с разработчиками... просто проигнорируют
Третий , это если первый откажет

(34) Попробуй ещё понять на чем написан софт. Скорей всего использованы типовые библиотеки и можно набросать консольную утилиту которая распакует один файл в другой.

zlib1 походу оно