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

VBScript
VBS取QQ或TM自动登录代码并防止关闭的脚本
VBS调用WMI快速关闭IE的脚本
查看或修改Windows系列系统的序列号的vbs
vbs adox提取数据库表名和列名的类
vbs实现的eMule电驴自动关机脚本代码
vbs判读盘符被双击的脚本
vbs下一些取特殊路径的方法总结
vbscript禁用 启用fso的方法
getSQLinfo.vbs 获得SQL数据/日志空间使用情况的脚本
高手必看的vbs的至尊境界
vbs 获取radmin注册表中的信息
vbs解答一道初中数学题i,x,y
vbs之自动安装驱动程序
让IIS建立的站点默认是.net 2.0的,而不是.net 1.1的代码
VBS利用SendKeys输入中文字符的方法
vbs加administrator用户的代码
用vbs列出机器上所有能调用的组件
用vbs实现选择颜色
vbs选择文件夹效果代码
vbs的sort排序

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 88 ::
收藏到网摘: 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