Форум: "Базы";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];
Вниз
Копирование таблици Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.036 c
