用快手实现网页自动刷新代码

1. import win.ui;
   
2. import web.form;
   
3. /*DSG{{*/
   
4. var winform = win.form(parent=...; bottom=496;scroll=1;text="AAuto Form";right=600 )
   
5. winform.add(  )
   
6. /*}}*/
   
7. 
   
8. //创建web窗体
   
9. var wb = web.form( winform
   
10.         ,//可输入_UIFLAG_ 前缀的常量自定义外观
    
11.         ,//可输入_DLCTL_ 前缀的常量以控制下载行为
    
12.         ,//"USER AGENT"
    
13.         );
    
14. 
    
15. //打开目标网站
    
16. wb.go("http://www.xmqol.com/vote/xuanshou_25.html")
    
17. //显示窗体
    
18. winform.show()
    
19. wb.wait("");//等待指定网址,可以使用模式匹配语法
    
20. 
    
21. fun=function(hwn){
    
22.         import web.access
    
23.         import winex
    
24.         控件句柄 = winex.findEx(窗口句柄,1,"Internet Explorer\_Server" )        
    
25.         wb=web.access( 控件句柄 )
    
26.         for(i=1;500;1){            //刷新次数（其中500可以自己修改）           
    
27.                 sleep(3000)        //等待时间（时间可以设置）
    
28.                 wb.refresh2()      //刷新
    
29.                 wb.wait()
    
30.         }        
    
31. }
    
32. 
    
33. thread.create(fun,winform.hwnd)
    
34. 
    
35. 
    
36. //进入消息循环
    
37. win.loopMessage();
    
38. return winform,wb;

复制代码