Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

из DBGRID В dbf файл. [D7, dBase, FoxPro]

muzzzy © (2003-09-16 10:14:00)

Вот подскажите пожалуста как грамотнее сделать чтобы данные полученные с помощью запросов(разных) перенести в локальные dbf файлы. Соответсвенно структуру я зарание незнаю, так как запрос может быть каким угодно.

muzzzy (2003-09-16 12:32:00) [1]

вОТ ВСЕ ВАМ ШУТКИ ШУТИТЬ...

Jeer (2003-09-16 11:49:00) [2]

Учиться по книжкам.
Ну и по хелпу:)

muzzzy (2003-09-16 11:43:00) [3]

Вот человеки придумал весч одну, точнее в хелпе подобное нашел, правда и здесь беда все ОК только с db файлами пример:

var
TDest: TTable;
begin
TDest := TTable.create(self);
with TDest do begin
TableName := "MyNewTbl.db";
FieldDefs.Assign(dbgrid1.DataSource.DataSet.FieldDefs);
IndexDefs.Assign(dbgrid1.DataSource.DataSet.IndexDefs);
CreateTable;
end;
Здесь все гут, только почемуто если написать
TableName := "MyNewTbl.dbf"; то созданый файл нигде неоткрываеться, говорит что это вовсе не dbf, но уже и не db.
Может кто знает чего делать.

Sergey13 (2003-09-16 11:32:00) [4]

2muzzzy (16.09.03 11:17) [8]
>чего за твоя_TABLE_NAME ???
Имя твоей таблицы. Если их много - делай много запросов. Или не делай. 8-) Можно попробовать c DataType поиграться.

>это к примеру... чего мне это все валить в отдельную таблицу на сервер?
Задача то твоя - вот ты и решай.

Jeer (2003-09-16 11:25:00) [5]

Ну если очень хочется, то пробегись по полям FieldDefs[i[ и создай новую таблицу в соответствии с их описаниями.
Далее стандартно из DataSet

muzzzy (2003-09-16 11:17:00) [6]

чего за твоя_TABLE_NAME ???

вот делаю я запрос скажем такой:

select v.xkey,pricecode,lpu,rgn1,sprint,startdate,
max(enddate) enddate,sum(subpay) prinsum
from (select distinct n.xkey,n.smo from nucleus n,service s
where n.xkey=s.xkey and n.smo=s.smo
group by n.xkey,n.smo
having max(enddate) between "01.01.2002" and "31.12.2002") v,
service s,nucleus n,hospital h
where test=1 and skind=1
and v.xkey=s.xkey and v.smo=s.smo
and v.xkey=n.xkey and v.smo=n.smo
and v.xkey=h.xkey
group by v.xkey,pricecode,lpu,rgn1,sprint,startdate;

это к примеру... чего мне это все валить в отдельную таблицу на сервер?

Sergey13 (2003-09-16 11:08:00) [7]

muzzzy (16.09.03 10:59) [6]
>Задача такая вот и перегоняю...
Сами гоним сами пьем... 8-) Ню-ню.

>насчет идей могу тупо из Dbgrid.Columns.Items[X].Field.AsYYYYY
А нафига через грид то, а не прямо из датасета?

>Только беда в том что я незнаю как узнать структуру

select * from sys.user_tab_columns
where TABLE_NAME="твоя_TABLE_NAME"

muzzzy (2003-09-16 10:59:00) [8]

>Sergey13
Задача такая вот и перегоняю...
насчет идей могу тупо из Dbgrid.Columns.Items[X].Field.AsYYYYY
Только беда в том что я незнаю как узнать структуру, конечно можно делать анализ запроса и на оснавании его создовать свою структуру, но намой взгляд это неправельно.

>Наталия
TBatchMove"y необходимо таблички исходник и приемник, исходника у меня в принципе быть неможет, а приемник я немогу создать так как назнаю как получить структуру.

Наталия (2003-09-16 10:42:00) [9]

TBatchMove попробуй

Sergey13 (2003-09-16 10:38:00) [10]

2muzzzy (16.09.03 10:14)
>Вот подскажите пожалуста как грамотнее сделать
Т.е. у тебя есть и свои варианты? Расскажи, а мы покритикуем.

Расскажи поподробнее про задачу. Зачем из Оракла "любые" запросы в DBF перегонять? Может и не надо ничего вовсе? 8-)

muzzzy (2003-09-16 10:29:00) [11]

Это как?
я данные получаю при помощи DOA 3.4

muzzzy (2003-09-16 10:28:00) [12]

Это как?

Anatoly Podgoretsky (2003-09-16 10:20:00) [13]

А зачем из DBGRID их эе там нет?
Далай запрос сразу с занесением в локальный файл.

Наверх

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