|
马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
本帖最后由 madwinder 于 2014-11-4 13:10 编辑
最近制作了一个监视某论坛某板块新帖子的程序。
思路是通过每20秒寻找网页上的元素,然后对比元素的文本,判断是不是新帖子,- 功能 找帖子()
- 返回值2
- 辅助.等待(200)
- 网站.判断网页加载()
- help.sleep(200)
- text2=网页.获取元素信息("浏览器0","text","tag:TH&index:"&编辑框.获得文本("编辑框0") )
- 如果(text2=="")
- 辅助.消息框("请重新设置索引","获取内容失败")
- 否则
- traceprint(text2)
- 是否成功=字符串.分割(text2," ",返回值2)
- 新帖2=返回值2[1]
- 如果结束
- 如果(新帖2!=新帖1)
- traceprint("找到了")
- 标签.设置文本("标签1","有新帖子")
- 标签.设置颜色("标签1",#ff0000)
- 子窗口句柄=控件.打开窗口("dsfsdfsf12",真)
- 窗口.设置标题(子窗口句柄,"有新帖子")
- 窗口.获取位置(窗口句柄,0,0)
- 新帖1=新帖2
- 如果(定时是否注册==0)
- 定时是否注册=定时器.注册("提示",1320000)
- traceprint("已激活提示功能")
-
- 如果结束
-
-
- 如果结束
-
- 功能结束
复制代码- 功能 定时器0_时钟()
- 辅助.等待(100)
- 网页.刷新("浏览器0")
- 辅助.等待(3000)
- 网站.找帖子()
- 辅助.等待(1000)
- traceprint("定时检查新帖子中")
- 功能结束
复制代码 再附上定时器代码。
功能上倒是没问题,但是没当程序运行到找元素对比的时候,电脑就会顿卡,开始以为是3核的AMD,XP系统不好,
后来回家后用I5,8G的电脑还是会发现顿卡,
AMD机子的程序最高是30%的CPU,I5机子最高才8%左右,发生在寻找元素,对比的那几秒。之后变回0,内存占用 40-90M之间。
我的I5电脑没理由会卡的啊。。之前用找图的方法,2台的电脑都不卡,因为不想伪最小化,所以改成找元素,竟然卡了.
每20秒寻找是通过定时器触发的,
还会,如果线程=线程.开启("网站.找帖子","")
网站.找帖子()
2种开启方式,那个更省资源.我加了几个延时,用网站.找帖子()开启感觉CPU占用低了,但是还是顿卡.
我测试顿卡的方法是,找个记事本,在编辑框一直按1,就会成排,不断的出来,打开任务管理器,只要CPU由0提升,也就是找元素,那1就不会打出来,要等1-3秒才出.
|
|