|
新手报道,现在才来这里貌似有点晚,但是也不怕,最少来了,现在向大家请教个问题。
在助手上能提交点击的命令,可是在易语言里面却没办法实现,甚至都不能枚举出来。大家帮我看下,我把问题截图发下面。- .版本 2
- .支持库 CometWebBrowser
- .支持库 spec
- .程序集 窗口程序集1
- .程序集变量 拍下页面句柄1, 整数型
- .程序集变量 拍下页面句柄2, 整数型
- .程序集变量 拍下页面句柄3, 整数型
- .程序集变量 拍下页面句柄4, 整数型
- .程序集变量 拍下页面句柄5, 整数型
- .程序集变量 句柄, 整数型
- .程序集变量 A, 普通填表
- .子程序 _按钮1_被单击
- 彗星网页框1.浏览 (编辑框1.内容, , , )
- .子程序 __启动窗口_创建完毕
- 拍下页面句柄1 = 取子窗口 (_启动窗口.取窗口句柄 (), “AfxFrameOrView42s”)
- 拍下页面句柄2 = 取子窗口 (拍下页面句柄1, “Shell Embedding”)
- 拍下页面句柄3 = 取子窗口 (拍下页面句柄2, “Shell DocObject View”)
- 拍下页面句柄4 = 取子窗口 (拍下页面句柄3, “Internet Explorer_Server”)
- 句柄 = 拍下页面句柄4
- 标题 = 到文本 (句柄)
- A.初始化 (句柄) ' 刚开始以为是句柄没取正确,所以取了详细的句柄,觉果还是不行。
- .子程序 _按钮2_被单击
- .如果 (A.链接_点击 (“立即购买”, ) = 真)
- 调试输出 (“1”)
- .否则
- 调试输出 (“2”)
- .如果结束
- ' 结果总是不成功,点击不到这个连接
- .子程序 _按钮3_被单击
- .如果 (A.title链接_点击 (“5”, , ) = 真)
- 调试输出 (“1”)
- .否则
- 调试输出 (“2”)
- .如果结束
- ' 结果总是不成功,点击不到这个连接,这里也是一样的。。。大家指点下。
复制代码 |
|