string replacement error

[Thornhunt]

ok i have a rather large database and i wanted to clean it up a little (remove the unneeded html)

so i wipped to gether a little prog to do it for me as the database has 53000 sections alone never mind the keys for each section

the script i wrote should basicly;

read the string, find the text inbetween said html

replace that text,

then replace the said html

then rewrite to the ini file

EG

piece of data

[winnable]
1= Possible to win or achieve: <span class="illustration">a winnable election campaign; winnable games.</span>
2= capable of being won: <span class="illustration"> a winnable war.</span>

 

string  = Possible to win or achieve: <span class="illustration">a winnable election campaign; winnable games.</span>

after first replace

string  = Possible to win or achieve: <span</span>

after second replace

string = Possible to win or achieve:

new data

[winnable]
1= Possible to win or achieve:
2= capable of being won: <span class="illustration"> a winnable war.</span>

 

however it is returning like this

[winnable]
1=
2= capable of being won: <span class="illustration"> a winnable war.</span>

 

any chance a second pair of eyes could help me ?

expandcollapse popup

#include <Array.au3>

#Include <String.au3>



$ini = "data.ini"





$secnames = IniReadSectionNames ($ini)



For $i = 1 To $secnames[0] step 1

        $key = IniReadSection($ini,$secnames[$i])

            for $p = 1 To $key[0][0] step 1

                $sb = _StringBetween($key[$p][1],'<span', '</span>')

                For $x = 0 to UBound($sb) - 1 step 1

                    $key1 = StringReplace($key,$sb[$x],"")

                    $key2 = StringReplace($key1,"<span","")

                    $key3 = StringReplace($key2,"</span>","")

                    IniWrite($ini,$secnames[$i],$key[$p][0],$key3)

                next

            Next

    Next

Edited November 21, 2013 by Thornhunt

[Melba23]

Thornhunt,

This seems to do the trick:

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

$ini = "data.ini"

$secnames = IniReadSectionNames($ini)

For $i = 1 To $secnames[0]

    $key = IniReadSection($ini, $secnames[$i])
    For $p = 1 To $key[0][0]
        IniWrite($ini, $secnames[$i], $key[$p][0], StringRegExpReplace($key[$p][1], "^(.*)\s<span.*$", "$1"))
    Next
Next

$sData = FileRead($ini)
MsgBox($MB_SYSTEMMODAL, "New ini", $sData)

M23

[mikell]

$string  = 'Possible to win or achieve: <span class="illustration">a winnable election campaign; winnable games.</span>'

msgbox(0,"", StringLeft($string, StringInStr($string, ":")))

[Thornhunt]

  On 11/21/2013 at 3:55 PM, mikell said:

$string  = 'Possible to win or achieve: a winnable election campaign; winnable games.'msgbox(0,"", StringLeft($string, StringInStr($string, ":")))

this would normally work though some of the keys contain multiple span tags or have the span tags first then the required data after. Cheers though  

  On 11/21/2013 at 3:09 PM, Melba23 said:

Thornhunt,This seems to do the trick:

#include #include #include $ini = "data.ini"$secnames = IniReadSectionNames($ini)For $i = 1 To $secnames[0] $key = IniReadSection($ini, $secnames[$i])  For $p = 1 To $key[0][0]        IniWrite($ini, $secnames[$i], $key[$p][0], StringRegExpReplace($key[$p][1], "^(.*)\s<span.*$", "$1"))   NextNext$sData = FileRead($ini)MsgBox($MB_SYSTEMMODAL, "New ini", $sData)

M23

This looks promising as usual Melb, will test when I get home as I'm currently sat on a train lol. Will keep you guys updated

[Melba23]

Thornhunt,

 

  Quote

some of the keys contain multiple span tags or have the span tags first then the required data after

Then what I have suggested will almost certainly not work.

How many times do I have to ask that people give us ALL the required information at the beginning of a thread so that we do not waste time producing code that, although it caters for the (partially explained) problem as posted, stands no chance of being a complete solution?

Please post a representative collection of your data that covers ALL likely instances - then you might get a useful reply.

M23

[mikell]

Melba,

Furthermore, did you appreciate this delightful comment - your solution looking much better than mine - while the approach is the same in both cases