| 标题 | vbs qq自动发信息增强版 |
| 内容 | 运行前请确定你的电脑安装了word。 代码如下: i=0 set wshshell=createobject(wscript.shell) set objword = createobject(word.application) set coltasks = objword.tasks do while i<30 for each objtask in coltasks if left(objtask.name,1)=与 then wshshell.appactivate objtask.name wshshell.sendkeys {enter} wshshell.sendkeys ^v wshshell.sendkeys i wscript.sleep 600 wshshell.sendkeys %s i=i+1 end if next loop |
| 随便看 |
|
在线学习网考试资料包含高考、自考、专升本考试、人事考试、公务员考试、大学生村官考试、特岗教师招聘考试、事业单位招聘考试、企业人才招聘、银行招聘、教师招聘、农村信用社招聘、各类资格证书考试等各类考试资料。