3个回答
展开全部
.版本 2
.子程序 _按钮7_被单击
.局部变量 网页文档, 网页文档类, , ,
.局部变量 网页操作类, 网页操作类, , ,
.局部变量 网页表单, 网页操作类, , ,
.局部变量 结果数组, 整数型, , "0"
.局部变量 a, 整数型
.局部变量 i, 整数型
.局部变量 目标, 整数型
.局部变量 取数组成员数, 整数型
.局部变量 hWnd, 整数型
.局部变量 Null, 文本型
.局部变量 IES, 整数型, , "0"
.局部变量 变量, 整数型
.局部变量 子窗口句柄, 整数型
网页表单.类_控件初始化 (WebBrowser1.取窗口句柄 ())
' 编辑框12.内容 = 到文本 (网页表单.系统_取IES句柄 (WebBrowser1.取窗口句柄 ()))
编辑框12.内容 = 到文本 (网页表单.系统_取IES句柄 (到数值 (“MacromediaFlashPlayerActiveX”)))
编辑框10.内容 = 到文本 (网页文档.取所有网页框句柄 (到数值 (“MacromediaFlashPlayerActiveX”), 结果数组))
编辑框13.内容 = 到文本 (结果数组 [1])
编辑框22.内容 = 到文本 (取数组成员数 (结果数组))
编辑框14.内容 = 到文本 (结果数组 [2])
编辑框15.内容 = 到文本 (结果数组 [3])
延时 (1000)
编辑框16.内容 = 到文本 (网页文档.取所有网页框句柄 (到数值 (“Internet Explorer_Server”), IES))
编辑框17.内容 = 到文本 (取数组成员数 (IES))
编辑框17.内容 = 到文本 (IES [1])
编辑框18.内容 = 到文本 (IES [2])
编辑框19.内容 = 到文本 (IES [3])
' 编辑框19.内容 = 到文本 (结果数组 [7])
' 编辑框20.内容 = 到文本 (结果数组 [8])
' 编辑框21.内容 = 到文本 (结果数组 [9])
' 编辑框22.内容 = 到文本 (结果数组 [10])
' a = 取数组成员数 (结果数组)
.' 计次循环首 (a, i)
' ' 编辑框10.内容 = 到文本 (结果数组 [变量])
' 编辑框10.内容 = 到文本 (结果数组 [1])
' ' 编辑框10.内容 = 到文本 (取数组成员数 (结果数组))
.' 计次循环尾 ()
' 子窗口句柄 = FindWindowEx (WebBrowser1.取窗口句柄 (), 0, 到数值 (“MacromediaFlashPlayerActiveX”), 0)
' 编辑框22.内容 = 到文本 (子窗口句柄)
去论坛看一下,有这方面的源码。
http://bbs.eyuyan.com/read.php?ordertype=asc&tid=187171
.子程序 _按钮7_被单击
.局部变量 网页文档, 网页文档类, , ,
.局部变量 网页操作类, 网页操作类, , ,
.局部变量 网页表单, 网页操作类, , ,
.局部变量 结果数组, 整数型, , "0"
.局部变量 a, 整数型
.局部变量 i, 整数型
.局部变量 目标, 整数型
.局部变量 取数组成员数, 整数型
.局部变量 hWnd, 整数型
.局部变量 Null, 文本型
.局部变量 IES, 整数型, , "0"
.局部变量 变量, 整数型
.局部变量 子窗口句柄, 整数型
网页表单.类_控件初始化 (WebBrowser1.取窗口句柄 ())
' 编辑框12.内容 = 到文本 (网页表单.系统_取IES句柄 (WebBrowser1.取窗口句柄 ()))
编辑框12.内容 = 到文本 (网页表单.系统_取IES句柄 (到数值 (“MacromediaFlashPlayerActiveX”)))
编辑框10.内容 = 到文本 (网页文档.取所有网页框句柄 (到数值 (“MacromediaFlashPlayerActiveX”), 结果数组))
编辑框13.内容 = 到文本 (结果数组 [1])
编辑框22.内容 = 到文本 (取数组成员数 (结果数组))
编辑框14.内容 = 到文本 (结果数组 [2])
编辑框15.内容 = 到文本 (结果数组 [3])
延时 (1000)
编辑框16.内容 = 到文本 (网页文档.取所有网页框句柄 (到数值 (“Internet Explorer_Server”), IES))
编辑框17.内容 = 到文本 (取数组成员数 (IES))
编辑框17.内容 = 到文本 (IES [1])
编辑框18.内容 = 到文本 (IES [2])
编辑框19.内容 = 到文本 (IES [3])
' 编辑框19.内容 = 到文本 (结果数组 [7])
' 编辑框20.内容 = 到文本 (结果数组 [8])
' 编辑框21.内容 = 到文本 (结果数组 [9])
' 编辑框22.内容 = 到文本 (结果数组 [10])
' a = 取数组成员数 (结果数组)
.' 计次循环首 (a, i)
' ' 编辑框10.内容 = 到文本 (结果数组 [变量])
' 编辑框10.内容 = 到文本 (结果数组 [1])
' ' 编辑框10.内容 = 到文本 (取数组成员数 (结果数组))
.' 计次循环尾 ()
' 子窗口句柄 = FindWindowEx (WebBrowser1.取窗口句柄 (), 0, 到数值 (“MacromediaFlashPlayerActiveX”), 0)
' 编辑框22.内容 = 到文本 (子窗口句柄)
去论坛看一下,有这方面的源码。
http://bbs.eyuyan.com/read.php?ordertype=asc&tid=187171
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询