精易论坛

标题: 网页_开始屏蔽信息框 无效问题 [打印本页]

作者: laiyihan    时间: 2013-11-17 16:47
标题: 网页_开始屏蔽信息框 无效问题
本帖最后由 laiyihan 于 2013-11-17 16:55 编辑

相信很多说无效的朋友都是用的E超文本浏览框吧
之前在程序内部超文本浏览框中 一直无法屏蔽信息框
然后看了下3.45的源码  原来是找不到窗口句柄
[e]
.版本 2.子程序 内部_屏蔽网页信息框.局部变量 窗口句柄, 整数型.局部变量 窗口标题, 文本型.局部变量 静态, 整数型窗口句柄 = FindWindowA (“#32770”, “Microsoft Internet Explorer”).如果真 (窗口句柄 > 0)    静态 = GetWindow (窗口句柄, 5)  ' 取第一个子窗口    静态 = GetWindow (静态, 2)  ' 取下一个窗口    静态 = GetWindow (静态, 2)  ' 取下一个窗口    窗口标题 = 窗口_取标题 (静态)    发送消息整数 (窗口句柄, 16, 0, 0).如果真结束程序_延时 (50)内部_屏蔽网页信息框 ()
[/e]
这是原模块句柄 明显只能找到屏蔽标题为"Microsoft Internet Explorer"的信息框
[e]
.版本 2.子程序 内部_屏蔽网页信息框.局部变量 窗口句柄, 整数型.局部变量 窗口标题, 文本型.局部变量 静态, 整数型窗口句柄 = 窗口_取句柄_模糊 (, “#32770”).如果真 (窗口句柄 > 0)    静态 = GetWindow (窗口句柄, 5)  ' 取第一个子窗口    静态 = GetWindow (静态, 2)  ' 取下一个窗口    静态 = GetWindow (静态, 2)  ' 取下一个窗口    窗口标题 = 窗口_取标题 (静态)    发送消息整数 (窗口句柄, 16, 0, 0).如果真结束程序_延时 (50)内部_屏蔽网页信息框 ()
[/e]
这是我更改后的代码  
测试后效果
不一样的是  所有的信息框都被干掉
不管是超文本的 还是IE 360的 只要程序在运行 都被干掉 不同于自动点击信息框
都是信息框一闪而过  而不是完全不出来
有什么命令能完全屏蔽掉信息框的吗??


作者: yaoying68    时间: 2013-11-25 20:29
这个修好的好,我也出现过此问题
作者: 小磊    时间: 2013-12-2 22:53
已经完善{:soso_e179:}
作者: redtiger99    时间: 2016-2-17 15:00
  
子程序名返回值类型公开备 注
内部_屏蔽网页信息框  
变量名类 型静态数组备 注
窗口句柄整数型 
窗口标题文本型 
静态整数型 
窗口句柄 = 窗口_取句柄_模糊 (, “#32770”)
如果真 (窗口句柄 > 0)   
静态 = GetWindow (窗口句柄, 5)  ' 取第一个子窗口  
静态 = GetWindow (静态, 2)  ' 取下一个窗口  
静态 = GetWindow (静态, 2)  ' 取下一个窗口   
窗口标题 = 窗口_取标题 (静态)   
发送消息整数 (窗口句柄, 16, 0, 0)
程序_延时 (50)
内部_屏蔽网页信息框 ()


整理了一下。





欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4