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

Вниз

Update БД   Найти похожие ветки 

 
klerk   (2004-11-07 11:26) [0]

Мастера.
Вот пытают сделать инсправления в БД.
with Query1 do
            begin
            sql.clear;
            sql.add("Update ""+Baznames+"" set Postavshik=""+Edit2.text+"", INN=""+Edit3.text+"", KPP=""+Edit4.text+"", RasShet=""+Edit5.text+"", BIK=""+Edit6.text+"", Bank=""+Edit7.text+"", KorShet=""+Edit8.text+"", Adress=""+Edit9.text+"" where Id = :Par ");
            Params[0].Asinteger:=Nomer;

            execsql;
            end;

ID - это первый столбец таблицы (пользователю не показывается)

Так вот, если в Edit"e запись поставить в "", то не работает. Ругается. А если в "" - работает.
Проблемма в том, что нужно исправлять на "".


 
Anatoly Podgoretsky ©   (2004-11-07 11:56) [1]

Видно что используется один параметр, тогда сразу вопрос почему, или все делать параметрами или все формировать динамически.

Потом вот ты говоришь ругается, а народу очень интерсно куда это тебя послали.


 
klerk   (2004-11-07 12:17) [2]

Если значение в Edit"е поставить в "" - то ругается
"Invalid use of keyword"
Token Значение Edit"a ""

Если оставить кавычки только с одной стороны то
List index out of bounds (0)

Один параметр - исправления происходят по номеру записи - этому параметру.


 
Наталия ©   (2004-11-09 07:48) [3]

Так для остальных передаваемых значений тоже используй параметры:
...RasShet=:Par1...
Params[1].AsString:=Edit5.text;
Или вместо кавычки попробуй использовать chr(39).
Или функцию QuotedStr - если название не перепутала.



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

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

Наверх




Память: 0.47 MB
Время: 0.042 c
3-1099469926
Victor!
2004-11-03 11:18
2004.12.05
Проблема с JetSQL


1-1100662103
Shyrik
2004-11-17 06:28
2004.12.05
помогите


1-1100970808
ЛёхА
2004-11-20 20:13
2004.12.05
Радактор кода


1-1100690599
markers
2004-11-17 14:23
2004.12.05
Хоткей


3-1099574728
DelphiN!
2004-11-04 16:25
2004.12.05
Глюки фильтра TClientDataSet