Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.12;
Скачать: 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 вся ветка

Текущий архив: 2004.12.12;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.026 c
1-1101379411
denis24
2004-11-25 13:43
2004.12.12
findcomponent на другой форме


14-1099531403
ИМХО
2004-11-04 04:23
2004.12.12
Королевство ночи...


3-1100437995
denis24
2004-11-14 16:13
2004.12.12
паковка *.mdb


14-1100996643
Soft
2004-11-21 03:24
2004.12.12
Open Source обречен?


3-1100317736
Under
2004-11-13 06:48
2004.12.12
INFORMATION_SCHEMA в Access