hi i have one issue while automating the script using QTP i
want scrool down .i cannot do even using scrool down
methqad is not working .the object will take WebElement plz
is there any code help me
Answers were Sorted based on User's Feedback
Answer / mohd ikhlaque
HI
I have tried the Mouse wheel UP/Down movement operation for
a Windows application , and it is working pretty fine.
Please find the code-snipt for the above mentioned
operation.
'*********************************************************
Function To Perform Mouse Scroll Wheel Operation
****************************************************
*******************
'Function Name :
MouseWheelRotation(iClicks)
'Description :
Performs Mouse Scroll Wheel Operation
''Parameters :
1.iClicks :: No. of Mouse Click
'
'Return Value :
TRUE \ FALSE
'Pre-requisite : Nx
should be launched
'Examples :
Call MouseWheelRotation(-2) -----> To perform
Scroll Down
'
Call
MouseWheelRotation(2) -----> To perform Scroll UP
'History :
' Developer Name
Date
Rev. No.
Reviewer
'-----------------------------------------------------------
------------------------------------------------------------
------------------------------------------------------------
-
' Mohd Ikhlaque
31/05/ 2012
1.0
'-----------------------------------------------------------
------------------------------------------------------------
------------------------------------------------------------
-
'*********************************************************
Start of Function
****************************************************
******************
Public Function MouseWheelRotation(iClicks)
dim iLoop
dim bPos
Window("NXWindow").Window("WinDrawingArea").WinObject
("WinDrawingArea").click 1,1 '======= The Object on which
Mouse wheel operation is to be perform.===========
Wait(2)
MouseWheelRotation=False
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>
If iClicks<>0Then
For iLoop = 1 to abs(iClicks)
If iClicks > 0 then
'========To Scroll Down=============
Extern.mouse_event
MOUSEEVENTF_WHEEL,0,0,POSWHEEL_DELTA,1
' "Performed Mouse Wheel Down
Operation Successfully "
MouseWheelRotation=True
else
'===========To Scroll
UP===============
Extern.mouse_event
MOUSEEVENTF_WHEEL,0,0,NEGWHEEL_DELTA,1
' "Performed Mouse Wheel UP
Operation Successfully "
MouseWheelRotation=True
end if
next
else
' "Fail :Fail To Perform [Mouse Wheel UP/Down]
Operation"
End If
End Function
Is This Answer Correct ? | 0 Yes | 0 No |
Answer / rico
I think this can be done by creating the shell object and
then using the sendkeys option(i'm just guessing)...maybe
the code goes like this
Set myshell = CreateObject("Wscript.Shell")
myshell.sendkeys "down" ' take the cursor down
(WshShell.SendKeys("+{F10}")'simulate a mouse right-click
by sending a shift F10)
Other way of doing this would be " analog recording" where
is caputre the mouse movements(like scroll, click, etc)
Is This Answer Correct ? | 1 Yes | 2 No |
Explain calling sub procedure.
how do u get lib files into scripting files?
how can i call function (which has link with excell sheet at a remote location) within another function
How to create Reusable and Multiple Actions?
How to customize qtp?
how to download mercury qtp9.2 ny internet ?
Hi. GetRoProperty and OUTPUT Value Both are same purpose or not? plz explain in deatil with example?
how would you go for testing a web application like any jobsite?(using manual n qtp)..pls frnds its very urgent ..i need realtime answers...thanks in advance
Explain how you can delete excel file in qtp?
how to record/identify the webedit box/object which have drop down list and its changing simultaneously in qtp..
1 Answers Synchronoss Technologies,
can u give one scenario for for PopWindow Exception & write Code for that?
What are SetToProperty, SetRoProperty, GetToProperty scripting?