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

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

Восстановление Paradox [D6, Paradox]

avgur ©   (2004-03-25 10:41:00) 

Скажите пожалуйста, как програмно восстановить индексы таблиц Парадокс и Восстановить саму битую таблицу???
Если не жалко, примерчик бы....

---

Александр М   (2004-03-25 19:12:00) [1]

Поищи компоненты на torry.net, работающие с Tutil32.dll, я там такие встречал.

---

Heet   (2004-03-25 18:57:00) [2]

Для регенерации тебе много не надо - DBIRegenIndexes(<TableName>.Handle);
А вот если разрушается таблица, тут уже не восстановлением надо заниматься, а анализом причин ее разрушения. Поскольку даже самые тупые пользователи бывают жертвами несовершенства проги или технологии. У меня когда базы на Парадоксе разрушались - оказалось, что причину разрушения найти и устранить легче, чем заниматься восстановлением.

---

avgur   (2004-03-25 18:24:00) [3]

> есть еще резервное копирование - тоже очень эффективная
> защита от дураков

Вот этим я сейчас и занимаюсь, но как быть с теми данными, которые набраны уже после резервного копирования, а там не мало...

---

Alex_Bredin   (2004-03-25 18:02:00) [4]

есть еще резервное копирование - тоже очень эффективная защита от дураков

---

Term   (2004-03-25 17:28:00) [5]

вот как раз та прога которую я порекомендовал и использует эту библиотеку

---

avgur   (2004-03-25 17:27:00) [6]

я слышал, не помню где :( ,что в TUTIL32.dll есть такие функции, но как к ним обратится я не знаю, может кто либо делал??? или знает????

---

avgur   (2004-03-25 17:23:00) [7]

не я а диспетчера по пояс деревянные, у них все получается портить, хотелось бы себя изначально обезопасить

---

Alex_Bredin   (2004-03-25 16:11:00) [8]

так ты планируешь периодически базу портить?
вообще-то можно так ее попортить, что невозможно будет восстановить ни программами, ни процедурами, ни чертом лысым.
Надо думать над тем, чтобы исключить такую ситуацию, а не о том,, чтоб это потом разгребать

---

avgur   (2004-03-25 16:05:00) [9]

> Еще программулина: и индексы восстанавливает и поврежденные
> тадлицы: AbiDesktop

я понимаю что есть программы которые это делают, но мне необходимо вставить эту процедуру в программу для автоматического переиндексирования или восстановления базы
ПОМОГИТЕ плз...

---

Term   (2004-03-25 11:17:00) [10]

и вот примерчик для переиндексации в своё время брал с этого сайта кто автор не помню

procedure ReindexTable(Table: TTable);
var
WasActive: Boolean;
WasExclusive: Boolean;
begin
with Table do begin
  WasActive := Active;
  WasExclusive := Exclusive;
  DisableControls;
  try
    if not (WasActive and WasExclusive) then Close;
    try
      Exclusive := True;
      Open;
      Check(dbiRegenIndexes(Handle));
    finally
      if not (WasActive and WasExclusive) then begin
        Close;
        Exclusive := WasExclusive;
        Active := WasActive;
      end;
    end;
  finally
    EnableControls;
  end;
end;
end;

---

LaidBack   (2004-03-25 11:16:00) [11]

Еще программулина: и индексы восстанавливает и поврежденные тадлицы: AbiDesktop

---

Term   (2004-03-25 11:12:00) [12]

программа была такая которая востанавливала повреждённые таблицы DBDOCTOR кажется называлась поищи в инете, я её именно так нашёл.
а с индексами да просто заново переиндексируй и всё в чем проблема то

---

Наверх