Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.30;
Скачать: CL | DM;

Вниз

Ado?   Найти похожие ветки 

 
Lizerginnn   (2002-12-19 13:56) [0]

Господа! У меня следющая проблема.
Задача: слить данные из таблиц Paradox в Access (структура таблиц одинаковая.)
Решаю задачу следующим путём (если кто предложит другой более рациональный способ буду весьма благодарен :-)):
Выгружаю данные из парадокса в Query, затем подключаюсь к источнику данных ODBC, в цикле прогоняю Query и SQL-командой Insert вставляю данные (использую ExecSQL).
При использовании ADOQuery сгружается часть данных и возникает ошибка: что-то там насчёт нарушения уникальности. Провожу тоже самое используя BDE Query - всё нормально.
Вот код (извините что в C Builder)

for (int i=1;i<=5;i++)
{
Query1->Close();
Query1->SQL->Clear();
Query1->SQL->Add("select * from sh_0"+IntToStr(i)+"_02");
Query1->Open();
Query1->First();
while (!Query1->Eof)
{
ADOQuery1->Prepared = false;
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("insert into sheets (SheetID,CarID,DriverID,customerid,sheetnumber,leavefrombaseD,ReturnToBaseD,DinnerTime,InactiveTime,LeaveFromBase,ReturnToBase,ZeroDistance,ExtraAddValue,RateType1ID,RateType2ID,WorkDuration_r,AddReturnToBase) values (:sheetid,:carid,:driverid,:customerid,:sheetnumber,:leavefrombaseD,:ReturnToBaseD,:DinnerTime,:InactiveTime,:LeaveFromBase,:ReturnToBase,:ZeroDistance,:ExtraAddValue,:RateType1ID,:RateType2ID,:WorkDuration_r,:AddReturnToBase)");
ADOQuery1->DataSource = DataSource1;
ADOQuery1->Prepared = true;
ADOQuery1->ExecSQL();
Query1->Next();
}
}

Заранее благодарю за помощь.


 
Lizerginnn   (2002-12-19 14:59) [1]

Господа, неужели никто не знает?


 
Darlock   (2002-12-19 15:11) [2]

Тебе программно обязательно это делать, может быть DataPump подойдет?


 
Lizerginnn   (2002-12-19 15:25) [3]

Да я сделал уже через Query. Интересно просто из-за чего возникает ошибка при использовании ADOQuery.



Страницы: 1 вся ветка

Текущий архив: 2002.12.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
3-98957
Kurt
2002-12-09 13:09
2002.12.30
MuliSeselct на Гриде в True. Как мне определять что


1-99071
Gaber
2002-12-11 14:54
2002.12.30
Запуск AVI


1-99092
RUS1
2002-12-19 15:46
2002.12.30
Хочу передавать данные по сети - чем лучше воспользоваться?


6-99232
igorx
2002-11-05 10:54
2002.12.30
Контроль подключения к Интернет


1-99095
Lexa
2002-12-19 18:22
2002.12.30
Файл ресурсов