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

//QQ空间自动评论自动转发Dim iyRem headiy = 0Rem nextfindFindPic 0,iy,1366,768,"Attachment:\qqzf.bmp",0.9,intX,intYIf 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 ThenKeyPress "PageDown", 1Delay 10000Goto headEnd IfGoto nextfindEnd IfDelay 100KeyPress "PageDown", 1Delay 10000Goto head

//微博自动自动转发

Dim iy

Rem headiy = 0Rem nextfindFindPic 0,iy,1366,768,"Attachment:\zf.bmp",0.9,intX,intYIf 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", 1Delay 100 Goto head End If Goto nextfindEnd If

Delay 2000KeyPress "PageDown", 1Delay 100

//下一页FindPic 0,0,1366,768,"Attachment:\next2.bmp",0.9,intX,intYIf 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

，快乐不是因为得到的多而是因为计较的少！