Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2004.10.17;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.04 c
1-1096435775
Vint
2004-09-29 09:29
2004.10.17
нужно перехватить сообщение об открытии окна (наверное)


8-1090673542
Ig
2004-07-24 16:52
2004.10.17
GDI Plus


8-1090389409
Игорь Н.
2004-07-21 09:56
2004.10.17
Как засунуть .bmp внутрь .exe шника?


1-1097039937
qwe
2004-10-06 09:18
2004.10.17
Проблема с установкой EhLib 3.5 Components


1-1096792138
nof
2004-10-03 12:28
2004.10.17
StrToChar





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский