Форум: "Базы";
Текущий архив: 2003.06.02;
Скачать: [xml.tar.bz2];
Вниз
Повторно не выполняется запрос Найти похожие ветки
← →
Viktor (2003-05-15 16:12) [0]Привет мастерам!
Не могу сообрразить в чем дело.
Есть запрос
QAccessoriesAuto.Close;
sss :="Select * From AccessoriesPack Where FromWidth<"+
IntToStr(Round((StrToInt(FormM.WWidth.Text))/FormM.W))+" and ToWidth>"+
IntToStr(Round((StrToInt(FormM.WWidth.Text))/FormM.W));
QAccessoriesAuto.SQL.Add(sss);
QAccessoriesAuto.Open;
Выполняется в первый раз нормально
при повторном использовании ругается вот так:
Project Horizon.exe raised exception class EOleExeption with message
"[Microsoft][Драйвер ODBC Microsoft Access] Ошибка синтаксиса в выражении
запроса "FromWidth<500 and ToWidth>500
Select * From AccessoriesPack Where FromWidth<500 and ToWidth>500"
Process stopped. Use Step or Run to continue.
Объясните кто-нибудь в чем дело и как с этим бороться.
Заранее спасибо.
← →
Stas (2003-05-15 16:15) [1]QAccessoriesAuto.Close;
QAccessoriesAuto.Clear;
sss :="Select * From AccessoriesPack Where FromWidth<"+
IntToStr(Round((StrToInt(FormM.WWidth.Text))/FormM.W))+" and ToWidth>"+
IntToStr(Round((StrToInt(FormM.WWidth.Text))/FormM.W));
QAccessoriesAuto.SQL.Add(sss);
QAccessoriesAuto.Open;
← →
Соловьев (2003-05-15 16:16) [2]в кавычки взять
(FromWidth<500) and (ToWidth>500)
← →
@@Le (2003-05-15 16:16) [3]QAccessoriesAuto.SQL.Clear;
QAccessoriesAuto.SQL.Add(sss);
QAccessoriesAuto.Open;
← →
Viktor (2003-05-15 16:23) [4]Спасибо Всем!!!
Забыл про Clear...
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.06.02;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c
