XML

← →
ss300 (2003-11-06 12:45) [0]

Есть XML файл.. Надо поменять местами значения OriginID и DestinationID, т.е. должно быть OriginID="J1CKZA" DestinationID="J1CBYA"

Заранее спасибо..

<ListDetails OriginID="J1CBYA" DestinationID="J1CKZA"/>
<Order No="J20ABYAKZAORN3100000000083">
<EvtLCLDT Y="2003" M="11" D="04" T="16:04"/>
<EvtOffice Cd="" Nm=""/></Order></Resord>

← →
Reindeer Moss Eater © (2003-11-06 12:50) [1]

Есть XML файл..

Если файл, то операции со строками. Pos, Insert, Delete

← →
ss300 (2003-11-06 12:52) [2]

2 Reindeer Moss Eate

я так и сделал, но мля формат пориться.. Х.З. почему

AssignFile(f,"e:\XML\"+sr.name);
Reset(f);
AssignFile(fnew,"e:\XML\new\"+sr.name);
rewrite(fnew);
while not eof(f) do
begin
readln(f,s);
ShowMessage(s);
for i:=1 to length(s) do
begin
if copy(s,i,8)="OriginID" then
begin

delete(s,i+12,6);
insert("J1CKZA"",s,i+12);
delete(s,i+12+17+7,6);
insert("J1CBYA"",s,i+12+17+7);
writeln(fnew,s);
end;
end;
end;

Делай ч.з msxml. Создавай XMLDocument, загружай в него свой файл, находи соответствующий нод, потом меняй местами атрибуты нода: replaceChild, removeChild, insertBefore, cloneNode. Там куча методов с пом-ю которых можно это сделать.

XML Найти похожие ветки