XML - Problema con XMLDOM y ASP

Estos haciendo con ASP un script que saque información de una base de datos, y la convierta en XML para cargarla en flash.

El problema esta al crear el XML, para ello utilizo el objeto de ASP: Microsoft.XMLDOM

------------------------------------------------------------------------------------------------

Set XMLDoc = Server.CreateObject("Microsoft.XMLDOM")

Set objCn = CreateObject("ADODB.Connection")
objCn.Mode=3
objCn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("../bd_access/BD.mdb") & ";User Id=;Password=;"
Set objRs = Server.CreateObject("ADODB.Recordset")

strSQL = "SELECT Nombr FROM tCarpeta ORDER BY Nombr, Fecha"
objRs.Open strSQL, objCn, 1
objRs.MoveFirst

'Añadimos el tag principal
Set XMLRoot = XMLDoc.createElement("XMLDocumentObject")

'Obtenemos info de la BD tabla Carpeta
strNombrBD_Carpeta = objRs("Nombr")

Set XMLChild = XMLDoc.createElement("Nombre")
Set txtNodo = XMLDoc.createTextNode(strNombrBD_Carpeta)
XMLChild.appendChild(txtNodo)



XMLDoc.appendChild XMLRoot

XMLDoc.Save "D:\Inetpub\wwwroot_pruebas\explorador de archivos\xml\arbolXML2.xml"

Set XMLChild = Nothing
Set field_BD = Nothing
Set objRs = Nothing
Set XMLDoc = Nothing

------------------------------------------------------------------------------------------------

¿Por qué no me añade más que la etiqueta:: <XMLDocumentObject/> ?

¿Como hago para añadir atributos con valor en cada nodo?

LO QUE TE FALTA ES CREAR UN NODO CON CREATENODE("","",""), ALCUAL DEBES AGREGAR EL XMLCHILD QUE EN EL FONDO INDICA UN TAG PARA EL NODO.
SALUDOS
ROBERTO