autoload next page

[amiba]

Hello:

I have load https://m.facebook.com and cannot figure out how to auto load page when reaching end of the scroll.
You can see the red line circle text，which is in chinese ，have the same meaning as loading more contents in english.

   

I have created this :


int w=wait(3 WV win(" - Mozilla Firefox" "Mozilla*WindowClass" "" 0x4))
Acc a1.Find(w "LINK" "查看更多動態" "" 0x3011 3)
a1.Mouse(1)

and it can move the mouse over the loading more button ，but cannot figure out how to make it autoclick the button
whenever the page reach the end，when loading more content button have just been showing in the end of the brower as the attachment shown.

Thanks in advance.

[Gintaras]

Macro Macro2630

Code:

Copy      Help

int w=win("Mozilla Firefox" "MozillaWindowClass")
rep ;;repeat for each new "Show More" link
,Acc a.FindFF(w "A" "Show More" "" 0x1001 1)
,err
,,out "no ''Show More'' link"
,,break
,;wait while the link is offscreen, then click it
,rep
,,int isOffscreen=a.State&STATE_SYSTEM_OFFSCREEN; err break
,,if(isOffscreen) 0.1
,,else
,,,a.DoDefaultAction; err
,,,break

[amiba]

I am sorry，do not have good results！

Code:

Copy      Help

int w=win("News Feed - Mozilla Firefox" "Mozilla*WindowClass" "" 0x4)
rep ;;repeat for each new "See More Stories" link
,Acc a.FindFF(w "A" "See More Stories" "" 0x3011 3)
,err
,,out "no ''See More Stories'' link"
,,break
,;wait while the link is offscreen, then click it
,rep
,,if(a.State&STATE_SYSTEM_OFFSCREEN) 0.1; continue
,,a.DoDefaultAction; err
,,break

no "See More Stories" link
shown in log panel！

Thanks you for your help greatly！！

When I look the show code element ，there is no the text See More Stories shown，may it be a ajex or javascript ？


   

[Gintaras]

Cannot drag-capture the "See More Stories" link with the "Find accessible object" dialog?

[amiba]

   

When find accessible object，it has been captured like the attachment shown.
And I can click it with qm automatically each time using keyboard trigger as in my first post code！

[Gintaras]

Maybe we test the macro differently. To test my macro:
1. Open a page that has a "Show More" link below the visible part of Firefox.
2. Go to QM and run the macro.
3. Go to Firefox again and scroll to the bottom, to make the link visible.
4. The macro clicks the link. Scroll again to make it visible again. Repeat until there is no link.

[amiba]

I tested the macro like your description.
Have you succeed and autoload it succesfully？

[Gintaras]

Yes, succeeds. The page was with "Show More" link, for example https://m.facebook.com/barackobama
To find where the macro does not work as expected, insert out 1, out 2 and so on between lines. Or run the macro in debug-step mode.

[amiba]

Thanks you for your help ！
I have tested the link given and it can click it successfully！
https://m.facebook.com/barackobama?v=ti ... 4&refid=17

[amiba]

I tried out this ，using * in between and successfully autoload page:

Code:

Copy      Help

int w=win("Mozilla Firefox" "MozillaWindowClass")
rep ;;repeat for each new "Show More" link
    Acc a.FindFF(w "A" "*多動*" "" 0x1001 3)
    err
        out "no ''*多動態'' link"
        break
     wait while the link is offscreen, then click it
    rep
        if(a.State&STATE_SYSTEM_OFFSCREEN) 0.1; continue
        a.DoDefaultAction; err
        break

Thanks you for your help ！

[amiba]

I have to use keyboard shortcut to trigger them，
Is there a way to auto trigger them whenever the text appear in web pages？

I have three macros for m.facebook ，one is show more （the same as the previous posts macro），one is show older comments，（the same as the first macro，only matching text have changed） the last one is show next comment，as shown in attachments.

The above macros work very good ，but only when using keyboard to trigger them ，each time is tedious.

I tried to figure out how to to auto trigger them whenever the text （ show more；show older comments；show next comments）appear in web pages？
I tried to use the window trigger ，created and active，created and visible，active，visible，and set them from the multi-trigger，
I also use the accessible trigger as a multi-trigger，therefore totally there 5 trigger of each of them.

In the option of set as when a macro is running ，end it and run，so that it will trigger them when the page have alternating between three of the macros，it will run one of them.

As I know the software cannot run mult macro the same time ？
Maybe I do not know how to run them simultaneouly only！

But testing all the combinations are not work，so could you suggest me what to do to achieve this？


Thanks in advance！

   

   

   

   

   

   

   

[Gintaras]

If possible, use trigger "window name changed".

Else use this function to run macros when Firefox page URL changes:
Function Firefox_address_triggers
Trigger !cv"* - Mozilla Firefox" "MozillaWindowClass" "" "" "" 0x2     

Code:

Copy      Help

;\
int w=TriggerWindow
Acc a
str s sPrev
rep
,0.5
,if(!IsWindow(w)) ret
,if !a.a
,,a.Find(w "DOCUMENT" "" "" 0x3000 1); err continue
,s=a.Value; err
,if(_hresult) a.a=0; continue
,if(s=sPrev) continue
,sub.UrlChanged w s sPrev
,sPrev=s


#sub UrlChanged
function w str&url str&previousUrl

;Edit this sub-function. Add/remove case for URLs you need.
;You can edit it while this function is running. Click Compile to apply changes.

out url
sel url 3
,case "https://m.facebook.com/*"
,mac "facebook macro" "" w url previousUrl
,;;the macro should begin: function [hwnd] [$url] [$previousUrl]
,
,;case ["url2","url3"]
,;mac "macro2"
,
,;...

;err+ out _error.description

This function itself has trigger "Firefox window created and is visible". It runs until the window closed.

[amiba]

Thanks you very much！I will tried it out later，thanks！！