| 标题 | 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 |
| 随便看 |
|
在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板,是学习及工作的有利工具。