StringMid

[Vindicator209]

Oookk.... just a small question, can you use string mid to extract a single character from a string?

Heres my script, I dont know why its putting me into a never ending loop, I put a single msgbox in there, and it comes up more times then I put in letters...

$Input2=GUICtrlRead($Input)
            $Count=StringLen($Input2)
            $A=1
            Do
                                MsgBox(0,"",$A)
                $letter=StringMid($Input,$A,$A)
                FileWriteLine("temp.txt",'<img src="http://m3.pimpmyspace.org/cursors/l/'&GUICtrlRead($StyleList)&'/'&$letter&'.gif">')
            Until $A = $Count
            _IENavigate($oIE, "about:blank", 0)
            _IEDocWriteHTML ($oIE, FileRead("temp.txt"))
            GUICtrlSetData($Code, FileRead("temp.txt"))
            FileDelete("temp.txt")

Edited June 4, 2007 by MethodZero

[/dev/null]

if $A never changes, how can it ever be equal to $Count ??

[MrCreatoR]

Hi,

Just put this to the end of your loop:

$A += 1

[Vindicator209]

arrghhh lol -.-' I forgot that...

thanks alot =)

[Vindicator209]

ahhh and one more question(the same one) how would you use string mid to extract a single character?

I tried taking 2 letters, and taking off the next, but that doesn't work, plus it would error at the end of the string...Thanks fo the help=P

$Input2=GUICtrlRead($Input)
            $Count=StringLen($Input2)
            $A=1
            Do
                $letter=StringMid($Input,$A,$A+1)
                MsgBox(0,"",$letter)
                $letter=StringTrimRight($letter,1)
                MsgBox(0,"",$letter)
                FileWriteLine("temp.txt",'<img src="http://m3.pimpmyspace.org/cursors/l/'&GUICtrlRead($StyleList)&'/'&$letter&'.gif">')
                $A = $A + 1
            Until $A = $Count
            _IENavigate($oIE, "about:blank", 0)
            _IEDocWriteHTML ($oIE, FileRead("temp.txt"))
            GUICtrlSetData($Code, FileRead("temp.txt"))
            FileDelete("temp.txt")

[MrCreatoR]

how would you use string mid to extract a single character?

$String = "test"

$Letter = StringMid($String, 2, 1)

$Letter now equel e

;Examp #2

$String = "test"

$Letter = StringMid($String, 3, 1)

$Letter now equel s

See help file

[Vindicator209]

ahhh, lol thanks