如何可用将这样格式的XML读成一行一行的数据存到数据库里？

[jiangyunjian215]

<msg time='2014-10-22T22:00:32.924+08:00' org_id='oracle' comp_id='rdbms'
client_id='' type='UNKNOWN' level='16'
host_id='dataserver12' host_addr='172.16.10.12' module=''
pid='31366' version='1'>
<txt>Thread 1 cannot allocate new log, sequence 377
</txt>
</msg>
<msg time='2014-10-22T22:00:32.924+08:00' org_id='oracle' comp_id='rdbms'
client_id='' type='UNKNOWN' level='16'
host_id='dataserver12' host_addr='172.16.10.12' module=''
pid='31366'>
<txt>Private strand flush not complete
</txt>
</msg>
<msg time='2014-10-22T22:00:32.924+08:00' org_id='oracle' comp_id='rdbms'
client_id='' type='UNKNOWN' level='16'
host_id='dataserver12' host_addr='172.16.10.12' module=''
pid='31366'>
<txt> Current log# 1 seq# 376 mem# 0: /home/oracle/app/oracle/oradata/orcl/redo01.log
</txt>
</msg>
<msg time='2014-10-22T22:00:36.055+08:00' org_id='oracle' comp_id='rdbms'
client_id='' type='UNKNOWN' level='16'
host_id='dataserver12' host_addr='172.16.10.12' module=''
pid='31366'>
<txt>Thread 1 advanced to log sequence 377 (LGWR switch)
</txt>
</msg>
<msg time='2014-10-22T22:00:36.055+08:00' org_id='oracle' comp_id='rdbms'
client_id='' type='UNKNOWN' level='16'
host_id='dataserver12' host_addr='172.16.10.12' module=''
pid='31366'>
<txt> Current log# 2 seq# 377 mem# 0: /home/oracle/app/oracle/oradata/orcl/redo02.log
</txt>
</msg>
<msg time='2014-10-22T22:00:36.522+08:00' org_id='oracle' comp_id='rdbms'
client_id='' type='UNKNOWN' level='16'
host_id='dataserver12' host_addr='172.16.10.12' module=''
pid='31491'>
<txt>Archived Log entry 340 added for thread 1 sequence 376 ID 0x5273f832 dest 1:
</txt>
</msg>
<msg time='2014-10-22T22:01:40.474+08:00' org_id='oracle' comp_id='rdbms'
client_id='' type='UNKNOWN' level='16'
host_id='dataserver12' host_addr='172.16.10.12' module=''
pid='31507'>
<txt>LNS: Standby redo logfile selected for thread 1 sequence 377 for destination LOG_ARCHIVE_DEST_2
</txt>
</msg>

能读到 time的值和标签对 <txt>中的内容就够了</txt>
存放到tb_alert(occur_time date,message varchar2(200))就可以了。

或者有什么简单的办法可以把xml数据展示为多行数据，
一个<msg></msg>中的内容对为一行。

[nm_wyh]

Delphi中使用NatiiveXML第三访控件，解析这人小case了。网上搜索一下，自己动手弄一弄就知道了，别等别人给代码，还不如自己来的快。

[zhenghuinb1025]

说明：我使用的是Delphi自带的XMLDocument1控件，首先楼主给的文本并不是标准的XML文档，所以先加工成相对准备的XML使用它能够解析。

var
  i:Integer;
  clist:TStringList;
begin
  clist:=TStringList.Create;
  clist.LoadFromFile('1.xml');
  XMLDocument1.XML.Clear;
  XMLDocument1.XML.Text:='<?xml version="1.0" encoding="gb2312"?><ROOT>'+clist.Text+'</ROOT>';
  XMLDocument1.Active:=true;
  for i:=0 to XMLDocument1.DocumentElement.ChildNodes.Count-1 do
  begin
    Memo1.Lines.Add(
    XMLDocument1.DocumentElement.ChildNodes[i].Attributes['time']+' '
    +XMLDocument1.DocumentElement.ChildNodes[i].ChildNodes[0].Text
    );
  end;
  clist.Free;
end;

[lyhoo163]

本想帮助你解析一下，一看XML不完整。 最好你提供完整的XML标准的文件。

[pathletboy]

简单的解析，正则表达式是比较方便的。

<msg time='(.*?)' [\s\S]*?<txt>(.*)\r\n </txt>\r\n</msg>

[yct0605]

引用 6 楼 pathletboy 的回复:

简单的解析，正则表达式是比较方便的。

<msg time='(.*?)' [\s\S]*?<txt>(.*)\r\n </txt>\r\n</msg>

这个不错。

[固执的大叔]

XML Data Binding + XMLDocument 不知道能不能满足楼主的需求？

[踏雪无痕]

XML第三方解析控件很多的啊