Скачать: CL | DM;

Копирование таблици   Найти похожие ветки 

← →
S@lik ©   (2004-11-11 14:54) [0]

Такая ситуаци мне нужно скопировать таблицу под определеным именем на сервере и очистеть таблицу для далнейшей работы
с помощю компонента Table на компютере подключен сетевой диск к папке в которую надо сохранить таблицу

---

← →
sniknik ©   (2004-11-11 14:59) [1]

и ???
ты у нас разрешения спрашиваеш? ну так я согласен, копируй. счас остальные подтянутся, завизируют, и можеш приступать.
;о))

p.s. тебе вроде уже давали ссылку с инфой как надо задавать вопросы, недочитал?

---

← →
Fyc   (2004-11-11 15:02) [2]

Вот держи
нужно два TTable для старой базы OldTable и для новой NewTable


procedure TForm1.Button2Click(Sender: TObject);
begin
 OldTable.IndexDefs.Update;
  with NewTable do
    begin
      DatabaseName:="путь к твоей базе данных";
      TableName:="имя новой таблицы";
      tableType:=ttdbase; //или какой там тебе нужен
      fieldDefs:=OldTable.FieldDefs;
      IndexDefs:=OldTable.IndexDefs;
      CreateTable;
      Free;
     end;
   end;


---

← →
S@lik ©   (2004-11-11 15:07) [3]

Fyc спасибо тебе что помог а то sniknik © надомной издевается

---

← →
msguns ©   (2004-11-11 15:09) [4]

>sniknik ©   (11.11.04 14:59) [1]
Таможня дает добро

---

← →
Anatoly Podgoretsky ©   (2004-11-11 15:18) [5]

S@lik ©   (11.11.04 15:07) [3]
Не, это ты над нами издеваешься.

---

← →
sniknik ©   (2004-11-11 15:45) [6]

я издеваюсь? да ни за что, это противно моей природе, только помогать вот мой девиз ;о))

вот мой вариант.  

OldTable.Close;
NewTable.Close;
CopyFile(PChar(OldTable.DatabaseName+OldTable.TableName), PChar(NewTable.DatabaseName+NewTable.TableName), False)
OldTable.Open;
NewTable.Open;
OldTable.EmptyTable

понятно, никаких алиасов в датабейсе, только путь, со слешом на конце.

---

← →
sniknik ©   (2004-11-11 15:46) [7]

ну вот, забыл точку с запятой, так торопился хотел быстрее помочь. ;о)

---

← →
Fyc ©   (2004-11-11 16:05) [8]

а как же индексы?

---

← →
Fyc ©   (2004-11-11 16:07) [9]

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

---

← →
Fyc ©   (2004-11-11 16:09) [10]

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

---

← →
sniknik ©   (2004-11-11 16:11) [11]

это на домашнее задание оставим. ;о)) хотя знаеш, три раза вопрос перечитал, ну нету в вопросе индексов! только таблицу нужно скопировать.

вообще чего придираешся? я же тебя не спрашиваю где данные?

---

← →
Fyc ©   (2004-11-12 12:10) [12]

> очистеть таблицу

это из первого вопроса

---

← →
sniknik ©   (2004-11-12 14:47) [13]

а, так у тебя код "очищения" тогда где копирование? данных, данных имею ввиду.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.035 c