取网页元素座标 都是返回 0 座标

zhgx2950

之前都是用 按键精灵的  
现在用易语言，相关教程都找不到关于元素座标的
这个是 (彬)泪闯天涯-取网页元素坐标 的代码
我改了下 取百度的 按钮 或输入框 的座标 都不成功 求解

.版本 2
.支持库 WebBrowser

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

' 写出测试网页
' WebBrowser1.Navigate (“about:blank”, , , , )
' WebBrowser1.GetDocument ().方法 (“write”, #常量1)
' 改成取百度的按钮 或输入框 的座标 都是返回 0 的座标
WebBrowser1.Navigate (“百度网址”, , , , ) '不能发表带链接

.子程序 _按钮1_被单击
.局部变量 元素对象, 对象
.局部变量 元素坐标, 整数型

' 元素对象 ＝ WebBrowser1.GetDocument ().对象型方法 (“getElementById”, “testbut”)
元素对象 ＝ WebBrowser1.GetDocument ().对象型方法 (“getElementById”, “su”)
元素坐标 ＝ 取元素横坐标 (元素对象)
信息框 (“元素坐标为：” ＋ 到文本 (元素坐标), 64, “提示”)

.子程序 _按钮2_被单击
.局部变量 元素对象, 对象
.局部变量 元素坐标, 整数型

' 元素对象 ＝ WebBrowser1.GetDocument ().对象型方法 (“getElementById”, “testbut”)
元素对象 ＝ WebBrowser1.GetDocument ().对象型方法 (“getElementById”, “kw”)
元素坐标 ＝ 取元素纵坐标 (元素对象)
信息框 (“元素坐标为：” ＋ 到文本 (元素坐标), 64, “提示”)

.子程序 取元素横坐标, 整数型
.参数 元素对象, 对象
.局部变量 元素坐标, 整数型
.局部变量 元素父对象, 对象

元素坐标 ＝ 元素对象.读数值属性 (“offsetLeft”, )
元素父对象 ＝ 元素对象.读对象型属性 (“offsetParent”, )
.如果真 (元素父对象.是否为空 () ＝ 假)
元素坐标 ＝ 元素坐标 ＋ 取元素横坐标 (元素父对象)
.如果真结束
返回 (元素坐标)

.子程序 取元素纵坐标, 整数型
.参数 元素对象, 对象
.局部变量 元素坐标, 整数型
.局部变量 元素父对象, 对象

元素坐标 ＝ 元素对象.读数值属性 (“offsetTop”, )
元素父对象 ＝ 元素对象.读对象型属性 (“offsetParent”, )

.如果真 (元素父对象.是否为空 () ＝ 假)
元素坐标 ＝ 元素坐标 ＋ 取元素纵坐标 (元素父对象)
.如果真结束
返回 (元素坐标)

小易学徒

建议看看 精易普通填表

zhgx2950

小易学徒 发表于 2015-2-28 13:57
建议看看 精易普通填表

你去试试？