Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 29.12.2006, 05:07
NovaC NovaC вне форума
Прохожий
 
Регистрация: 13.11.2006
Сообщения: 24
Репутация: 10
По умолчанию ADOQuery & WIN98 v4.10

Доброе время суток !
Под Win2000 & WinXP всё работает работает безошибочно
В Win98 INSERT проходит а при UPDATE появляется ошибка :
Error: [Microsoft] [ODBC dBase Driver] Operation must use an updateble query
--------------INSERT:
temp := 'Provider=MSDASQL.1;' +
'Persist Security Info=False;' +
'Data Source=Файлы dBASE;' +
'Initial Catalog=' + StrPas(dbfDir);
ADOConnection1.ConnectionString := temp;
ADOQuery1.Connection := ADOConnection1;
ADOQuery1.ParamCheck := true;
temp := Format ('INSERT INTO .. (...) VALUES (...)', [...]);
try
ADOConnection1.Execute(temp);
except
on e : exception do MessageDlg(e.message,mtError, [mbOK],0);
end;
ADOQuery1.Close;
ADOConnection1.Close;

--------------UPDATE:
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
temp := 'SELECT * FROM ... WHERE ....;
ADOQuery1.SQL.Text := temp;
ADOQuery1.Parameters.ParseSQL(ADOQuery1.SQL.Text, true);
ADOQuery1.Parameters [0].Value := IP;
ADOQuery1.Parameters [1].Value := Host;
ADOQuery1.Open;
except
on e : exception do MessageDlg(e.message,mtError, [mbOK],0);
end;
temp := Format ('UPDATE ... SET .... WHERE ...', [...]);
try
ADOConnection1.Execute(temp);
except
on e : exception do MessageDlg(e.message,mtError, [mbOK],0);
end
end;
ADOQuery1.Close;
ADOConnection1.Close;

Заранее спасибо за ответ . . .
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 11:34.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter