当前位置:首页 > 多媒体 > 图形/图像

新浪微博自动转发评说 源码 按键精灵实现 详细注释 几十行代码实现 涉及图像识别模拟键盘鼠标

优良自学吧提供新浪微博自动转发评说 源码 按键精灵实现 详细注释 几十行代码实现 涉及图像识别模拟键盘鼠标,新浪微博自动转发评论 源码 按键精灵实现 详细注释 几十行代码实现 涉及图像识别模拟键盘鼠标自动翻页转发,自动滚屏,一条一条地转发。 1.打开微博,登录 2.打开按键精灵,进入调试 3.回到要转发的微博界面,按F10启动转发。 我的微博已经转发了很多条。不信可以看看:http:/

新浪微博自动转发评论 源码 按键精灵实现 详细注释 几十行代码实现 涉及图像识别模拟键盘鼠标

自动翻页转发,自动滚屏,一条一条地转发。

1.打开微博,登录

2.打开按键精灵,进入调试

3.回到要转发的微博界面,按F10启动转发。

我的微博已经转发了很多条。不信可以看看:http://weibo.com/p/1005053019480453/myfollow


源码:

Dim iy
Rem head
iy = 0
Rem nextfind
FindPic 0,iy,1366,768,"Attachment:\zf.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then 
    //MessageBox "yes"
    MoveTo intX , intY
    Delay 500
    LeftClick 1
    MoveTo 0,0
    Delay 500
    //   //确认转发
//    Delay 500
//    SayString "小黄人软件淘宝旗舰店 程序源码,定制专家 手机:18910620895 旺旺:chenhao0568 QQ:345139427 店铺:http://chenhao0568.taobao.com"
//    Delay 500
    //确认转发
    KeyDown 17, 1
    KeyPress 13, 1
    KeyUp 17, 1
    Delay 3000
    //如果未发成功,退回
    KeyPress "Esc", 1
    Delay 500
    //屏幕向下找
    iy = intY + 40
    If iy > 768 Then 
        KeyPress "PageDown", 1
        Delay 1000
        Goto nextpage
    End If
    Goto nextfind
End If
Delay 2000
KeyPress "PageDown", 1
Delay 1000
//下一页
Rem nextpage
FindPic 0,0,1366,768,"Attachment:\next3.bmp",1,intX,intY
If intX > 0 And intY > 0 Then 
//    MessageBox "aa"
    MoveTo intX , intY
    Delay 5000
    LeftClick 1
    MoveTo 0,0
    Delay 500
Else 
//    MessageBox "can not find next3"
End If

Goto head

大家不要随便用 ,会被扣分的。


附两张图片。





运行业中。




如需定制请联系:程序源码,定制专家手机:18910620895 旺旺:chenhao0568  QQ:345139427

1楼chenhao05685小时前
粘贴的图片为什么不显示?

(本文来自互联网,不代表搜站(http://www.ylzx8.cn/)的观点和立场)
本站所有内容来自互联网,若本站收录的信息无意侵犯了贵司版权,请给我们来信(ylzx8cn@163.com),我们会及时处理和回复,谢谢