Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

SQL запрос [D5]


Shota_body ©   (2003-06-11 10:19:00) 

Вешаю на баттон
procedure TForm1.Button1Click(Sender: TObject);
begin
with Query1 do begin
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add("update "c:\temp\sql\import.dbf" set ad2_tst="TTT" where ad2_ori="RRR"");
ExecSQL;
end;
end;
а дельфя типа все отработала - а на самом деле не присваивает он полям то что надо ((( База локальная ....
Плиз хелп ми !!!


Shota_body   (2003-06-16 11:57:00) [1]

усе сделал всем спасибо )))


Shota_body   (2003-06-13 14:09:00) [2]

да нет это старый вариант - точно точно алиас использую ;)


Соловьев   (2003-06-13 09:38:00) [3]


> SQL.Add("update import set ad2_tst:p where ad2_ori LIKE
> "RRR%"");

SQL.Add("update import set ad2_tst =:p where ad2_ori LIKE
"RRR%"");
и все-таки точно ты используешь алиас? потому как строка "c:\temp\sql\import.dbf" говорит об обратном...


Shota_body   (2003-06-13 08:47:00) [4]

Query1.ParamByName("p").AsString:="НАБ";
типа того и потом как параметр
SQL.Add("update import set ad2_tst:p where ad2_ori LIKE "RRR%"");
попробую


Соловьев   (2003-06-12 10:03:00) [5]


> set ad2_tst="НАБ"

через параметры попробуй.


Shota_body   (2003-06-11 15:17:00) [6]

нет это не пашет


clickmaker   (2003-06-11 14:58:00) [7]

Ну попробуй "update import set ad2_tst="" + CharToOem("НАБ") + "" ...


Shota_body   (2003-06-11 14:41:00) [8]

короче
procedure TForm1.Button1Click(Sender: TObject);
begin
with Query1 do begin
Close;
SQL.Clear;
SQL.Add("update import set ad2_tst="НАБ" where ad2_ori LIKE "RRR%"");
ExecSQL;
end;
end;
работаю я с алиасом
перебирал я в лангдривере - все равно в другой кодировке пишет
подскажите как записать в поле
set ad2_tst ="НАБ"значение какой либо переменной или (допустим char(157) )
просто у меня раньше была такая проблемс в дельфях с базой я решил ее просто в win кодировке буква свое значение - в dos свое - вот я и разницу между ними находил и вычитал - тогда в dos нормально записывалась ...


Соловьев   (2003-06-11 12:18:00) [9]


> c:\temp\sql\import.dbf"

наверное без алиаса работаем? тогда может в Session надо попробовать настроить?


sniknik   (2003-06-11 12:16:00) [10]

dBASE RUS cp866 у лэнгдрайвера в настройках используемого драйвера (DBASE), в BDEAdministrator-e.
а будут проблемы с конвертацией/сортировкой/неотображением отдельных букв попробуй туда же руками Pdox ANSI Cyrillic (или подбор и остальных их там много)


Shota_body   (2003-06-11 12:07:00) [11]

огромадное спасиба )))) точно ...усе пашет
только щас вопрос встал вот какой если записывать данные в русскими буквами то есть ad2_tst="НАБ" то в базу он записывает в WIN кодеровке - а dbf тама млин иероглифы....


sniknik   (2003-06-11 10:35:00) [12]

> where ad2_ori="RRR"
может нет там таких записей?
а есть
with Query1 do begin
Close;
SQL.Clear;
SQL.Add("update "c:\temp\sql\import.dbf" set ad2_tst="TTT" where ad2_ori LIKE "RRR%"");
ExecSQL;
end;

???


Наверх

Титульная страница Поиск, карта сайта Написать письмо