Sign in to follow this  
Followers 0
Crxo

MSGBox error.

3 posts in this topic

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

Share this post


Link to post
Share on other sites



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


Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______My UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0