Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.17;
Скачать: CL | DM;

Вниз

XML для запихивания данных в таблицы....   Найти похожие ветки 

 
Алексей   (2004-09-20 09:35) [0]

Возник вопросик: а можно ли каким либо образом сделать следующий финт ушами:

1. Получить данные запросом select.
qM.Close; qM.SQL.Clear; qM.SQL.Add("select kod,kolvo from reg");
qM.Open;

2. Сохранить его результат в XML.
qM.SaveToFile("c:\temp1.xml",pfXML);
3. Открыть таблицу.
tMyTable.Open;
4. Загрузить в таблицу из файла
tMyTable.LoadFrom File("c:\temp1.xml");
5. Наслаждаться наличием данных в таблице.

Используются компоненты ADO.
Такой изврат из-за того, что читаю из таблиц Fox, а записываю в таблицы dBase.


 
Deniz ©   (2004-09-20 09:47) [1]

Можно!
Работать с XML хорошо умеет TClientDataSet.


 
Алексей   (2004-09-20 12:16) [2]

Подробнее, плиз.
Делаю так:

  q1.Open;
  ClientDataSet1.Active:=true;
  ClientDataSet1.SaveToFile("c:\1234.xml",dfXML);
  ClientDataSet1.Close;
  t1.open;
  ClientDataSet2.Active:=true;
  ClientDataSet2.LoadFromFile("c:\1234.xml");
  ClientDataSet2.ApplyUpdates(-1);

ClientDataSet2 вяжу с t1 через DataSetProvider2
ClientDataSet1 вяжу с q1 через DataSetProvider1
q1.SQL:="select kod,kolvo from reg"
Структура таблицы к которой вяжется t1:
kod numeric(6,0)
kolvo numeric(12,2)

Поля в таблице reg имеют тотже самый тип....


 
Deniz ©   (2004-09-20 13:38) [3]

Так тебе просто перекачать данные надо или ...?
ApplyUpdates не пройдет, потому как небыло изменений.


 
Алексей   (2004-09-20 14:25) [4]

А как ?



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

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

Наверх




Память: 0.47 MB
Время: 0.042 c
3-1095592312
KADAN
2004-09-19 15:11
2004.10.17
mssql => msaccess


6-1092108374
Ден
2004-08-10 07:26
2004.10.17
поиск по сети


4-1095100166
MIGUR
2004-09-13 22:29
2004.10.17
Изменения параметров в BOIS


8-1090319565
Batoon
2004-07-20 14:32
2004.10.17
Работа с картинкой


6-1092013221
eRoR_rrr
2004-08-09 05:00
2004.10.17
Состояние Net send