怎么动态得到节点的属性集合?

[hcsunjun]

如:
<root>
<record id='1' name='a'>
<a>aa</a>
</record>
<record id='2' name='b'>
<a>bb</a>
</record>
</root>
上述XML树,在每个节点上均有属性,但我现在怎么把这些属性全部读出来,注意,事先并不知道名字一定是id,name,我现在就要分别得到属性的名字及值,有办法吗?

[ssm1226]

<%
set xmldoc=server.createObject("MSXML2.DOMDocument")
xmldoc.async=false
xmldoc.load server.mappath("csdn0001.xml")
set nodes=xmldoc.selectNodes("//record")
for each node in nodes
set attrs=node.attributes
for each attr in attrs
response.write "name:" & attr.nodeName & ";value:" & attr.text & "<br/>"
next
response.write "<hr>"
next
set attr=nothing
set attrs=nothing
set node=nothing
set nodes=nothing
set xmldoc=nothing
%>