Description Right click on web page in QTP
Language QTP
Code Set obj = CreateObject ("Mercury.DeviceReplay")
obj.MouseClick 10, 50, 0 ' Click the left (0) mouse button on screen location 10, 50 obj.SendString "Type some text" ' Type a string simulating use of the keyboard

These functions are supplied by the Mercury.DeviceReplay object::


Command Function
MouseMove x, y Move the mouse to screen coordinate (x,y)
MouseClick x, y, button Move the mouse to screen coordinate (x,y) and click on the button (0=left; 1=middle; 2=right) MouseDblClick x, y, button Move the mouse to screen coordinate (x,y) and double-click on the button DragAndDrop x, y, dropx, dropy, button Drag the mouse from screen coordinate (x,y) to (dropx,dropy) with the button pressed PressKey key Press a key using the ASCII code of the key. For example, Chr(13), vbCR and vbTab
MouseDown x, y, button Depress the mouse button on screen coordinate (x,y)
MouseUp x, y, button Release the mouse button on screen coordinate (x,y)
KeyDown key Depress the key
KeyUp key Release the key
SendString string Type a string

On , "sh.varma" <[email protected]> wrote:
Set ObCr =

DotNetFactory.CreateInstance("System.Windows.Forms.Control")

Do

Flag = MsgBox("Have positioned mouse?", vbYesNo)

Offset_x = ObCr.MousePosition.X

Offset_x = ObCr.MousePosition.Y

If (Flag = vbYes) Then

Exit Do

End If

Loop



Set DevRpyObj = CreateObject("Mercury.DeviceReplay")

DevRpyObj.MouseClick Offset_x, Offset_y, 2

DevRpyObj.PressKey VK_DOWN

DevRpyObj.PressKey VK_RETURN



(OR)



Set WshShell = CreateObject("WScript.Shell")

' Cursor should be placed on the control

WshShell.Sendkeys "{DOWN}"

WshShell.Sendkeys "{ENTER}"



Regards,

Varma



On Apr 9, 11:09 am, Jyothi [email protected]> wrote:

> Dear Experts,

>

> Please help me out of this issue,

>

> *Issue:*

>

> I want select the value from drop down list in SAP GUI .

>

> I am expecting it is possible with handle cursor movement in QTP using shell

> script.

>

> Thanks in advance.

> Jyothi



--

You received this message because you are subscribed to the Google

"QTP - HP Quick Test Professional - Automated Software Testing"

group.

To post to this group, send email to [email protected]

To unsubscribe from this group, send email to

[email protected]

For more options, visit this group at

http://groups.google.com/group/MercuryQTP?hl=en

--
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en

Reply via email to