请教一简单的XML问题！(36分)

从internet服务器接受到一个xml包，里面是一张表的数据：
格式如下：
<Rep>
<CmdType>UserList</CmdType>
<User>
<ID>user_id</ID> <OrgID>org_id</OrgID>
<Name>user_name</Name>
<Password>user_password</Password>
<RealName>user_real_name</RealName>
<Type>user_type</Type>
<Mobile>user_mobile</Mobile>
<EMail>user_email</EMail>
</User>
<User>
<ID>user_id</ID>
<OrgID>org_id</OrgID>
<Name>user_name</Name>
<Password>user_password</Password>
<RealName>user_real_name</RealName>
<Type>user_type</Type>
<Mobile>user_mobile</Mobile>
<EMail>user_email</EMail>
</User>
<User>
<ID>3</ID>
<OrgID>003</OrgID>
<Name>222</Name>
<Password>222</Password>
<RealName>22</RealName>
<Type>22222</Type>
<Mobile>555566</Mobile>
<EMail>898565</EMail>
</User>
</Rep>
现在我要一条一条解析分析和本地数据库的表的纪录的区别，然后决定插入数据库、更改数据库，不改！！
用XMLDocument，mxxml解析，怎么做呀！？

楼主想问数据库操作还是 XML 解析啊？

当然是xml解析了[][8D][]

// AText 就是上面楼主贴出的字符串
procedure TForm1.XMLFunc(AText: String);
var
i: Integer;
sDoc: TXMLDocument;
sNode,cNode: IXMLNode;
begin
sDoc := TXMLDocument.Create(self);
with sDocdo
begin
XML.Add('<?xml version=&quot;1.0&quot;
encoding=&quot;GB2312&quot;
?>');
XML.Add(AText);
try
Active := True;
except
sDoc.Free;
Exit;
end;
sNode := Node.ChildNodes.Nodes[1];
end;
for i := 1 to sNode.ChildNodes.Count - 1do
begin
cNode := sNode.ChildNodes.Nodes;
cNode := cNode.ChildNodes.FindNode('Password');
ShowMessage(cNode.NodeValue);
......
end;
sDoc.Free;
end;

接受答案了.