На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! ПРАВИЛА РАЗДЕЛА · FAQ раздела Delphi
Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.
Обязательно указание:
1) типа базы данных (Paradox/Oracle/Interbase и т.п.)
2) способа доступа к базе данных (ODBC/ADO/DAO/BDE и т.п.)
Например: Paradox/BDE, MS Access/ADO

Наиболее часто задаваемые вопросы:
Базы даных для начинающих. Первые шаги. Понятие о BDE.
Переход на клиент-сервер и начала ADO
Приёмы работы с BLOB (OLE/Memo) полями
Запросы и параметры или как избавиться от многих проблем. Проблемы с датами в запросах.
Нужели мне нужно устанавливать BDE? (или почему не работает программа на другом компьютере)
Модераторы: Bas, Rouse_
  
> xml в db oracle , Как спарсить xml в oracle
    Подскажите как правильно открыть Xml и сохранить каждый тег в таблицу Oracle (Допустим UserName сохранить в ячейку таблицы UserName, и т.д.)
    P/S Много смотрел и мануалов и поиском много пользовался но ничего не понял...

    собственно сам XML
    ExpandedWrap disabled
      <?xml version="1.0" encoding="utf-8"?>
      <TaskArchive xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" version="1.0" xmlns="http://site.ru/max/">
        <Description>
          <UserName>Иванов И.И.</UserName>
          <Division>ООО Дом</Division>
          <ExportDate>2015-05-20T15:17:29.0609734+04:00</ExportDate>
        </Description>
        <Data><Task xmlns="http://site.ru/max/"><ShortTask UniqueId="e9c3df2e-adb1-43d2-884f-680512b68518"><ActivityDurationDays>111</ActivityDurationDays><Activity Title="Gfhi" /><CategoryType>Order</CategoryType><Object Title="вап" Caption="88" /><TaskNumber>НОМЕР</TaskNumber><TaskYear>2015</TaskYear><TaskDate>2015-05-16</TaskDate><BeginDate>2015-05-17</BeginDate><EndDate>2015-05-18</EndDate><BlankNumber>123456789</BlankNumber><ActivityPlace Title="SSS" /><ActivityPhone>12345</ActivityPhone><CriminalCase Title="ДПОП" Caption="ОО" /><CriminalCaseNumber>34-234-3</CriminalCaseNumber><CriminalCaseName>выарддд</CriminalCaseName><ObjectAlias>Иванчег А.В. 88а-РЕГНОМЕР</ObjectAlias><JoinOpu>0</JoinOpu><Division Title="ДДДДД" Caption="84EFD93D-5E41-4225-BB11-3B02D03E9B75" /><TaskType>1</TaskType><TaskMN>1596</TaskMN><IMSI>25864</IMSI><IMEI>654321</IMEI><PrivacyLevel Title="Род" Caption="3" /><State>WithoutTaskMission</State></ShortTask><PhysAddress UniqueId="f814a845-7c36-49c6-bdf9-0bd12f36dcdd"><Region Title="Жук" /><Discrict Title="Майский" Caption="БОГ" /><Town Title="В. НОВГОРОД" Caption="В. " /><Street Title="Аврора" /><HouseNumber>646</HouseNumber><Building>685</Building><Flat>356</Flat></PhysAddress><Physical UniqueId="1fbf5bad-839f-4b57-81e5-f438aa40b085"><LastName Title="Козлов" Caption="ВАВ" /><FirstName Title="АПАР" Caption="АПА" /><Patronymic Title="ВАЛЕРЬЕВИЧ" Caption="ВАЛ" /><BirthDay>2015-05-14</BirthDay><Sex Title="М" /><Alias>авпр</Alias><EruditionLevelOrd Title="ДА" /><Accents>смве</Accents></Physical><TaskInitiator><Subdivision Title="Таз" Caption="ОО" /><Agency Title="ЧКФ" /><FullName Title="Зайкин А.А." Caption="Комолов А.А." /><PhoneA>99599999</PhoneA><PhoneB>841351418</PhoneB></TaskInitiator><Orientation><CriminalDirection Title="КОНИКС" /><Citizenship Title="Роман" /><Nationality Title="Котят" /><CriminalCategory Title="Маркетинг" /></Orientation><Target><Target>впавквы ыва вап выфп асп</Target></Target><Sanction><JuridicalOrder>8</JuridicalOrder><Period>5</Period><SanctionDate>2015-05-16</SanctionDate><IsFromConnectionMoment>0</IsFromConnectionMoment><SanctionPerson><Agency>Москва</Agency><Post>Руководитель</Post><FullName>Молотов В.В.</FullName></SanctionPerson></Sanction><AgencyDirectionAlt><CaptionTo>РооРоо</CaptionTo><CaptionFor>Казин А.А.</CaptionFor></AgencyDirectionAlt><TaskEffectiveness><EffectivenessSign>0</EffectivenessSign><JudgeLegalize>0</JudgeLegalize></TaskEffectiveness><CriminalClauses><CriminalClause><ParagraphNumber Title="232" Caption="Мороз" /><SubparagraphNumber>3</SubparagraphNumber></CriminalClause></CriminalClauses></Task></Data>
      </TaskArchive>


    Есть некоторые наброски:
    ExpandedWrap disabled
      unit Unit1;
       
      interface
       
      uses
        Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
        Vcl.Controls, Vcl.Forms, Vcl.Dialogs;
       
      type
        TForm1 = class(TForm)
        private
          { Private declarations }
        public
          { Public declarations }
        end;
       
      var
        Form1: TForm1;
       
      implementation
       
      uses Winapi.msxml, ComObj;
       
      procedure TForm1.SomeFunc(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
      const
        XMLFileName = 'C:\\qqq.xml';
       
      var
        LDocument: IXMLDOMDocument2;
        LRoot, LChildNode : IXMLDOMNode;
      begin
        // Загружаем XML
        LDocument := CoDOMDocument.Create;
        LDocument.async := False;
        LDocument.Load(XMLFileName);
        OleCheck(LDocument.parseError.errorCode);
       
       
        LDocument.setProperty('SelectionNamespaces', 'xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance''');
       
        // XPath очень быстро
        LDocument.setProperty('SelectionLanguage', 'XPath');
       
        LRoot := LDocument.documentElement;
       
        LChildNode := LRoot.selectSingleNode('.//ActivityDurationDays');
       
        if Assigned(LChildNode) then
        begin
          // как сделать insert или update в БД
        end;
      end;
       
      end.


    Сразу оговорюсь c delphi не очень давно знаком, так что не сильно кричите =)
      Цитата rootsamara @
      Сразу оговорюсь c delphi не очень давно знаком

      В Oracle есть XMLType вот с ним и работайте а не с delphi.
      Добавлено
      XML в Oracle - это очень просто

      Запись данных из XML в таблицу - Oracle

      Добавлено
      Oracle9i Database Search Results: 'XMLSequence and extract' (Release 2 (9.2))

      Добавлено
      Разбираем XML средствами Oracle database
      Сообщение отредактировано: Bas -
      0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
      0 пользователей:


      Рейтинг@Mail.ru
      [ Script execution time: 0,0291 ]   [ 16 queries used ]   [ Generated: 28.03.24, 09:41 GMT ]