我应该如何处理脚本中的向下滚动操作？

Question

为了捕获位于网页末尾的位图，我必须向下滚动页面（如果不是，则代码不会捕获位图）。我应该如何处理脚本中的向下滚动操作？

Answer 1

您是否在 Web 应用程序中的 IMG 元素上执行位图检查点？如果是这样，那么 QTP 应该自动将对象滚动到视图中。如果没有，您可以尝试使用未记录的 MakeObjVisible 方法。

Browser("B").Page("P").Image("I").MakeObjVisible

Answer 2

我更喜欢 Motti 的解决方案，但如果您真的、真的、真的想要执行向下滚动，您可以将 END 按钮的类型命令发送到浏览器，或者只是创建一个 Windows 脚本主机对象并执行 sendkey ” {END}”命令。
在这种情况下这应该有效：

CreateObject("WScript.Shell").SendKeys "{END}"

Answer 3

Set obj = oPage.WebTable("object_Name")
Set objWshShell = CreateObject("WScript.shell")
obj.ChildItem(2,1,"WebEdit",0).Fireevent "onmouseover"
objWshShell.SendKeys "{DOWN}"
objWshShell.SendKeys "{DOWN}"

'这段代码可以进一步迭代以找到您想要的特定单元格

Answer 4

向下滚动

Set pfr_obj=Browser("p").Page("page")
pfr_obj.RunScript("window.scrollBy(0,900)")

向上滚动

Set pfr_obj=Browser("p").Page("page")
pfr_obj.RunScript("window.scrollBy(0,-900)")