Classic ASP -> Attribute ansprechen?

[Jan]

Hallo Leute,

darf hier in der Firma was mit klassischem noch auf VB6 basierendem ASP machen.

Und zwar soll ich ein XML-File auslesen. Auf aspheute.com hab ich folgendes Script gefunden:

<%
  Set XMLDoc = Server.CreateObject("Microsoft.XMLDOM")
  XMLDoc.async = False

strXMLLocation = Server.MapPath("currentarticles.xml")

bSuccess = XMLDoc.load(strXMLLocation)
  If Not bSuccess Then
   Response.Write "Loading the XML file <b>" & strXMLLocation & "</b> failed!"
 Response.End
  End If

Set rootNode = XMLDoc.documentElement

If rootNode.hasChildNodes() Then
   Response.Write "<table border=""0"" width=""500"" cellspacing=""5"">"
   For Each article in rootNode.childNodes
  strTitle =  article.childNodes(0).text  ' title
  strAuthor = article.childNodes(1).text  ' author
  strURL =  article.childNodes(2).text  ' url
  strDate = article.childNodes(3).text  ' date
  strDescription = article.childNodes(4).text ' description

Response.Write "<tr><td>"
  Response.Write "<font size=1><b>[" & strDate & "]</b></font>&nbsp;"
  Response.Write "<a href=""" & strURL & """>" & strTitle & "</a>"
  Response.Write "</td></tr>" & vbCrlf
 Next
 Response.Write "</table>"
  Else
   Response.Write "Sorry, no current articles were downloaded from AspHeute.com"
  End If
%>

Mein Problem: Hier werden keine Attribute angesprochen, im Nachsatz erwähnt der Autor, dass er das in einen anderen Artikel einbaut, jedoch ist dieser unauffindbar.

Kann mir hier jemand weiterhelfen?

lg, Jan