Как нажать Enter с помощью UFT

У меня есть одна функция setfieldvalue, которая вводит данные в текстовое поле. Затем я вызываю функцию pressenter, чтобы нажать Enter. Курсор уже находился в текстовом поле. Я не уверен, почему UFT не нажимает ввод.

Public Function PressEnter()
    Set WshShell = CreateObject("WScript.Shell")
    Wait(1)
    WshShell.SendKeys "{ENTER}"
    Set WshShell = Nothing
End Function

Как я могу написать функцию, которая будет нажимать ввод там, где находится курсор?


person bugfinder    schedule 25.04.2018    source источник


Ответы (1)


Попробуйте использовать DeviceReplay.

Set devRep = CreateObject("Mercury.DeviceReplay")
devRep.PressKey 28
person Motti    schedule 26.04.2018
comment
Я проверил это на одном экземпляре. Это сработало. Если возникнут проблемы позже, я дам вам знать. Спасибо. - person bugfinder; 02.05.2018