Запись файла в SQL-базу внешнего приложения
Добрый всем день.
Конфигурация Управление Торговлей 11.
Суть вопроса: дописывал начатый до меня модуль обмена информацией с программой "ServiceDesk" (СервисДеск) - чтение данных оттуда (задач - "инцидентов"), а также создание из 1С - новых задач-"инцидентов" в Сервис Деск (это система постановки задач).
Чтение - без вопросов. Создание новых задач - тоже. Проблемы возникли тогда, когда к новому инциденту необходимо стало прикреплять файл с диска. И средствами 1С это записывать в SQL-таблицу базы Сервис Деск. Файлы, прикрепленные к инцидентам Сервис ДЕск, хранятся в отдельной таблице, где ID - номер инцидента, а затем идет поле - сам файл.
Пытался сделать через ADODB.Command. Но при попытке выполнить команду записи все время возвращается ответ SQL, что не совпадает формат.
Т.е. примерно так:
НаборЗаписей = Новый COMОбъект("ADODB.Command");
НаборЗаписей.CommandType = 1;
НаборЗаписей.ActiveConnection = АктивноеСоединение;
НаборЗаписей.CommandText = "INS ERT IN TO [dbo].[vw_FILES] ( [ID], [FILE]";
СтрокаЗначений = " VALUES ( {"+ГУИДИнцидента+"}', + ПолеФайла ") ";
НаборЗаписей.CommandText = НаборЗаписей.CommandText + СтрокаЗначений;
НаборЗаписей.Execute();
В переменной ПОЛЕФАЙЛА у меня сам файл (вида "двоичные данные").
И ошибка... Поле FILE в SQL-таблице имеет тип "image", т.е. вроде как двоичные данные.
При этом чтение файлов из таблиц файлов SQL и их запись на диск, я произвожу легко через Стрим при обработке запроса:
Stream = Новый COMОбъект("ADODB.Stream");
Stream.Type = 1;
Stream.Open();
Stream.Write(СтруктураИзЗапроса.ДанныеФайла);
ИмяФайла = СтруктураИзЗапроса.Имя;
ВремПуть = КаталогВременныхФайлов() + ИмяФайла;
stream.SaveToFile(ВремПуть,2);
Stream.Close();
Stream = Неопределено;
А вот записать обратно не могу. В чем причина? Что не так?
Конфигурация Управление Торговлей 11.
Суть вопроса: дописывал начатый до меня модуль обмена информацией с программой "ServiceDesk" (СервисДеск) - чтение данных оттуда (задач - "инцидентов"), а также создание из 1С - новых задач-"инцидентов" в Сервис Деск (это система постановки задач).
Чтение - без вопросов. Создание новых задач - тоже. Проблемы возникли тогда, когда к новому инциденту необходимо стало прикреплять файл с диска. И средствами 1С это записывать в SQL-таблицу базы Сервис Деск. Файлы, прикрепленные к инцидентам Сервис ДЕск, хранятся в отдельной таблице, где ID - номер инцидента, а затем идет поле - сам файл.
Пытался сделать через ADODB.Command. Но при попытке выполнить команду записи все время возвращается ответ SQL, что не совпадает формат.
Т.е. примерно так:
НаборЗаписей = Новый COMОбъект("ADODB.Command");
НаборЗаписей.CommandType = 1;
НаборЗаписей.ActiveConnection = АктивноеСоединение;
НаборЗаписей.CommandText = "INS ERT IN TO [dbo].[vw_FILES] ( [ID], [FILE]";
СтрокаЗначений = " VALUES ( {"+ГУИДИнцидента+"}', + ПолеФайла ") ";
НаборЗаписей.CommandText = НаборЗаписей.CommandText + СтрокаЗначений;
НаборЗаписей.Execute();
В переменной ПОЛЕФАЙЛА у меня сам файл (вида "двоичные данные").
И ошибка... Поле FILE в SQL-таблице имеет тип "image", т.е. вроде как двоичные данные.
При этом чтение файлов из таблиц файлов SQL и их запись на диск, я произвожу легко через Стрим при обработке запроса:
Stream = Новый COMОбъект("ADODB.Stream");
Stream.Type = 1;
Stream.Open();
Stream.Write(СтруктураИзЗапроса.ДанныеФайла);
ИмяФайла = СтруктураИзЗапроса.Имя;
ВремПуть = КаталогВременныхФайлов() + ИмяФайла;
stream.SaveToFile(ВремПуть,2);
Stream.Close();
Stream = Неопределено;
А вот записать обратно не могу. В чем причина? Что не так?
По теме из базы знаний
Найденные решения
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(6) Возможно, проблема в том, что не получается в тип image из 1С запросом закинуть.
Нужно попробовать написать хранимую процедуру. У нее на входе пусть будут параметры по-проще - ну тот же УИД и строка, которая будет подставляться внутри процедуры в поле типа image.
Честно говоря, такими преобразованиями не занимался (строки в image). Но, возможно, все и несложно.
Нужно попробовать написать хранимую процедуру. У нее на входе пусть будут параметры по-проще - ну тот же УИД и строка, которая будет подставляться внутри процедуры в поле типа image.
Честно говоря, такими преобразованиями не занимался (строки в image). Но, возможно, все и несложно.
Не, строка нормально в image складывается. Вероятно, дело в передаче УИДа.
Должно быть как-то так:
СтрокаЗначений = " VALUES ( [Апостроф]" + ГУИДИнцидента+"[Апостроф], [Апостроф]" + ПолеФайла + "[Апостроф]) ";
- где вместо [Апостроф] нужно подставить символ апострофа. Так оформил, чтобы заметно было - где что.
Должно быть как-то так:
СтрокаЗначений = " VALUES ( [Апостроф]" + ГУИДИнцидента+"[Апостроф], [Апостроф]" + ПолеФайла + "[Апостроф]) ";
- где вместо [Апостроф] нужно подставить символ апострофа. Так оформил, чтобы заметно было - где что.
(10) Да просто создал табличку с полем типа image и запросом вставил в нее запись, где в значении для image указал строку. Запрос выполнился, запись вставилась.
Вообще, как раз на тек момент занимаюсь выгрузкой данных во внеш базу (MSSQL, не 1С). Написал для этого внешку-движок с заточкой на использование ХП для вставки данных. Если интересно - могу выложить. Написано не супер-пупер продуманно и оптимально, т.к. использоваться будет малоразово. Но на 4 - вполне себе.
Вообще, как раз на тек момент занимаюсь выгрузкой данных во внеш базу (MSSQL, не 1С). Написал для этого внешку-движок с заточкой на использование ХП для вставки данных. Если интересно - могу выложить. Написано не супер-пупер продуманно и оптимально, т.к. использоваться будет малоразово. Но на 4 - вполне себе.
(12)
В коде 1С:
НаборЗаписей = Новый COMОбъект("ADODB.Command");
НаборЗаписей.CommandType = 1;
НаборЗаписей.ActiveConnection = АктивноеСоединение;
НаборЗаписей.CommandText = " INS ERT IN TO [dbo].[tbl_Files] ([ID], [Link], [Revision], [ItemTypeID], [FileData], [ModifiedByID], [ModifiedOn], [FileSize], [CreatedOn], [CreatedByID]) VALUES ( '{"+ГУИДФ+"}', '"+ИмяФайла+"', 1, '{39A5B367-4A7A-473E-8F74-26977CB6DB67}','{"+ ДвоичФайл +"}', ' "+ АйДиПользователя +" ', getdate(), "+строка(Размер)+", getdate(), '"+ АйДиПользователя +"')";
Здесь:
ДвоичФайл = Новый ДвоичныеДанные(ПутьФайла); - т.е. сами двоичные данные файла.
ГУИДФ - ГУИД нового файла.
ИмяФайла - собственно имя файла.
АйДиПользователя - айди того кто пишет в эту базу.
Затем делаю
НаборЗаписей.Execute();
Запрос отправляется в базу такой:
Теперь ругается на неверный синтаксис.
Ошибка записи данных в базу: {Документ.ЗаказКлиента.Форма.ФормаДокумента_СВИ.Форма(5909)}: Ошибка при вызове метода контекста (Execute): Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][ODBC SQL Server Driver][SQL Server]Incorrect syntax near ' '.
В коде 1С:
НаборЗаписей = Новый COMОбъект("ADODB.Command");
НаборЗаписей.CommandType = 1;
НаборЗаписей.ActiveConnection = АктивноеСоединение;
НаборЗаписей.CommandText = " INS ERT IN TO [dbo].[tbl_Files] ([ID], [Link], [Revision], [ItemTypeID], [FileData], [ModifiedByID], [ModifiedOn], [FileSize], [CreatedOn], [CreatedByID]) VALUES ( '{"+ГУИДФ+"}', '"+ИмяФайла+"', 1, '{39A5B367-4A7A-473E-8F74-26977CB6DB67}','{"+ ДвоичФайл +"}', ' "+ АйДиПользователя +" ', getdate(), "+строка(Размер)+", getdate(), '"+ АйДиПользователя +"')";
Здесь:
ДвоичФайл = Новый ДвоичныеДанные(ПутьФайла); - т.е. сами двоичные данные файла.
ГУИДФ - ГУИД нового файла.
ИмяФайла - собственно имя файла.
АйДиПользователя - айди того кто пишет в эту базу.
Затем делаю
НаборЗаписей.Execute();
Запрос отправляется в базу такой:
Скрытый текст запроса |
|---|
| INS ERT IN TO [dbo].[tbl_Files] ([ID], [Link], [Revision], [ItemTypeID], [FileData], [ModifiedByID], [ModifiedOn], [FileSize], [CreatedOn], [CreatedByID])VALUES ( '{fdf7ebc9-f072-4f89-81e3-ac4e1255889a}', 'Пользователи-ID.csv', 1, '{39A5B367-4A7A-473E-8F74-26977CB6DB67}','22 49 44 22 3B 22 4E 61 6D 65 22 0D 0A 22 7B 39 37 34 39 30 46 38 39 2D 32 39 34 33 2D 34 38 30 44 2D 39 41 46 45 2D 42 31 43 39 35 44 45 30 30 30 31 30 7D 22 3B 22 C2 F1 E5 20 EF EE EB FC E7 EE E2 E0 F2 E5 EB E8 22 0D 0A 22 7B 45 41 42 33 44 38 45 43 2D 35 34 30 30 2D 34 41 32 36 2D 38 36 33 34 2D 41 43 41 39 32 30 33 45 45 42 38 45 7D 22 3B 22 53 75 70 65 72 76 69 73 6F 72 22 0D 0A 22 7B 41 44 46 33 41 37 46 44 2D 38 46 33 34 2D 34 32 41 33 2D 39 37 36 31 2D 35 45 42 33 32 30 36 37 30 41 42 41 7D 22 3B 22 C0 E4 EC E8 ED E8 F1 F2 F0 E0 F6 E8 FF 22 0D 0A 22 7B 38 34 32 43 41 36 43 32 2D 44 44 46 33 2D 34 42 34 33 2D 39 45 42 45 2D 39 45 41 44 32 34 46 34 36 38 35 41 7D 22 3B 22 C1 F3 EB E0 F2 22 0D 0A 22 7B 30 37 37 34 35 39 44 31 2D 32 39 37 41 2D 34 45 32...', '{215CA0A1-CB8D-4DDE-A3D1-93802CC61FC5}', getdate(), 6 768, getdate(), '{215CA0A1-CB8D-4DDE-A3D1-93802CC61FC5}') |
Теперь ругается на неверный синтаксис.
Ошибка записи данных в базу: {Документ.ЗаказКлиента.Форма.ФормаДокумента_СВИ.Форма(5909)}: Ошибка при вызове метода контекста (Execute): Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][ODBC SQL Server Driver][SQL Server]Incorrect syntax near ' '.
Поэтому я и не люблю использовать динамически сконструированные запросы с прописанными значениями - их (значения) надо сформатировать в какой-то определенный строковый вид. К тому же, при этом планы запросов не кэшируются. И, теоретически, это дыра в безопасности из-за возможности sql injection.
(15) Ваш совет несколько помог, но ошибка осталась, правда, изменилась:
Ошибка записи данных в базу: {Документ.ЗаказКлиента.Форма.ФормаДокумента_СВИ.Форма(5910)}: Ошибка при вызове метода контекста (Execute): Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][ODBC SQL Server Driver][SQL Server]INSERT permission denied on object 'tbl_Files', database 'TStoy', schema 'dbo'.
Подозреваю, что правами запрещено писать в эту таблицу?
Ошибка записи данных в базу: {Документ.ЗаказКлиента.Форма.ФормаДокумента_СВИ.Форма(5910)}: Ошибка при вызове метода контекста (Execute): Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): [Microsoft][ODBC SQL Server Driver][SQL Server]INSERT permission denied on object 'tbl_Files', database 'TStoy', schema 'dbo'.
Подозреваю, что правами запрещено писать в эту таблицу?
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот