How to count string in file

[NaPeK]

Hi i need to count "<" and "/>" in xml file and check if they number is even number then show message box

how to do it ???

[SadBunny]

Hi i need to count "<" and "/>" in xml file and check if they number is even number then show message box

how to do it ???

Check the help for examples of StringInStr() and/or StringRegExp() (the latter is harder to formulate, but if done, way cleaner and shorter). Both can give you the number of occurences of some string (only StringInStr() will require some looping).

[NaPeK]

tryed already with no results... thats why asking for help

[jvanegmond]

StringSplit also returns the amount of > and <

[NaPeK]

MyNameIs i tryed to fit your code here

Func Load()
    $Load = FileOpenDialog("Choose file" , @ScriptDir , "XML file (*.xml)")
    If @error Then
    MsgBox(4096,"","No file(s) choosed")
    Exit
    Else

; here code

    EndIf
EndFunc

but all the time it returns me values 1 and how to check if returned value is even number ?

[Gif]

MyNameIs i tryed to fit your code here

Func Load()
    $Load = FileOpenDialog("Choose file" , @ScriptDir , "XML file (*.xml)")
    If @error Then
    MsgBox(4096,"","No file(s) choosed")
    Exit
    Else

; here code

    EndIf
EndFunc

but all the time it returns me values 1 and how to check if returned value is even number ?

do this:

Func Load()
$Load = FileOpenDialog("Choose file" , @ScriptDir , "XML file (*.xml)", 1)
If Not @error Then
$op = FileOpen($Load, 0)
$string = FileRead($op)
StringRegExpReplace($string, "\<", "")
$replaced1 = @extended
StringRegExpReplace($string, "\\>", "")
$replaced2 = @extended
MsgBox(0, 0, "There are " & $replaced1 & " < and" & $replaced2 & " /> in $string")
FileClose($op)
EndIf
EndFunc

Edited August 7, 2007 by Gif

[NaPeK]

thx now workin ...