找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 8964|回复: 1

VBS编写的程序,怎么自动发送?

[复制链接]
发表于 2011-1-16 23:38:22 | 显示全部楼层 |阅读模式
代码如下,这个也是类似网络流传的;QQ复仇器----之类的,先复制一段文字然后打开该VBs文件即可不断粘贴之前复制的文字内容,但是缺点是不可以自动发送,哪位大哥可以帮我修改下,打开QQ聊天框可以自己发送的,而不用手工发送。
Set WshShell= WScript.createobject("WScript.Shell")
WshShell.AppActivate "QQ信息攻击脚本"
for i=1 to 20
WScript.Sleep 1000
WshShell.SendKeys"^v"
WshShell.SendKeys i
WshShell.SendKeys "%s"
Next
 楼主| 发表于 2011-1-16 23:40:31 | 显示全部楼层
建议自动发送的时间间隔可以手动修改的,谢谢了~
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 09:23 , Processed in 0.018089 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表