QQ空间自动评论自动转发 微博自动自动转发神器带源码（超简单） 升级版

//QQ空间自动评论自动转发 Dim iy Rem head iy = 0 Rem nextfind FindPic 0,iy,1366,768,"Attachment:\qqzf.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then //MessageBox "aa"MoveTo intX , intYDelay 500LeftClick 1MoveTo 0,0Delay 2000SayString "自动转发-----------小黄人软件"Delay 500//KeyDown 17, 1Delay 500KeyPress 13, 1Delay 500KeyUp 17, 1Delay 5000iy = intY + 20If iy > 768 Then KeyPress "PageDown", 1Delay 10000Goto headEnd IfGoto nextfind End If Delay 100 KeyPress "PageDown", 1 Delay 10000 Goto head

 

//微博自动自动转发

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 "aa"

    MoveTo intX , intY
      Delay 500
    LeftClick 1

    MoveTo 0,0
    Delay 500
    //
    KeyDown 17, 1
    KeyPress 13, 1
    KeyUp 17, 1
    Delay 2000
    iy = intY + 20
    If iy > 768 Then
  KeyPress "PageDown", 1
  Delay 100
     Goto head
    End If
   
     Goto nextfind
End If

Delay 2000
KeyPress "PageDown", 1
Delay 100

//下一页
FindPic 0,0,1366,768,"Attachment:\next2.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
//MessageBox "aa"
    MoveTo intX , intY
      Delay 500
    LeftClick 1

    MoveTo 0,0
    Delay 500
    Else
//    MessageBox "bb"
End If

Goto head

 

总结

以上是生活随笔为你收集整理的QQ空间自动评论自动转发 微博自动自动转发神器带源码（超简单） 升级版的全部内容，希望文章能够帮你解决所遇到的问题。

如果觉得生活随笔网站内容还不错，欢迎将生活随笔推荐给好友。