![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
запрос значения параметра (XMLDocument) [D7, WinXP]
lehich © (2005-08-25 16:23:00)подскажите как запросить значение параметра (параметры: IDDOC, IDUL, OGRN, INN, KPP) используя XMLDocument? кусок кода XML привожу ниже...
заранее премного благодарен!
______________________
<?xml version="1.0" encoding="windows-1251" standalone="no"?>
<MESS_DATA VER="1.0">
<HEADER IDFILE="######" S_ID="######" S_CODE="###" S_NAME="######" TIMESTAMP="13.10.2004_14.18.12" PRG_VER="1.0.0 от 01.08.2004" CNT_DOK=" 16631">
<USER DOLGN="######" FAM_FL="#####" NAME_FL="####" OTCH_FL="#####" TEL="#####" EMAIL="####"/>
</HEADER>
<UL IDDOK="####" IDUL="######" OGRN="######" INN="######" KPP="#######">
lehich (2005-08-31 11:00:00) [1]обновлю сабж...
lehich (2005-08-29 09:14:00) [2]как вопрос решаешь с необязательными полями? через исключения? я попробовал так, но шибко уж их дофига получается... код становится слишком объемным :-(((
Fay (2005-08-26 16:45:00) [3]2 lehich (26.08.05 15:49) [23]
Я пользовался вот этим.
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/xmlsdk/html/b4f7414b-4af9-4c04-8a6a-06b58d0e74d0.asp
+
TAnyClass = class(TObject, IVBSAXContentHandler, IVBSAXErrorHandler)
...
public
...
procedure AnyMethod(...)
...
end;
...
procedure TAnyClass.AnyMethod(...);
...
begin
...
FVBSAXXMLReader := IVBSAXXMLReader(CreateComObject(CLASS_SAXXMLReader));
try
...
FVBSAXXMLReader.contentHandler := IVBSAXContentHandler(Self);
FVBSAXXMLReader.errorHandler := IVBSAXErrorHandler(Self);
FVBSAXXMLReader.parseURL(YourFileName);
...
finally
...
FVBSAXXMLReader := nil;
...
end;
...
end;
Какие методы перекрыть и зачем, думаю, догадаешься.
lehich (2005-08-26 15:49:00) [4]
> Fay © (26.08.05 14:53) [21]
я не хочу готовый проект... я тогда подохну от скуки :-))) да и профессиональному росту не шибко поможет %-)))
(2005-08-26 15:09:00) [5]Удалено модератором
Fay (2005-08-26 14:53:00) [6]2 lehich (26.08.05 14:25) [19]
Я бы кинул готовым проектом, но
1) имею прямой запрет
2) код не из простых - не зная идеи разбирать долго.
Fay (2005-08-26 14:50:00) [7]2 lehich (26.08.05 14:25) [19]
>> научишь?
Можно попытаться. 8)
Есть готовые вопросы, поддающиеся формулировке?
lehich (2005-08-26 14:25:00) [8]
> Fay © (26.08.05 13:39) [18]
а я нифига в этом не понимаю... :-)))
научишь? %-)))
Fay (2005-08-26 13:39:00) [9]2 lehich (26.08.05 10:58) [14]
А меня разбор на SAX-парсере. Параметры зазбора ваще хранятся в файле 8)
lehich (2005-08-26 12:06:00) [10]
> REA (26.08.05 11:26) [16]
респект! щаз попробую...
REA (2005-08-26 11:26:00) [11]циклом по ChildNodes до Count-1
REA (2005-08-26 11:23:00) [12]ну атрибуты там - см. соотв функцию Delphi как сказали в [1]
lehich (2005-08-26 10:58:00) [13]
> Fay © (25.08.05 18:44) [13]
определенные успехи есть :-))) я теперь знаю куда копать :-)))
еще по ходу всплыл один вопросик... там где перечисление видов деятельности идет (OKVED) как перебирать их все подряд до последнего? циклом через до Count property (IXMLNodeCollection)? видел там перемещение к следующей и предыдущей записи, но аналогию EOF для xml документа не нашел...
Fay (2005-08-25 18:44:00) [14]2 lehich (25.08.05 18:10) [11]
Есть успехи? Я не следил за переговорами...
Fay (2005-08-25 18:20:00) [15]2 lehich (25.08.05 18:10) [11]
Ушло
lehich (2005-08-25 18:10:00) [16]если не сложно кинь еще на oapik@bk.ru
а то lehich на валуе... а там мыло никогда не было скоростным и надежным :-(((
Fay (2005-08-25 18:00:00) [17]2 lehich (25.08.05 17:57) [9]
Смотри почту.
lehich (2005-08-25 17:57:00) [18]
> взаимовыгодное сотрудничество не устроит?
более чем устроит!!!
а в чем оно будет проявляться??? кстати ты с какой стороны с передающей или принимающей это всё? :-)))
Fay (2005-08-25 17:54:00) [19]2 lehich (25.08.05 17:49) [6]
>> но может можно поделиться???
Это мой хлеб, вАщЕ-то. Да и шеф не поймёт. А взаимовыгодное сотрудничество не устроит? 8)
З.Ы.
Прошлый формат - это XML без вложенности и без атрибутов? Гадость редкая : на 50-ти метрах DOM-парсер жрал за гигабайт.
lehich (2005-08-25 17:52:00) [20]
> Fay © (25.08.05 17:45) [5]
знаю что не такой корень... просто исправил чтобы егрюл не мелькал перед глазами :-)))
<EGRUL_UL_DATA VER="1.0">
<HEADER IDFILE="RUM_29055_050204_1"