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

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

Ошибка в таблицах FoxPro [D6]


Gore ©   (2008-04-07 08:46:00) 

Господа коннекчусь через ADOQuery  к таблице выдает ошибку
"Непредвиденная ошибка драйвера внешней базы данных (8961)"
Что не так?


Gore   (2008-04-09 10:34:00) [1]

У все господа хорошие нашел компонент для работы с базами DBF
вроде бы не глячит№ Всем спасибо за оказанную помощь.
  Компонент   TDBF
Автор      : Брусникин Игорь Викторович  -  majar@nm.ru
ему респект и уважение


Gore   (2008-04-09 07:04:00) [2]

Если ты имееш в виду ADODataSet то он выводит ошибку "Внешняя таблица не имеет предполагаемый формат", а если чтото другое то где оно находится?


molodoi   (2008-04-08 15:43:00) [3]

Пользуй Advantage TDataSet. И будет тебе счастье.


Gore   (2008-04-08 15:39:00) [4]

не пишется значение какието каракули идут


Gore   (2008-04-08 15:35:00) [5]

плохиш я и есть программист просто не работал с Foxом


Плохиш   (2008-04-08 14:18:00) [6]

Удалено модератором


  (2008-04-08 14:15:00) [7]

Удалено модератором


_vadim   (2008-04-08 13:25:00) [8]

To Gore:
Откройте таблицу в любом шестнадцатиричном редакторе\просмоторщике и скажите значение нулевого байта. Который самый первый...


Плохиш   (2008-04-08 12:52:00) [9]

Стоит нанять программиста, всё-таки.


Gore   (2008-04-08 11:23:00) [10]

Говорю еще раз, я сделал по ихним условиям но оно продолжает глючить.
Дело в том что таблицу эту я не создаю а беру из другой программы. По условию есть 81 папка в которых находятся одинаковые программы но сразличными данными. Необходимо циклично пройти по всем папкам и собрать данные из всех таблиц в оду общую. Программы написанны на FoxPro.


sniknik   (2008-04-08 11:17:00) [11]

> но программу то я в делфи пишу?
в дельфи и открывай.

> Что использовать
уже сказал - Visual FoxPro, есть такой провайдер. (может не стоять, но есть)

> и как если не серет?
см. [1], [3]... возможно для тебя и секрет.


Gore   (2008-04-08 11:08:00) [12]

но программу то я в делфи пишу? Что использовать и как если не серет?


sniknik   (2008-04-08 10:42:00) [13]

> Я её открываю с помощью Visual FoxPro и все данные отображаются нормально.
отлично. значит это скорее всего и есть формат Visual FoxPro. им и открывай.


Gore   (2008-04-08 10:12:00) [14]

Я её открываю с помощью Visual FoxPro и все данные отображаются нормально.


sniknik   (2008-04-08 08:29:00) [15]

> пробовал все
вряд ли. понятие "все" включает в себя и рабочий вариант... раз у тебя до сих пор не работает, то его ты явно не пробовал.

> Внешняя таблица не имеет предполагаемый формат
стоит поверить и выяснить настоящий формат таблицы... и сравнить с тем с которым открываешь (что поддерживает используемый тобой провайдер).


Gore   (2008-04-08 08:22:00) [16]

Пытался сделать через Query
for z:=0 to BsSKinListbox1.Items.Count-1 do
 begin
 //коннектимся к базе импорта
  bsSkinLabel1.Caption:=BsSKinListbox1.Items.Strings[z];
  ImpT.DatabaseName:=Patch+'NewData\';
//   ImpT.DatabaseName:='C:\New\';
  ImpT.SQL.Text:='Select * from '+BsSKinListbox1.Items.Strings[z]+' '+Memo1.Lines.Strings[z];
  ImpT.Open;
      //Циклично коннектимся ко всем базам и берем инфу
      for x:=strtoint(bsSkinSpinEdit1.Text)
          to strtoint(bsSkinSpinEdit2.Text) do
             begin
               Tekn:=inttostr(x);
               ExpT.DatabaseName:=BsSkinEdit1.Text+'\'+Tekn+'\'+BsSkinEdit2.Text;
               ExpT.SQL.Text:='Select * from '+BsSKinListbox1.Items.Strings[z]+' '+Memo1.Lines.Strings[z];
               ExpT.Open;
               ImpT.Last;
               ExpT.First;
               lCount := ExpT.FieldCount;
                         For i:=1 to ExpT.RecordCount do
                          Begin
                           ImpT.Insert;
                            for j:=0 to LCount-1 do
                               if (not ExpT.Fields[j].IsNull)and(ExpT.Fields[j].CanModify) then
                                     ImpT.FieldByName(ExpT.Fields[j].FieldName).Assign(ExpT.Fields[j]);
                           ExpT.Next;
                          end;
                ExpT.Close;

             end;
 //Сохраняеми вырубаем базу импорта
  ImpT.Post;ImpT.Close;
 end;


Gore   (2008-04-08 08:19:00) [17]

Господа пробовал все. Ошибка изменилась на "Внешняя таблица не имеет предполагаемый формат".


sniknik   (2008-04-07 14:29:00) [18]

> Что не так?
не так коннектишься (единственное, что написано, делаешь)

> Johnmen спасибо но их метод у меня не сработал
все попробовал?
а то есть еще так
http://www.google.ru/search?aq=f&complete=1&hl=ru&newwindow=1&client=firefox-a&rls=org.mozilla%3Aru%3Aofficial&q=Unexpected+error+from+external+database+driver+(8961)&btnG=%D0%9F%D0%BE%D0%B8%D1%81%D0%BA&lr=


Gore   (2008-04-07 13:48:00) [19]

Johnmen спасибо но их метод у меня не сработал


Johnmen   (2008-04-07 09:33:00) [20]

А так
http://www.yandex.ru/yandsearch?text=%CD%E5%EF%F0%E5%E4%E2%E8%E4%E5%ED%ED%E0%FF+%EE%F8%E8%E1%EA%E0+%E4%F0%E0%E9%E2%E5%F0%E0+%E2%ED%E5%F8%ED%E5%E9+%E1%E0%E7%FB+%E4%E0%ED%ED%FB%F5+%288961%29


Наверх

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