0
Трапезунд
11.08.14
✎
11:54
|
Добрый всем день.
Есть база УПП 1.3 (8.3), база MySQL.
Создаю соединение
Функция УстановитьСоединение()
rs = Новый COMObject("ADODB.Connection");
СтрокаСоединения = "DRIVER=MySQL ODBC 5.1 Driver;SERVER=192.168.0.24;DataBase=database;UID=dl;PWD=xxxxxxxxxxxxx";
rs.ConnectionString = (СтрокаСоединения);
Попытка
rs.Open();
Сообщить("MySQL база успешно подключена");
Возврат Истина;
Исключение
Сообщить("Нет соединения с базой MySQL");
Возврат ложь;
КонецПопытки;
КонецФункции
Далее получаю данные из MySQL
Стр = "
|SELECT print.zakaz_id, print.oplata_id, print.dishProc,
| print.kassa_id, print.shifr_id, print.kolvo, print.cena, print.sum,
| zakaz.cardOplata, zakaz.vremya, zakaz.allsum, zakaz.allsum2, zakaz.proc
| FROM print
| LEFT JOIN zakaz ON zakaz.id = print.zakaz_id
| WHERE zakaz.status_id = 8
| AND zakaz.print = 1
| AND zakaz.vremya > "+time1+"
| AND zakaz.vremya < "+time2+"
| AND print.kassa_id = "+kassa_id+"
| AND print.shifr_id != '0'
| AND print.cancelCheckNumber = 0
|";
Попытка
ТЗ = rs.Execute(Стр);
Исключение
Сообщить("Попытка не удалась"+ОписаниеОшибки());
Продолжить;
КонецПопытки;
Далее как мне получить эту таблицу значений (по аналогии с семеркой - 1срр - rs.GetResultInVT(ТЗ)).
Не хочу заморачиваться с внешними источниками данных - база УПП на Postgre в LINUX
|
|