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

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

KoleDB+Access2000rus+Delphi7+Win2000rus


avakss ©   (2004-03-30 13:06:00) 

с koledb идёт демопример с базами otv.dbf tst.mdb. Так вот у меня эти примеры работают.
а если создать простейшую базу данных на Access2000rus из двух столбцов и двух строк данных, то подключается нормально, но при query1.text:='select Proc,Freq from Comp' и  query1.open выдаёт ошибку
oledb error 80040E14.
Может примеры в демо набирались в Access95Engl или в чём проблема,и ещё если преобразовать базу tst.mdb в базу Access2000 то пример всё ещё рабочий.


avakss   (2004-03-31 12:41:00) [1]

ну что никто не скажет в чём дело?
Ещё в Datasource выбрать OLEDB ODBC то моя база работает, а если JET db 4.0 то глюки

var DS: PDataSource;
   SS: PSession;
   QR: PQuery;

procedure TForm1.Button1Click(Sender: PObj);
var I, N: Integer;
begin
 if DS = nil then
 begin
   DS := NewDataSource( 'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;' +'Data Source=' + GetStartDir + 'Data\db1.mdb;' +
   'Mode=Share Deny None;' +
   'Extended Properties="";' +
   'Locale Identifier=1033;' +
   'Persist Security Info=False;' );

   SS := NewSession( DS );
   QR := NewQuery( SS );
   QR.text:='select Proc,Freq from Comp';
   QR.open   ///вот тут ошибку выдаёт


Наверх

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