Jump to content
Sign in to follow this  
Mbee

Any simple way to get a SINGLE value from XML file?

Recommended Posts

Mbee

Okay, I'm still a relative newbie, and I just spent about 18 hours learning and coding up and debugging my very first AutoIt GUI from scratch (with two simultaneously active windows, too)! :sweating:

So I hope you'll understand that I'm too fatigued to try and learn the particularly complex subject of the XML DOM wrapper UDF and all the associated processing in AutoIt just now. :   Especially since all I need (and all I may ever need) is to obtain just a single value ("<SaveMovieTo>") from a local XML file!  Here are the contents of the XML file in question:

<?xml version="1.0" encoding="utf-8"?>
<Configuration>
    <MajorVersion>1</MajorVersion>
    <SubVersion>1</SubVersion>
    <General>
        <Language>0x0409</Language>
        <AppCurrentMode>0x0001</AppCurrentMode>
        <RunAtStartup>0</RunAtStartup>
        <SaveMovieTo>X:\Storage Folder</SaveMovieTo>
        <Transparency>0.855000</Transparency>
        <Profile>
        </Profile>
        <Skin>std</Skin>
        <Device>
        </Device>
        <StandbyOSD>0</StandbyOSD>
        <CaptureOSD>1</CaptureOSD>
        <SnapshotOSD>1</SnapshotOSD>
        <DiskOSD>1</DiskOSD>
        <StreamOSD>1</StreamOSD>
        <MicOSD>1</MicOSD>
        <TimeShiftMode>0</TimeShiftMode>
        <PreviewMute>0</PreviewMute>
    </General>
    <Stream>
        <ActiveService>
        </ActiveService>
    </Stream>
</Configuration>

I tried -- I really tried -- to read about the XML DOM wrapper UDF and how to use it, but I go so lost and confused that it looks like it would take a week or two to comprehend.  Would anyone be so kind as to just show me the code to get the "<SaveMovieTo>" value?  I'd very much appreciate it!

Share this post


Link to post
Share on other sites
orbs

check these out:

FileRead()
StringSplit()
_StringBetween()

the first one will read your file to a string; any of the other two will help you figure out what's in between the XML tags you are interested in.

Share this post


Link to post
Share on other sites
funkey

Global $sXML = '<?xml version=" 1.0" encoding=" utf - 8"?>' & @CRLF & _
        "<Configuration>" & @CRLF & _
        "    <MajorVersion>1</MajorVersion>" & @CRLF & _
        "    <SubVersion>1</SubVersion>" & @CRLF & _
        "    <General>" & @CRLF & _
        "        <Language>0x0409</Language>" & @CRLF & _
        "        <AppCurrentMode>0x0001</AppCurrentMode>" & @CRLF & _
        "        <RunAtStartup>0</RunAtStartup>" & @CRLF & _
        "        <SaveMovieTo>X:\Storage Folder</SaveMovieTo>" & @CRLF & _
        "        <Transparency>0.855000</Transparency>" & @CRLF & _
        "        <Profile>" & @CRLF & _
        "        </Profile>" & @CRLF & _
        "        <Skin>std</Skin>" & @CRLF & _
        "        <Device>" & @CRLF & _
        "        </Device>" & @CRLF & _
        "        <StandbyOSD>0</StandbyOSD>" & @CRLF & _
        "        <CaptureOSD>1</CaptureOSD>" & @CRLF & _
        "        <SnapshotOSD>1</SnapshotOSD>" & @CRLF & _
        "        <DiskOSD>1</DiskOSD>" & @CRLF & _
        "        <StreamOSD>1</StreamOSD>" & @CRLF & _
        "        <MicOSD>1</MicOSD>" & @CRLF & _
        "        <TimeShiftMode>0</TimeShiftMode>" & @CRLF & _
        "        <PreviewMute>0</PreviewMute>" & @CRLF & _
        "    </General>" & @CRLF & _
        "    <Stream>" & @CRLF & _
        "        <ActiveService>" & @CRLF & _
        "        </ActiveService>" & @CRLF & _
        "    </Stream>" & @CRLF & _
        "</Configuration>"


Global $Value = _XML_GetElementContent($sXML, "Configuration.General.SaveMovieTo")
ConsoleWrite("Error: " & @error & " - Value: " & $Value & @LF)


Func _XML_GetElementContent($sXML, $sPath)
    ;funkey 2014.06.25
    Local $sTemp, $aTemp
    Local $aPath = StringSplit($sPath, ".")
    $sTemp = $sXML

    For $i = 1 To $aPath[0]
        $aTemp = StringRegExp($sTemp, "(?s)(?i)<" & $aPath[$i] & "\b(.*?)</" & $aPath[$i] & ">", 3)
        If @error Then Return SetError($i, 0, "")
        $sTemp = StringStripWS(StringTrimLeft($aTemp[0], StringInStr($aTemp[0], ">")), 3)
    Next

    Return $sTemp
EndFunc   ;==>_XML_GetElementContent

Edit: Updated code to find XML elements with attributes as well.

Edited by funkey
  • Like 1

Programming today is a race between software engineers striving to
build bigger and better idiot-proof programs, and the Universe
trying to produce bigger and better idiots.
So far, the Universe is winning.

Share this post


Link to post
Share on other sites
jguinch

In this case (where SaveMovieTo appears just one time), you can simply extract the value with a _StringBetween() or a RegExp.

Local $SaveMovieTo = StringRegExpReplace($sXML, "(?is).+<SaveMovieTo>(.*?)</SaveMovieTo>.+", "$1")
ConsoleWrite($SaveMovieTo)

Share this post


Link to post
Share on other sites
boniakowski

It is my way.

very simple, maybe somone else have another more simple.

#include <Process.au3>
#include <Constants.au3>
#include <String.au3>
#include <Array.au3>



  ; Create a constant variable in Local scope of the filepath.
    Local Const $sFile = "C:\savemovie\savemovie.xml"

    ;if you know the line and never change it´s more simple
    $sLine=FileReadLine($sFile, 9)
    $sSearch=_StringBetween($sLine,"<SaveMovieTo>","</SaveMovieTo>")
    $sResult=_ArrayToString($sSearch,"")
    MsgBox(0,"",$sResult)

maybe this one help you.

or it´s the same with FileRead to read all the file instead a single line.

; Create a constant variable in Local scope of the filepath.
    Local Const $sFile = "C:\savemovie\savemovie.xml"

    ;Read all the file 
    $sLine=FileRead($sFile)
    $sSearch=_StringBetween($sLine,"<SaveMovieTo>","</SaveMovieTo>")
    $sResult=_ArrayToString($sSearch,"")
    MsgBox(0,"",$sResult)

Christian Boniakowski.

Edited by boniakowski

Share this post


Link to post
Share on other sites
jdelaney

XML.Dom:

Global $sXML = '<?xml version="1.0" encoding="utf-8"?>' & @CRLF & _
        "<Configuration>" & @CRLF & _
        "    <MajorVersion>1</MajorVersion>" & @CRLF & _
        "    <SubVersion>1</SubVersion>" & @CRLF & _
        "    <General>" & @CRLF & _
        "        <Language>0x0409</Language>" & @CRLF & _
        "        <AppCurrentMode>0x0001</AppCurrentMode>" & @CRLF & _
        "        <RunAtStartup>0</RunAtStartup>" & @CRLF & _
        "        <SaveMovieTo>X:\Storage Folder</SaveMovieTo>" & @CRLF & _
        "        <Transparency>0.855000</Transparency>" & @CRLF & _
        "        <Profile>" & @CRLF & _
        "        </Profile>" & @CRLF & _
        "        <Skin>std</Skin>" & @CRLF & _
        "        <Device>" & @CRLF & _
        "        </Device>" & @CRLF & _
        "        <StandbyOSD>0</StandbyOSD>" & @CRLF & _
        "        <CaptureOSD>1</CaptureOSD>" & @CRLF & _
        "        <SnapshotOSD>1</SnapshotOSD>" & @CRLF & _
        "        <DiskOSD>1</DiskOSD>" & @CRLF & _
        "        <StreamOSD>1</StreamOSD>" & @CRLF & _
        "        <MicOSD>1</MicOSD>" & @CRLF & _
        "        <TimeShiftMode>0</TimeShiftMode>" & @CRLF & _
        "        <PreviewMute>0</PreviewMute>" & @CRLF & _
        "    </General>" & @CRLF & _
        "    <Stream>" & @CRLF & _
        "        <ActiveService>" & @CRLF & _
        "        </ActiveService>" & @CRLF & _
        "    </Stream>" & @CRLF & _
        "</Configuration>"

$oXML = ObjCreate("Microsoft.XMLDOM")
$oXML.loadXML($sXML)
$oSaveMovieTo = $oXML.SelectSingleNode("//General/SaveMovieTo")
ConsoleWrite($oSaveMovieTo.text & @CRLF)
  • Like 1

IEbyXPATH-Grab IE DOM objects by XPATH IEscriptRecord-Makings of an IE script recorder ExcelFromXML-Create Excel docs without excel installed GetAllWindowControls-Output all control data on a given window.

Share this post


Link to post
Share on other sites
mikell

Something simple ...  :)

