Using XMLReader in a VB Script

Question

Hi,
The code below works well for me in VB.NET, however, I need to perform this using VBScript. I have been unable to find any documentation or examples of how to create an object that references the XMLTextReader. All I can find is
examples using the XMLDOM object. Any suggestions would be appreciated.
Thanks
Dim reader As XmlTextReader = New XmlTextReader("F:\GM HFV6 Daily Events\9-26-2014\HFV6 Block Main.xml")
        'How to get a point
        Do While (reader.Read())
            If reader.MoveToContent() = XmlNodeType.Element And reader.Name = "point" Then
                If reader.HasAttributes Then 'If attributes exist
                    While reader.MoveToNextAttribute()
                        'Display attribute name and value.
                        Console.Write(" {0}='{1}'", reader.Name, reader.Value)
                    End While
                End If
                Console.WriteLine()
            End If
        Loop

Answer 1

The XML below is typical of a what I get for a measurement feature. I need to extract it's name (create a CAD layer), then draw the nominal circle, actual circle and touch points, once I have the xyz I create an array and then use a built-in function to
draw the point in the CAD system, e.g. CAD.AddPoint(arrPoint).
<feature id="FEAT_Datum_RC_raw" name="Datum_RC_raw" common_space="YES">
   <circle_feature type="INNER">
    <circle_feature_nominal reporting_transform="XFORM_NOM_RA-RB-RC_Rough_Align">
     <center_point x="-346.000000" y="-45.000000" z="4.000000"/>
     <normal i="0.000000" j="0.000000" k="-1.000000"/>
     <diameter>14.012500</diameter>
    </circle_feature_nominal>
    <circle_feature_actual reporting_transform="XFORM_ACT_RA-RB-RC_Rough_Align">
     <center_point x="-345.984474" y="-44.998016" z="3.996796"/>
     <normal i="-0.000028" j="0.000082" k="-1.000000"/>
     <diameter>14.012679</diameter>
    </circle_feature_actual>
   </circle_feature>
   <point_list>
    <point_data id="TOUCH_1_Datum_RC_raw">
     <measured_point>
      <point x="-350.057781" y="-40.930992" z="4.060752"/>
      <normal i="0.758250" j="-0.590388" k="0.276584"/>
      <ball_radius>1.251170</ball_radius>
     </measured_point>
    </point_data>
    <point_data id="TOUCH_2_Datum_RC_raw">
     <measured_point>
      <point x="-350.029639" y="-40.902973" z="4.059664"/>
      <normal i="0.753523" j="-0.592812" k="0.284213"/>
      <ball_radius>1.251170</ball_radius>
     </measured_point>
    </point_data>
    <point_data id="TOUCH_3_Datum_RC_raw">
     <measured_point>
      <point x="-349.999657" y="-40.875501" z="4.058977"/>
      <normal i="0.758183" j="-0.588114" k="0.281569"/>
      <ball_radius>1.251170</ball_radius>
     </measured_point>
    </point_data>
</point_list>
</feature>