AutoIT Xml text auslesen

Hallo Leute

bitte um Hilfe:

Wie kann ich von der AutoIT ein aus der XML-File text auslesen

XML:

Zitat

- <list:Daten DokID="0903AAAE2445" Modul="Zuschlag" TStamp="2009-03-18T17:06:18" Vers="2.0">
<bl:Titel>Zuschlagsverrechnungsliste</bl:Titel>
- <bm:Zuschlag ZZ="500902"> <<<---- die Ziele möchte ich auslesen
- <bl:Periode Bez="Februar 2009">

AutoIT:

#include <_XMLDomWrapper.au3>
Search("c:\XML\", "xml");replace with your search directory and file extension required

Func Search($current, $ext)
Local $search = FileFindFirstFile($current & "\*.*")

While 1
Local $file = FileFindNextFile($search)
If @error Or StringLen($file) < 1 Then ExitLoop
If Not StringInStr(FileGetAttrib($current & "\" & $file), "D") And ($file <> "." Or $file <> "..") Then
If StringRight($current & "\" & $file, StringLen($ext)) = $ext Then
MsgBox(0, "Dateiendung ", $file)
MsgBox(4096, "Dateiname", StringTrimRight ($file, 4))
$FileOpen = FileOpen($current & $file, 0)
MsgBox(4096, "Dateiinhalt", FileReadLine($FileOpen,"???"))
; Hier kopieren, löschen, umbennen etc.
EndIf
EndIf
If StringInStr(FileGetAttrib($current & "\" & $file), "D") And ($file <> "." Or $file <> "..") Then
Search($current & "\" & $file, $ext)
EndIf
WEnd
FileClose($search)
EndFunc ;==>Search

Edit peethebee: Tags gesetzt.

Edit BugFix: Falsches Forum ==> verschieb