Global $sXML = '<?xml version=" 1.0" encoding=" utf - 8"?>' & @CRLF & _
        "<Configuration>" & @CRLF & _
        "    <MajorVersion>1</MajorVersion>" & @CRLF & _
        "    <SubVersion>1</SubVersion>" & @CRLF & _
        "    <General>" & @CRLF & _
        "        <Language>0x0409</Language>" & @CRLF & _
        "        <AppCurrentMode>0x0001</AppCurrentMode>" & @CRLF & _
        "        <RunAtStartup>0</RunAtStartup>" & @CRLF & _
        "        <SaveMovieTo>X:\Storage Folder</SaveMovieTo>" & @CRLF & _
        "        <Transparency>0.855000</Transparency>" & @CRLF & _
        "        <Profile>" & @CRLF & _
        "        </Profile>" & @CRLF & _
        "        <Skin>std</Skin>" & @CRLF & _
        "        <Device>" & @CRLF & _
        "        </Device>" & @CRLF & _
        "        <StandbyOSD>0</StandbyOSD>" & @CRLF & _
        "        <CaptureOSD>1</CaptureOSD>" & @CRLF & _
        "        <SnapshotOSD>1</SnapshotOSD>" & @CRLF & _
        "        <DiskOSD>1</DiskOSD>" & @CRLF & _
        "        <StreamOSD>1</StreamOSD>" & @CRLF & _
        "        <MicOSD>1</MicOSD>" & @CRLF & _
        "        <TimeShiftMode>0</TimeShiftMode>" & @CRLF & _
        "        <PreviewMute>0</PreviewMute>" & @CRLF & _
        "    </General>" & @CRLF & _
        "    <Stream>" & @CRLF & _
        "        <ActiveService>" & @CRLF & _
        "        </ActiveService>" & @CRLF & _
        "    </Stream>" & @CRLF & _
        "</Configuration>"

Msgbox(0,"", StringRegExp($sXML, '(?is)SaveMovieTo>([^<]+)', 3)[0] )

Share this post


Link to post
Share on other sites
Mbee

Wow, funkey, that's not only absolutely perfect for my needs, it's gorgeous! :thumbsup:

Please accept my deep thanks for your excellent work!  (Naturally, I will give full you full credit of authorship)

I love this community! :bye:

Global $sXML = '<?xml version=" 1.0" encoding=" utf - 8"?>' & @CRLF & _
        "<Configuration>" & @CRLF & _
        "    <MajorVersion>1</MajorVersion>" & @CRLF & _
        "    <SubVersion>1</SubVersion>" & @CRLF & _
        "    <General>" & @CRLF & _
        "        <Language>0x0409</Language>" & @CRLF & _
        "        <AppCurrentMode>0x0001</AppCurrentMode>" & @CRLF & _
        "        <RunAtStartup>0</RunAtStartup>" & @CRLF & _
        "        <SaveMovieTo>X:\Storage Folder</SaveMovieTo>" & @CRLF & _
        "        <Transparency>0.855000</Transparency>" & @CRLF & _
        "        <Profile>" & @CRLF & _
        "        </Profile>" & @CRLF & _
        "        <Skin>std</Skin>" & @CRLF & _
        "        <Device>" & @CRLF & _
        "        </Device>" & @CRLF & _
        "        <StandbyOSD>0</StandbyOSD>" & @CRLF & _
        "        <CaptureOSD>1</CaptureOSD>" & @CRLF & _
        "        <SnapshotOSD>1</SnapshotOSD>" & @CRLF & _
        "        <DiskOSD>1</DiskOSD>" & @CRLF & _
        "        <StreamOSD>1</StreamOSD>" & @CRLF & _
        "        <MicOSD>1</MicOSD>" & @CRLF & _
        "        <TimeShiftMode>0</TimeShiftMode>" & @CRLF & _
        "        <PreviewMute>0</PreviewMute>" & @CRLF & _
        "    </General>" & @CRLF & _
        "    <Stream>" & @CRLF & _
        "        <ActiveService>" & @CRLF & _
        "        </ActiveService>" & @CRLF & _
        "    </Stream>" & @CRLF & _
        "</Configuration>"


Global $Value = _XML_GetElementContent($sXML, "Configuration.General.SaveMovieTo")
ConsoleWrite("Error: " & @error & " - Value: " & $Value & @LF)


Func _XML_GetElementContent($sXML, $sPath)
    ;funkey 2014.06.25
    Local $sTemp, $aTemp
    Local $aPath = StringSplit($sPath, ".")
    $sTemp = $sXML

    For $i = 1 To $aPath[0]
        $aTemp = StringRegExp($sTemp, "(?s)(?i)<" & $aPath[$i] & "\b(.*?)</" & $aPath[$i] & ">", 3)
        If @error Then Return SetError($i, 0, "")
        $sTemp = StringStripWS(StringTrimLeft($aTemp[0], StringInStr($aTemp[0], ">")), 3)
    Next

    Return $sTemp
EndFunc   ;==>_XML_GetElementContent

Edit: Updated code to find XML elements with attributes as well.

Share this post


Link to post
Share on other sites
Mbee

Thanks, orbs.  I was thinking of doing something basic like that, but I wanted to wait to see other options...

check these out:

FileRead()
StringSplit()
_StringBetween()

the first one will read your file to a string; any of the other two will help you figure out what's in between the XML tags you are interested in.

Share this post


Link to post
Share on other sites
Mbee

Another nice and simple solution.  Thanks.

 

In this case (where SaveMovieTo appears just one time), you can simply extract the value with a _StringBetween() or a RegExp.

Local $SaveMovieTo = StringRegExpReplace($sXML, "(?is).+<SaveMovieTo>(.*?)</SaveMovieTo>.+", "$1")
ConsoleWrite($SaveMovieTo)

Share this post


Link to post
Share on other sites
Mbee

Thanks to you also, Christian.  I couldn't be sure the XML file would always look the same, though...

It is my way.

very simple, maybe somone else have another more simple.

#include <Process.au3>
#include <Constants.au3>
#include <String.au3>
#include <Array.au3>



  ; Create a constant variable in Local scope of the filepath.
    Local Const $sFile = "C:\savemovie\savemovie.xml"

    ;if you know the line and never change it´s more simple
    $sLine=FileReadLine($sFile, 9)
    $sSearch=_StringBetween($sLine,"<SaveMovieTo>","</SaveMovieTo>")
    $sResult=_ArrayToString($sSearch,"")
    MsgBox(0,"",$sResult)

maybe this one help you.

or it´s the same with FileRead to read all the file instead a single line.

; Create a constant variable in Local scope of the filepath.
    Local Const $sFile = "C:\savemovie\savemovie.xml"

    ;Read all the file 
    $sLine=FileRead($sFile)
    $sSearch=_StringBetween($sLine,"<SaveMovieTo>","</SaveMovieTo>")
    $sResult=_ArrayToString($sSearch,"")
    MsgBox(0,"",$sResult)

Christian Boniakowski.

Share this post


Link to post
Share on other sites
Mbee

I'm very grateful to you, jdelaney, for your contribution! Your gift gives me a good leg up on learning the powerful (if complex) XML Dom UDF...

 

XML.Dom:

Global $sXML = '<?xml version="1.0" encoding="utf-8"?>' & @CRLF & _
        "<Configuration>" & @CRLF & _
        "    <MajorVersion>1</MajorVersion>" & @CRLF & _
        "    <SubVersion>1</SubVersion>" & @CRLF & _
        "    <General>" & @CRLF & _
        "        <Language>0x0409</Language>" & @CRLF & _
        "        <AppCurrentMode>0x0001</AppCurrentMode>" & @CRLF & _
        "        <RunAtStartup>0</RunAtStartup>" & @CRLF & _
        "        <SaveMovieTo>X:\Storage Folder</SaveMovieTo>" & @CRLF & _
        "        <Transparency>0.855000</Transparency>" & @CRLF & _
        "        <Profile>" & @CRLF & _
        "        </Profile>" & @CRLF & _
        "        <Skin>std</Skin>" & @CRLF & _
        "        <Device>" & @CRLF & _
        "        </Device>" & @CRLF & _
        "        <StandbyOSD>0</StandbyOSD>" & @CRLF & _
        "        <CaptureOSD>1</CaptureOSD>" & @CRLF & _
        "        <SnapshotOSD>1</SnapshotOSD>" & @CRLF & _
        "        <DiskOSD>1</DiskOSD>" & @CRLF & _
        "        <StreamOSD>1</StreamOSD>" & @CRLF & _
        "        <MicOSD>1</MicOSD>" & @CRLF & _
        "        <TimeShiftMode>0</TimeShiftMode>" & @CRLF & _
        "        <PreviewMute>0</PreviewMute>" & @CRLF & _
        "    </General>" & @CRLF & _
        "    <Stream>" & @CRLF & _
        "        <ActiveService>" & @CRLF & _
        "        </ActiveService>" & @CRLF & _
        "    </Stream>" & @CRLF & _
        "</Configuration>"

$oXML = ObjCreate("Microsoft.XMLDOM")
$oXML.loadXML($sXML)
$oSaveMovieTo = $oXML.SelectSingleNode("//General/SaveMovieTo")
ConsoleWrite($oSaveMovieTo.text & @CRLF)

Share this post


Link to post
Share on other sites
Mbee

Thanks to you also, mikell!

 

Something simple ...  :)

Global $sXML = '<?xml version=" 1.0" encoding=" utf - 8"?>' & @CRLF & _
        "<Configuration>" & @CRLF & _
        "    <MajorVersion>1</MajorVersion>" & @CRLF & _
        "    <SubVersion>1</SubVersion>" & @CRLF & _
        "    <General>" & @CRLF & _
        "        <Language>0x0409</Language>" & @CRLF & _
        "        <AppCurrentMode>0x0001</AppCurrentMode>" & @CRLF & _
        "        <RunAtStartup>0</RunAtStartup>" & @CRLF & _
        "        <SaveMovieTo>X:\Storage Folder</SaveMovieTo>" & @CRLF & _
        "        <Transparency>0.855000</Transparency>" & @CRLF & _
        "        <Profile>" & @CRLF & _
        "        </Profile>" & @CRLF & _
        "        <Skin>std</Skin>" & @CRLF & _
        "        <Device>" & @CRLF & _
        "        </Device>" & @CRLF & _
        "        <StandbyOSD>0</StandbyOSD>" & @CRLF & _
        "        <CaptureOSD>1</CaptureOSD>" & @CRLF & _
        "        <SnapshotOSD>1</SnapshotOSD>" & @CRLF & _
        "        <DiskOSD>1</DiskOSD>" & @CRLF & _
        "        <StreamOSD>1</StreamOSD>" & @CRLF & _
        "        <MicOSD>1</MicOSD>" & @CRLF & _
        "        <TimeShiftMode>0</TimeShiftMode>" & @CRLF & _
        "        <PreviewMute>0</PreviewMute>" & @CRLF & _
        "    </General>" & @CRLF & _
        "    <Stream>" & @CRLF & _
        "        <ActiveService>" & @CRLF & _
        "        </ActiveService>" & @CRLF & _
        "    </Stream>" & @CRLF & _
        "</Configuration>"

