如何修改.xml 字段的值？

qq4045728 · 发表于 2012-7-7 18:53:24

<?xml version="1.0" encoding="utf-8"?><main>
<Item configversion="18" homepagetype="3" cleanaccountdata="TRUE" DynamarkEnable="FALSE" DynamarkBubble="FALSE" DynamarkFavOfen="FALSE" DynamarkStartPage="FALSE" DynamarkUseRss="TRUE" DynamarkYellow="FALSE" UserInstruct="00000000000100000000000010" showtime="TRUE"></Item></main>

上面内容，如：homepagetype="3" 如何将它改成 homepagetype="5"

lixiaolong · 发表于 2012-7-8 00:23:56

本帖最后由 lixiaolong 于 2012-7-8 00:25 编辑

用正则可以替换内容.

$open = FileOpen("如何修改.xml")
$read = FileRead($open)
FileClose($open)

Local $Test = StringRegExpReplace($read, '(?<=homepagetype=")[^"]+', '5')

$open = FileOpen("如何修改.xml", 2)
FileWrite($open, $Test)
FileClose($open)

heavenm · 发表于 2012-7-8 02:30:56

#include <_XMLDomWrapper.au3>
UDF不知道有没有提供修改的
没人汉化啊

neekh · 发表于 2012-7-8 03:24:24

学习学习！！

shqf · 发表于 2012-7-8 09:50:04

本帖最后由 shqf 于 2012-7-8 09:58 编辑

#include <_XMLDomWrapper.au3>
Local $oXMLDoc = _XMLFileOpen(@ScriptDir & "\1.xml")
GetAttrib("value")
_XMLSetAttrib("main/Item", "homepagetype", "5");设置新的属性值
GetAttrib("new value")
Func GetAttrib($str)
        $attValue = _XMLGetAttrib("/main/Item", "homepagetype")
        MsgBox(0, "homepagetype", $str & "=" & $attValue)
EndFunc   ;==>GetAttrib

haijie1223 · 发表于 2012-7-8 17:28:53

回复 5# shqf

又收集了一个udf，谢谢！

		自动登录	找回密码
密码			加入

[效率算法] 如何修改.xml 字段的值？

相关帖子