<root>
	<xsd:schema targetNamespace="urn:schemas-microsoft-com:sql:SqlRowSet1" xmlns:schema="urn:schemas-microsoft-com:sql:SqlRowSet1" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:sqltypes="http://schemas.microsoft.com/sqlserver/2004/sqltypes" elementFormDefault="qualified">
		<xsd:import namespace="http://schemas.microsoft.com/sqlserver/2004/sqltypes" schemaLocation="http://schemas.microsoft.com/sqlserver/2004/sqltypes/sqltypes.xsd"/>
		<xsd:element name="a2">
			<xsd:complexType>
				<xsd:attribute name="A" use="required">
					<xsd:simpleType>
						<xsd:restriction base="xsd:string">
							<xsd:maxLength value="10"/>
						</xsd:restriction>
					</xsd:simpleType>
				</xsd:attribute>
				<xsd:attribute name="b">
					<xsd:simpleType>
						<xsd:restriction base="xsd:string">
							<xsd:maxLength value="50"/>
						</xsd:restriction>
					</xsd:simpleType>
				</xsd:attribute>
				<xsd:attribute name="dat" type="xsd:dateTime"/>
				<xsd:attribute name="num18_8">
					<xsd:simpleType>
						<xsd:restriction base="xsd:decimal">
							<xsd:totalDigits value="18"/>
							<xsd:fractionDigits value="8"/>
						</xsd:restriction>
					</xsd:simpleType>
				</xsd:attribute>
				<xsd:attribute name="num19_4">
					<xsd:simpleType>
						<xsd:restriction base="xsd:decimal">
							<xsd:totalDigits value="19"/>
							<xsd:fractionDigits value="4"/>
						</xsd:restriction>
					</xsd:simpleType>
				</xsd:attribute>
				<xsd:attribute name="num16_2">
					<xsd:simpleType>
						<xsd:restriction base="xsd:decimal">
							<xsd:totalDigits value="16"/>
							<xsd:fractionDigits value="2"/>
						</xsd:restriction>
					</xsd:simpleType>
				</xsd:attribute>
			</xsd:complexType>
		</xsd:element>
	</xsd:schema>
	<a2 xmlns="urn:schemas-microsoft-com:sql:SqlRowSet1" A="as        " b="cv                                                " dat="2009-05-29T12:50:58.137" num18_8="124587.00645870" num19_4="587.0064" num16_2="1547895478.64"/>
	<a2 xmlns="urn:schemas-microsoft-com:sql:SqlRowSet1" A="xcv       " b="asd                                               " dat="2009-05-29T12:50:58.137" num18_8="1547832.00100000" num19_4="832.0010" num16_2="100000000.01"/>
	<a2 xmlns="urn:schemas-microsoft-com:sql:SqlRowSet1" A="test1     " b="tra-ta-ta" dat="2009-05-29T12:57:01.150" num18_8="145898745.36500100" num19_4="1002154999.2560" num16_2="11111112255.36"/>
</root>

Private Sub NewXml(iFileName As String, sErr As String)

'==========================VARIABLES===================================================
Dim tempstr2    As String

'xml-variables
Dim oXMLDom     As New DOMDocument40
Dim oNode       As IXMLDOMNode
Dim attr        As IXMLDOMAttribute
Dim nodeList    As MSXML2.IXMLDOMNodeList

'=========================================================================================

On Error GoTo ErrorHandler

oXMLDom.async = False
oXMLDom.validateOnParse = False
oXMLDom.resolveExternals = False
oXMLDom.preserveWhiteSpace = True

If Trim(iFileName) = "" Then
    sErr = "Empty Input File Name"
    Exit Sub
End If

If oXMLDom.Load(iFileName) = False Then
    sErr = "Failed to load xml data from file."
    Exit Sub
End If

Set nodeList = oXMLDom.documentElement.selectNodes("//root/a2")
'собственно вот тут и ничего не выбирает :(((
For Each oNode In nodeList
    For Each attr In oNode.Attributes
        tempstr2 = tempstr2 + CStr(attr.Name) + "=" + CStr(attr.Text) + ";"
    Next
Next

MsgBox tempstr2

Exit Sub

ErrorHandler:
    sErr = Err.Number & " " & Err.Source & " " & Err.Description
    Exit Sub
End Sub

Dim oXMLDom     As New DOMDocument30