Msgbox(0,"", StringRegExp($sXML, '(?is)SaveMovieTo>([^<]+)', 3)[0] )

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Similar Content

    • bhns
      By bhns
      try it for make flyers old games xml + Gdi, i belive many sources had lost 
      AIT-ADRLIST.au3

    • CosminV
      By CosminV
      Hello guys,
       
      This XML things are driving me crazy...
      Please let me know how can I use the _XMLGetAttrib function... I've tried every possible way that I've read on the forum and I cannot succeed reading an attribute.
       
      The XML looks like bellow:
       
      <?xml version="1.0" encoding="UTF-8"?>
      <BATCH attr1= "aaa" attr2="bbb" attr3="ccc">
           <Node1 attr1="aaa" attr2="bbb" attr3="ccc" attr4="ddd" attr5="" attr6="eee" attr7="fff" attr8="ggg"/>
           <Node2 attr1="aaa" attr2="" attr3="" attr4="ddd"/>
           <Node3 attr1="" attr2="" attr3="ccc" attr4="" attr5="" attr6="eee"/>
           <Panel attr1="aaa" STATUS="BBB" attr3="ccc" attr4="ddd" attr5="" attr6="eee">
                <Node5 attr1="aaa" attr2="bbb" attr3="ccc" attr4="ddd" attr5="" attr6="eee" attr7="fff" attr8="ggg"/>
                .............................................................................................................................................................................
           </Panel>
      </Batch>
       
      I need to read the value of STATUS form the Panel node.
       
      Could you please help me?
       
      Best regards,
      Cococnb
    • Subz
      By Subz
      Can anyone assist with creating/modify/delete XML Nodes/Child Nodes?
      Have a document for example:
      <ConfigData> <parameter> <name>Setting One</name> <value>10</value> </parameter> <parameter> <name>IPAddress</name> <value>192.168.1.1</value> </parameter> <parameter> <name>Setting One</name> <value>200</value> </parameter> <parameter> <name>Setting Three</name> <value>300</value> </parameter> </ConfigData> Would like to add another node parameter/name, parameter/value, but unsure how to, when there are multiple instances with the same tagname for example, would like to add the following if the nodes do not already exist:
      <parameter> <name>UserPreferredLanguage</name> <value>English</value> </parameter> Currently using the following to check and delete/modify existing nodes, was thinking of placing the name and value into a 2d array and then using a true/false in a 3rd column to return if the setting was found and modified or not, so I can decide whether I need to create the nodes or not, but I'm hoping there is a simpler way.\
      Any assistance would be much appreciated.
      PS: Have also written this with the XML Dom Wrapper UDF but still unsure how to proceed with checking nodes and creating them if they're missing, also couldn't find a function to delete a full node + parent using selectNodes, hence the custom __XML_DeleteNode function.
      Thanks
      Local $sXMLDocPath = @ScriptDir & "\XMLDoc.xml" Local $oXMLDoc = ObjCreate("MSXML2.DOMDocument") $oXMLDoc.validateOnParse = False $oXMLDoc.load($sXMLDocPath) Local $oXMLNodes = $oXMLDoc.selectNodes("ConfigData/parameter") If IsObj($oXMLNodes) Then For $oXMLNode In $oXMLNodes If $oXMLNode.childNodes.item(0).tagName = "Name" And $oXMLNode.childNodes.item(0).Text = "Setting One" Then If $oXMLNode.childNodes.item(1).tagName = "Value" Then $oXMLNode.childNodes.item(1).Text = 10 EndIf If $oXMLNode.childNodes.item(0).tagName = "Name" And $oXMLNode.childNodes.item(0).Text = "IPAddress" Then __XML_DeleteNode($oXMLNode) EndIf If $oXMLNode.childNodes.item(0).tagName = "Name" And $oXMLNode.childNodes.item(0).Text = "Setting Two" Then If $oXMLNode.childNodes.item(1).tagName = "Value" Then $oXMLNode.childNodes.item(1).Text = 20 EndIf If $oXMLNode.childNodes.item(0).tagName = "Name" And $oXMLNode.childNodes.item(0).Text = "Setting Three" Then If $oXMLNode.childNodes.item(1).tagName = "Value" Then $oXMLNode.childNodes.item(1).Text = 30 EndIf Next EndIf $oXMLDoc.Save ($sXMLDocPath) Func __XML_DeleteNode($_oNode_Enum) If $_oNode_Enum.hasChildNodes Then For $_oNode_Enum_Child In $_oNode_Enum.childNodes If $_oNode_Enum_Child.nodeType = $XML_NODE_TEXT Then If StringStripWS($_oNode_Enum_Child.text, $STR_STRIPLEADING + $STR_STRIPTRAILING + $STR_STRIPSPACES) = "" Then $_oNode_Enum.removeChild($_oNode_Enum_Child) EndIf EndIf Next EndIf $_oNode_Enum.parentNode.removeChild($_oNode_Enum) EndFunc  
    • PedroWarlock
      By PedroWarlock
      (GOOGLE TRANSLATOR) Sorry: /
      Sorry, there is no new difficulty to organize my reading system, I need an XLM file like that, which is the problem with 30 thousand lines, is this, I need to find the value "Difficulty" and "live" and tell the program what's with the "default =" yes "" not <dipvalue>, can anyone have an example of how I wanted to do this? An example is enough to do this.
      example.au3
      #include <Array.au3> #include "XML.au3" _Example() Func _Example() Local $oXML = _XML_CreateDOMDocument(Default) Local $sXML_Content =@ScriptDir & "\file.xml" _XML_Load($oXML, $sXML_Content) ; ~ _XML_LoadXML($oXML, $sXML) Local $iNodeCount = _XML_GetNodesCount($oXML, "/mame/game") ConsoleWrite("Group(s): $iNodeCount = " & $iNodeCount & "; @error = " & @error & "; @extended = " & @extended & @LF) Local $aNames = _XML_GetValue($oXML, "/mame/game/description") Local $aTaxCountries = _XML_GetValue($oXML, "/mame/game/manufacturer") Local $aData[$iNodeCount + 1][4] = [[$iNodeCount, "", ""]] For $n = 1 To $iNodeCount Local $oNode_Selected_SingleOne = _XML_SelectSingleNode($oXML, '/mame/game/dipswitch[' & $n & ']') Local $sAttribute_Value = _XML_GetNodeAttributeValue($oNode_Selected_SingleOne, 'name') Local $oNode_Selected_SingleOne2 = _XML_SelectSingleNode($oXML, '/mame/game/dipswitch/dipvalue[' & $n & ']') Local $sAttribute_Value2 = _XML_GetNodeAttributeValue($oNode_Selected_SingleOne2, 'name') $aData[$n][0] = $aNames[$n] $aData[$n][1] = $aTaxCountries[$n] $aData[$n][2] = $sAttribute_Value $aData[$n][3] = $sAttribute_Value2 Next _ArrayDisplay($aData, "$aData") EndFunc ;==>_Example  
      file.xml
      <mame build="0.124a BRarcade(Mar 31 2008)" debug="no"> <game name="puckman" sourcefile="pacman.c"> <description>PuckMan (Japan set 1, Probably Bootleg)</description> <dipswitch name="Service Mode"> <dipvalue name="Off" default="yes"/> <dipvalue name="On"/> </dipswitch> <dipswitch name="Cabinet"> <dipvalue name="Upright" default="yes"/> <dipvalue name="Cocktail"/> </dipswitch> <dipswitch name="Coinage"> <dipvalue name="2 Coins/1 Credit"/> <dipvalue name="1 Coin/1 Credit" default="yes"/> <dipvalue name="1 Coin/2 Credits"/> <dipvalue name="Free Play"/> </dipswitch> <dipswitch name="Lives"> <dipvalue name="1"/> <dipvalue name="2"/> <dipvalue name="3" default="yes"/> <dipvalue name="5"/> </dipswitch> <dipswitch name="Bonus Life"> <dipvalue name="10000" default="yes"/> <dipvalue name="15000"/> <dipvalue name="20000"/> <dipvalue name="None"/> </dipswitch> <dipswitch name="Difficulty"> <dipvalue name="Normal" default="yes"/> <dipvalue name="Hard"/> </dipswitch> </game> <game name="puckmana" sourcefile="pacman.c" cloneof="puckman" romof="puckman"> <description>PuckMan (Japan set 2)</description> <dipswitch name="Rack Test (Cheat)"> <dipvalue name="Off" default="yes"/> <dipvalue name="On"/> </dipswitch> <dipswitch name="Service Mode"> <dipvalue name="Off" default="yes"/> <dipvalue name="On"/> </dipswitch> <dipswitch name="Cabinet"> <dipvalue name="Upright" default="yes"/> <dipvalue name="Cocktail"/> </dipswitch> <dipswitch name="Coinage"> <dipvalue name="2 Coins/1 Credit"/> <dipvalue name="1 Coin/1 Credit" default="yes"/> <dipvalue name="1 Coin/2 Credits"/> <dipvalue name="Free Play"/> </dipswitch> <dipswitch name="Lives"> <dipvalue name="1"/> <dipvalue name="2"/> <dipvalue name="3" default="yes"/> <dipvalue name="5"/> </dipswitch> <dipswitch name="Difficulty"> <dipvalue name="Normal" default="yes"/> <dipvalue name="Hard"/> </dipswitch> </game> <game name="puckmanf" sourcefile="pacman.c" cloneof="puckman" romof="puckman"> <dipswitch name="Cabinet"> <dipvalue name="Upright" default="yes"/> <dipvalue name="Cocktail"/> </dipswitch> <dipswitch name="Lives"> <dipvalue name="1"/> <dipvalue name="2"/> <dipvalue name="3" default="yes"/> <dipvalue name="5"/> </dipswitch> <dipswitch name="Difficulty"> <dipvalue name="Normal" default="yes"/> <dipvalue name="Hard"/> </dipswitch> <dipswitch name="Ghost Names"> <dipvalue name="Normal" default="yes"/> <dipvalue name="Alternate"/> </dipswitch> </game> <game name="puckmanh" sourcefile="pacman.c" cloneof="puckman" romof="puckman"> <dipswitch name="Coinage"> <dipvalue name="2 Coins/1 Credit"/> <dipvalue name="1 Coin/1 Credit" default="yes"/> <dipvalue name="1 Coin/2 Credits"/> <dipvalue name="Free Play"/> </dipswitch> <dipswitch name="Lives"> <dipvalue name="1"/> <dipvalue name="2"/> <dipvalue name="3" default="yes"/> <dipvalue name="5"/> </dipswitch> <dipswitch name="Bonus Life"> <dipvalue name="10000" default="yes"/> <dipvalue name="15000"/> <dipvalue name="20000"/> <dipvalue name="None"/> </dipswitch> <dipswitch name="Difficulty"> <dipvalue name="Normal" default="yes"/> <dipvalue name="Hard"/> </dipswitch> </game> <game name="pacman" sourcefile="pacman.c" cloneof="puckman" romof="puckman"> <dipswitch name="Cabinet"> <dipvalue name="Upright" default="yes"/> <dipvalue name="Cocktail"/> </dipswitch> <dipswitch name="Coinage"> <dipvalue name="2 Coins/1 Credit"/> <dipvalue name="1 Coin/1 Credit" default="yes"/> <dipvalue name="1 Coin/2 Credits"/> <dipvalue name="Free Play"/> </dipswitch> <dipswitch name="Lives"> <dipvalue name="1"/> <dipvalue name="2"/> <dipvalue name="3" default="yes"/> <dipvalue name="5"/> </dipswitch> <dipswitch name="Bonus Life"> <dipvalue name="10000" default="yes"/> <dipvalue name="15000"/> <dipvalue name="20000"/> <dipvalue name="None"/> </dipswitch> </game> <game name="pacmanf" sourcefile="pacman.c" cloneof="puckman" romof="puckman"> <dipswitch name="Coinage"> <dipvalue name="2 Coins/1 Credit"/> <dipvalue name="1 Coin/1 Credit" default="yes"/> <dipvalue name="1 Coin/2 Credits"/> <dipvalue name="Free Play"/> </dipswitch> <dipswitch name="Lives"> <dipvalue name="1"/> <dipvalue name="2"/> <dipvalue name="3" default="yes"/> <dipvalue name="5"/> </dipswitch> <dipswitch name="Bonus Life"> <dipvalue name="10000" default="yes"/> <dipvalue name="15000"/> <dipvalue name="20000"/> <dipvalue name="None"/> </dipswitch> <dipswitch name="Difficulty"> <dipvalue name="Normal" default="yes"/> <dipvalue name="Hard"/> </dipswitch> <dipswitch name="Ghost Names"> <dipvalue name="Normal" default="yes"/> <dipvalue name="Alternate"/> </dipswitch> <driver status="good" emulation="good" color="good" sound="good" graphic="good" savestate="supported" palettesize="512"/> </game> </mame>
    • Simpel
      By Simpel
      Hi. I'm trying to write a xml. Here is my code:
      #include <_XMLDomWrapper.au3> #include <Date.au3> Global $g_sXMLFileName Global $g_sDestPath = @DesktopDir & "\" Global $g_sReturnedBID = "A10829" _makeXML() _AddXML(1, "A10829_Thomas/wav/T001.wav") _AddXML(2, "A10829_Thomas/wav/T002.wav") Exit Func _makeXML() Local $sXMLtime = StringReplace(StringReplace(StringReplace(_NowCalc()," ","_"),":","-"),"/","-") ; in yyyy-mm-dd_hh-mm-ss $g_sXMLFileName = $g_sDestPath & $g_sReturnedBID & "_" & "EB-Ton-Upload" & "_" & $sXMLtime & ".xml" _XMLCreateFile($g_sXMLFileName, "gemagvl", 1,1) _XMLFileOpen($g_sXMLFileName) EndFunc Func _AddXML($iCount, $sDateiname) _XMLCreateRootNodeWAttr("row", "count", $iCount, "") _XMLCreateChildNode("//row", "picklistenname", $g_sReturnedBID & "_EB-Ton-Upload") _XMLCreateChildNode("//row", "picklisteninfo") _XMLCreateChildNode("//row", "bid", $g_sReturnedBID) _XMLCreateChildNode("//row", "audiodateiname", $sDateiname) _XMLCreateChildNode("//row", "titel", StringTrimRight(StringTrimLeft($sDateiname, 7), 4)) _XMLCreateChildNode("//row", "interpret", "EB") _XMLCreateChildNode("//row", "quelle", "Ton") EndFunc It returns:
      <?xml version="1.0" encoding="UTF-8"?><gemagvl> <row count="1"> <picklistenname>A10829_EB-Ton-Upload</picklistenname> <picklisteninfo/> <bid>A10829</bid> <audiodateiname>A10829_Thomas/wav/T001.wav</audiodateiname> <titel>Thomas/wav/T002</titel> <interpret>EB</interpret> <quelle>Ton</quelle> <picklistenname>A10829_EB-Ton-Upload</picklistenname> <picklisteninfo/> <bid>A10829</bid> <audiodateiname>A10829_Thomas/wav/T002.wav</audiodateiname> <titel>Thomas/wav/T003</titel> <interpret>EB</interpret> <quelle>Ton</quelle> </row> <row count="2"> <picklistenname>A10829_EB-Ton-Upload</picklistenname> <picklisteninfo/> <bid>A10829</bid> <audiodateiname>A10829_Thomas/wav/T002.wav</audiodateiname> <titel>Thomas/wav/T003</titel> <interpret>EB</interpret> <quelle>Ton</quelle> </row> </gemagvl> But it should return:
      <?xml version="1.0" encoding="UTF-8"?><gemagvl> <row count="1"> <picklistenname>A10829_EB-Ton-Upload</picklistenname> <picklisteninfo/> <bid>A10829</bid> <audiodateiname>A10829_Thomas/wav/T001.wav</audiodateiname> <titel>Thomas/wav/T002</titel> <interpret>EB</interpret> <quelle>Ton</quelle> </row> <row count="2"> <picklistenname>A10829_EB-Ton-Upload</picklistenname> <picklisteninfo/> <bid>A10829</bid> <audiodateiname>A10829_Thomas/wav/T002.wav</audiodateiname> <titel>Thomas/wav/T003</titel> <interpret>EB</interpret> <quelle>Ton</quelle> </row> </gemagvl> The second inserted nodes are double. How will it be going right?
      Regards, Conrad
×