Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 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.58 MB
Время: 0.074 c
4-1099030365
WaS
2004-10-29 10:12
2004.12.12
Определить нandle рабочего стола?


8-1094227655
Artin
2004-09-03 20:07
2004.12.12
Воспроизведения фильма с произвольного места DSPack.


14-1100853189
Саке
2004-11-19 11:33
2004.12.12
Нужна программа для работы с дескрипторами окон


1-1101799104
Progh
2004-11-30 10:18
2004.12.12
Сохранения TListView в виде HTML


14-1101280576
ИМХО
2004-11-24 10:16
2004.12.12
Для чего создана музыка: чтобы СЛУШАТЬ или чтобы ТАНЦЕВАТЬ?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский