MSGBox error.

[Crxo]

Hello. I need help. Well, I wrote a script that looks for a given phrase, refreshes the page, and so until it finds a specific word. The problem arises when the word is on the page and the program does not display MsgBox. I would ask very sincerely for help. How to remedy that when given the text will no longer refresh the page and displays MSgBox.

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$ie = _IECreate("www.111111.com")
$bodytext = _IEBodyReadText($ie)
$find = StringInStr($bodytext, "lol")
If $find <> 0 Then Exit
_IENavigate($ie, "www.111111.com/2222/")
While 1
$bodytext = _IEBodyReadText($ie)
$find = StringInStr($bodytext, "refresh")
If $find <> 0 Then MsgBox(0,"Znalazłem!","Postać znaleziona")
_IENavigate($ie, "www.111111.com/2222/")
WEnd
EndSwitch
WEnd

[Bert]

You may want to try MsgBox(0,$find,$bodytext) to see if what you are doing is really working.

[Melba23]

Crxo,

I think the error is in your code, not in MsgBox.

With this line:

If $find <> 0 Then Exit

your script exits if it finds the word you are looking for the first page - so you never get to the second page to search if the first search is successful. Is that what you want? Because the rest of the code works perfectly for me with the Autoit site:

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            $ie = _IECreate("www.autoitscript.com/autoit3/")
            $bodytext = _IEBodyReadText($ie)
            $find = StringInStr($bodytext, "Forum")
            ;If $find <> 0 Then Exit  ; This will always exit if the word is present
            If $find = 0 Then Exit    ; This will continue if the word is present
            _IENavigate($ie, "www.autoitscript.com/forum/index.php?act=idx")
            While 1
                $bodytext = _IEBodyReadText($ie)
                $find = StringInStr($bodytext, "Announcements")
                If $find <> 0 Then MsgBox(0, "Found", "Found 'Announcements'")
                _IENavigate($ie, "www.autoitscript.com/forum/index.php?act=idx")
            WEnd
    EndSwitch
WEnd

By the way, see how the code above is indented? It makes it much easier to read and to see where the various loops begin and end. if you use SciTE, you can use Jos' Tidy utility to do this for you automatically - just press "Ctrl-T" or look under the "Tools" menu.

M23