+- Micro Focus QTP (UFT) Forums (https://www.learnqtp.com/forums)
+-- Forum: Micro Focus UFT (earlier known as QTP) (https://www.learnqtp.com/forums/Forum-Micro-Focus-UFT-earlier-known-as-QTP)
+--- Forum: VB Scripting/Descriptive Programming (https://www.learnqtp.com/forums/Forum-VB-Scripting-Descriptive-Programming)
+--- Thread: How to handle scroll down in the web page (/Thread-How-to-handle-scroll-down-in-the-web-page)
Pages:
1
2
How to handle scroll down in the web page - Mala - 03-17-2011
Hi,
In order to capture a bitmap located at the end of the web page, I have to scrolldown the page (if not the code is not capturing the bitmap). How should I handle the scroll down operation in the script?
Can any one help me please?
RE: How to handle scroll down in the web page - basanth27 - 03-17-2011
Does the object not have VScroll or HScroll. If not let me know i will put up a function which will simulate mouse whell scroll.
RE: How to handle scroll down in the web page - Mala - 03-17-2011
No, it does not.
RE: How to handle scroll down in the web page - basanth27 - 03-17-2011
Allright..i will post the mouse wheel scroll function tommorow.
RE: How to handle scroll down in the web page - basanth27 - 03-18-2011
Mouse Wheel Rotation:
This will scroll a page as defined according to the mouse wheel rotation. A method which can be useful if you have not object scroll.
Code:
Extern.Declare micVoid, "mouse_event", "user32.dll", "mouse_event", micLong, micLong, micLong, micLong, micLong
Const MOUSEEVENTF_WHEEL = 2048 '@const long | MOUSEEVENTF_WHEEL | middle button up
Const POSWHEEL_DELTA = 120 '@const long | POSWHEEL_DELTA | movement of 1 mousewheel click Down<nl>
Const NEGWHEEL_DELTA = -120 '@const long | NEGWHEEL_DELTA | movement of 1 mousewheel click Up<nl>
'*****************************************************'*
' ** Max: MouseWheelRot(5); Min : MouseWheelRot(-5)
'* positive and negative clicks exist, negative rotates wheel up: positive down
'*****************************************************
Sub MouseWheelRot(iClicks)
dim iLoop
dim bPos
if iClicks > 0 then
bPos = true
end if
for iLoop = 1 to abs(iClicks)
if bPos then
Extern.mouse_event MOUSEEVENTF_WHEEL,0,0,POSWHEEL_DELTA,0
else
Extern.mouse_event MOUSEEVENTF_WHEEL,0,0,NEGWHEEL_DELTA,0
end if
next
End SubHelps?
RE: How to handle scroll down in the web page - Mala - 03-21-2011
Thanks Basanth.
RE: How to handle scroll down in the web page - chandu - 03-22-2011
if the object does not support Vscroll and Hscroll methods.
you can use NextPage or NextLine or Set(ex: set 20) methods
RE: How to handle scroll down in the web page - basanth27 - 03-22-2011
Chandu,
I am really curious to know how the next page or line set method can be used to scroll. Would you please writeup the code with an example?
RE: How to handle scroll down in the web page - chandu - 03-22-2011
Code:
Window("").swfscrollbar("").set 20
Window("").swfscrollbar("").NextPage
Window("").swfscrollbar("").NextLineu can use any of those methods as per ur requirement
RE: How to handle scroll down in the web page - basanth27 - 03-22-2011
How would you use this when you cant get the scroll bar object? Please read the questioners post.