Coldfusion之xml构建(二)

<cfset DIR="#getDirectoryFromPath(getTemplatePath())#">
<cffile action="read" charset="utf-8" file="#DIR#imgList.XML" variable="imgListXMLFile">
<cfset atext=节点内容>
<cfset XMLinfo=节点标签属性>
<cfset XMLpath=节点标签属性>
<cfset id=id号>
<cfscript>
function AppendXMLNode(){
  var XMLDoc=XmlParse(imgListXMLFile);//新建xml对象
  var XMLquery=xmlDoc.xmlroot.XmlChildren;//确认自己的children路径
  var XMLLength=ArrayLen(XMLquery);//记录长度
  var text1=ArrayNew(1);//新建数据存储XML值
  var info=ArrayNew(1);
  var path=ArrayNew(1);
  MyDoc = XMLNew();//新建xml对象
  MyDoc.XMLRoot = XmlElemNew(MyDoc,"imgList");//新建root
  for(i=1;i le XMLLength; i=i+1){
        item=XMLquery[i];
        text1[i]=item.XMLtext;
  info[i]=item.XMLAttributes["info"];
  path[i]=item.XMLAttributes["path"];
  }
  ArrayInsertAt(text1,id,atext);//添加节点信息
  ArrayInsertAt(info,id,XMLinfo);
  ArrayInsertAt(path,id,XMLpath);
  ArrayAppendLeng=ArrayLen(text1);
  for(J=1;J le ArrayAppendLeng;J=J+1){
  MyDoc.imgList.XMLChildren[J] = XmlElemNew(MyDoc,"list");//将信息读入新建的xml对象
  MyDoc.imgList.XMLChildren[J].XmlTEXT = text1[J];
  MyDoc.imgList.XMLChildren[J].XmlAttributes["info"]=info[J];
  MyDoc.imgList.XMLChildren[J].XmlAttributes["path"]=path[J];
  }
        XML_info=text1;
  }
  appendXMLnode();  
}
</cfscript>
<cffile action="write" addnewline="no" charset="utf-8" file="#dir#imgList.XML" output="#toString(MyDoc)#">
<cfdump var="#XML_info#">