当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > 飘叶千夫指源代码,又称qq刷屏器

VBScript
VBS教程:运算符-Xor 运算符
VBS教程:运算符-减运算符 (-)
VBS教程:运算符-Or 运算符
VBS教程:运算符-运算符概述
VBS教程:运算符-运算符优先级
VBS教程:运算符-Not 运算符
VBS教程:运算符-乘运算符 (*)
VBS教程:运算符-Mod 运算符
VBS教程:运算符-逻辑运算符
VBS教程:运算符-Is 运算符
VBS教程:运算符-\ 运算符
VBS教程:运算符-Imp 运算符
VBS教程:运算符-幂运算符 (^)
VBS教程:运算符-Eqv 运算符
VBS教程:运算符-除运算符 (/)
VBS教程:运算符-连接运算符 (&)
VBS教程:运算符-比较运算符
VBS教程:运算符-赋值运算符 (=)
VBS教程:运算符-And 运算符
VBS教程:运算符-运算符(+)

VBScript 中的 飘叶千夫指源代码,又称qq刷屏器


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 97 ::
收藏到网摘: n/a

复制代码 代码如下:

Set WshShell= WScript.CreateObject("WScript.Shell")
WshShell.AppActivate ""
for i=1 to 10 ´要发送的次数
WScript.Sleep 500 ´定义发送信的所要的时间以ms毫秒为单位。如:1000为一秒发一次
WshShell.SendKeys "^v" ´把剪贴版上的内容粘贴出来
WshShell.SendKeys i ´输出次数值
WshShell.SendKeys "%s"´按下键盘上的Alt+S发送信息
next