<list>
<l title="音乐">
<m type="" src="test.mp3" lrc="">mp3音频</m>
</l>
</list>
$strSourceFile = "list.xml"
$brstr= chr(13)
Func A_xml($m);添加记录函数
$objXML = ObjCreate("Microsoft.XMLDOM");创建XML对像
$sFile = $objXML.load($strSourceFile);把XML文件读入内存中
$objRootlist = $objXML.documentElement.selectSingleNode("l");选取<l>节点
$XMLnode = $brstr&"<m>"&$m&"</m>"&chr(13)
$objXML2= ObjCreate("Microsoft.XMLDOM");建立一个新XML对像
$objXML2.loadXML($XMLnode);把XML版片段读入内存中
$rootNewNode=$objXML2.documentElement;获得objXML2的根节点
$objRootlist.appendChild($rootNewNode);把XML片段插入到xml中
$objXML.save($strSourceFile);存储xml文件(因为不存储xml只在内存中更新了)
EndFunc
$1=" type="" """
$2=" src="" """
$3=" lrc="" ""mp3音频"
A_xml($1&$2&$3)
上面的代码是rho123的XML 通讯录中修改的 运行后是以下的效果
<list>
<l title="音乐">
<m> type=" " src=" " lrc=" "mp3音频</m>
</l>
</list>
[ 本帖最后由 qq342252004 于 2008-7-9 07:02 编辑 ] |