Суть проблемы такая.
Нужно перекидывать инфу из таблиц галки в Access, которая подключена через ODBC.
Уточняю: Заводим в галке новую МЦ, жмем кнопку типа "Синхронизировать" и такая же МЦ добавляется в базу Access. Просто DBF не катит, так как в Access сложная структура, то есть еще и там надо закинуть в определенную таблицу. Вот и думаю как через VIP работать с ODBC
Связь VIP - ODBC
Модераторы: m0p3e, edward_K, Модераторы
-
- Местный житель
- Сообщения: 291
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: С-Петербург
- Контактная информация:
Связь VIP - ODBC
Безвыходных ситуаций не бывает: DO LOOP WHILE TRUE
-
- Заслуженный деятель интернет-сообщества
- Сообщения: 5188
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: SPB galaxy spb
Re: Связь VIP - ODBC
гы а платформа?
c mssql или oracle проблем я думаю не возникнет.
в Pervasive в сапорте нужно выполнить конвертацию словаря (ADF ->DDF), после этого опять же настраиваешь odbc соединение, но могут быть проблемы с длиyными nrec - эт уже не раз здесь обсуждалось.
c mssql или oracle проблем я думаю не возникнет.
в Pervasive в сапорте нужно выполнить конвертацию словаря (ADF ->DDF), после этого опять же настраиваешь odbc соединение, но могут быть проблемы с длиyными nrec - эт уже не раз здесь обсуждалось.
-
- Местный житель
- Сообщения: 291
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: С-Петербург
- Контактная информация:
Re: Связь VIP - ODBC
Платформа MSSQL, но легче мне от этого не стало. Как делать не знаю. чтобы без всяких промежуточных запусков вспомогательных программ. Как обратиться к таблице базы поключенной через ODBC, VIP'om реально? или надо приблуду писать внешнюю и как то встраивать в Галку
Безвыходных ситуаций не бывает: DO LOOP WHILE TRUE
Re: Связь VIP - ODBC
Cинхронизацию можно на Access-e написать (данные Access<-ODBC<-MSSQL),а запустить это из VIP-а.
Что-то грусно стало на очередное "Как из VIP..?"
Не нашёл в Vip MKDIR? пиши сам:
Function MkDir2(pFName: string):boolean;
{
var pExitCode: integer;
DeleteFile('#MkDir.Bat')
LOGSTRTOFILE('#MkDir.Bat','MD '+pFName);
MkDir2 := 0= ExecProgram('#MkDir.Bat','', '',pfSilent,pExitCode);
}
Это топорно, но работает.
через ExecProgram можно хоть черта запустить (Bat, vbs, js ...) и пусть ОН синхронизирует. ..
А если с nREC-ками проблемы, то DBF ещё как покатит!
Что-то грусно стало на очередное "Как из VIP..?"
Не нашёл в Vip MKDIR? пиши сам:
Function MkDir2(pFName: string):boolean;
{
var pExitCode: integer;
DeleteFile('#MkDir.Bat')
LOGSTRTOFILE('#MkDir.Bat','MD '+pFName);
MkDir2 := 0= ExecProgram('#MkDir.Bat','', '',pfSilent,pExitCode);
}
Это топорно, но работает.
через ExecProgram можно хоть черта запустить (Bat, vbs, js ...) и пусть ОН синхронизирует. ..
А если с nREC-ками проблемы, то DBF ещё как покатит!
Re: Связь VIP - ODBC
В нашем решении например запрос из 1С к БД
сделан через регисрацию Галактики как OLE сервер.
http://galpro.itpark.ru/cgi-bin/cutecas ... thread=312
Данные гоняются через dbf.
Код в 1С(Createrrr-Галактический интерфейс обработки dbf файла)
Gal=создатьобъект("galnet.app");
gal.ExecVip("Createrrr");
Gal.Quit(0);
Gal.Set(0);
сделан через регисрацию Галактики как OLE сервер.
http://galpro.itpark.ru/cgi-bin/cutecas ... thread=312
Данные гоняются через dbf.
Код в 1С(Createrrr-Галактический интерфейс обработки dbf файла)
Gal=создатьобъект("galnet.app");
gal.ExecVip("Createrrr");
Gal.Quit(0);
Gal.Set(0);
-
- Постоянный гость
- Сообщения: 55
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: Москва ЗАО "Рантайм Системс"
- Контактная информация:
Re: Связь VIP - ODBC
To Itpark.ru
А если Галактика (OLE сервер) уже открыта, то при Gal=создатьобъект("galnet.app");
она стартует еще раз...
Или можно в открытой сессии запустить свой интерфейс? .`)
А если Галактика (OLE сервер) уже открыта, то при Gal=создатьобъект("galnet.app");
она стартует еще раз...
Или можно в открытой сессии запустить свой интерфейс? .`)
-
- Местный житель
- Сообщения: 291
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: С-Петербург
- Контактная информация:
Re: Связь VIP - ODBC
Спасибо за советы. Пытаюсь осмыслить хотя бы треть из написанного .`) Пойду покупать книги
Безвыходных ситуаций не бывает: DO LOOP WHILE TRUE