




版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
-.zVBS中SendKeys的根本应用ps:不知道有人还记得这个攻击qq群的代码.就是利用这个所写的!SendKeys模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行,其使用格式为:object.SendKeysstring“object〞:表示WshShell对象“string〞:表示要发送的按键指令字符串,需要放在英文双引号中。1.根本键一般来说,要发送的按键指令都可以直接用该按键字符本身来表示,例如要发送字母“*〞,使用“WshShell.SendKeys"*"〞即可。当然,也可直接发送多个按键指令,只需要将按键字符按顺序排列在一起即可,例如,要发送按键“happy〞,可以使用“WshShell.SendKeys"happy"〞。2.特殊功能键对于需要与Shift、Ctrl、Alt三个控制键组合的按键,SendKeys使用特殊字符来表示:Shift---------WshShell.SendKeys"+"
Ctrl---------WshShell.SendKeys"^"
Alt---------WshShell.SendKeys"%"由于“+〞、“^〞这些字符用来表示特殊的控制按键了,如何表示这些按键呢.只要用大括号括住这些字符即可。例如:要发送加号“+〞,可使用“WshShell.SendKeys"{+}"〞另外对于一些不会生成字符的控制功能按键,也同样需要使用大括号括起来按键的名称,例如要发送回车键,需要用“WshShell.SendKeys"{ENTER}"〞表示,发送向下的方向键用“WshShell.SendKeys"{DOWN}"〞表示。
Space---------WshShell.SendKeys""
Enter---------WshShell.SendKeys"{ENTER}"
←---------WshShell.SendKeys"{RIGHT}"
↑---------WshShell.SendKeys"{UP}"
F1---------WshShell.SendKeys"{F1}"1234下一页责编:豆豆技术应用Tips:如果需要发送多个重复的单字母按键,不必重复输入该字母,SendKeys允许使用简化格式进展描述,使用格式为“{按键数字}〞。例如要发送10个字母“*〞,则输入“WshShell.SendKeys"{*10}"〞即可。实例:----------------------------------------------------按下F5刷新桌面DimWshShell,Path,i
SetWshShell=WScript.CreateObject("WScript.Shell")
WshShell.SendKeys"{F5}"----------------------------------------------------电脑的自动重启setWshShell=CreateObject("WScript.Shell")
WshShell.SendKeys"^{ESC}u"
WshShell.SendKeys"R"
----------------------------------------------------启动任务管理器setWshShell=CreateObject("WScript.Shell")WshShell.SendKeys"^+{ESC}"----------------------------------------------------QQ消息群发DimWshShell
SetWshShell=WScript.createObject("WScript.Shell")
WshShell.AppActivate"bomb"
fori=1to60
WScript.Sleep800
WshShell.SendKeys"Number0"
WshShell.SendKeysi
WshShell.SendKeys"%s"
ne*t
----------------------------------------------------自动到百度搜索歌曲:whiteflagDimWshShell,Path,i
SetWshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run("IE*PLORE.E*E")
WScript.Sleep2000
WshShell.AppActivate"about:blank-MicrosoftInternetE*plorer"
WshShell.SendKeys"+{TAB}"
WshShell.SendKeys"mp3.baidu."
WScript.Sleep800
WshShell.SendKeys"{ENTER}"
WScript.Sleep3000
WshShell.SendKeys"whiteflag"
WScript.Sleep800
WshShell.SendKeys"{ENTER}"上一页1234下一页----------------------------------------------------在记事本中输入HappyBirthday!并保存为birth.t*tDimWshShell
SetWshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run"notepad"
WScript.Sleep1500
WshShell.AppActivate"无标题-记事本"
WshShell.SendKeys"H"
WScript.Sleep500
WshShell.SendKeys"a"
WScript.Sleep500
WshShell.SendKeys"p"
WScript.Sleep500
WshShell.SendKeys"p"
WScript.Sleep500
WshShell.SendKeys"y"
WScript.Sleep500
WshShell.SendKeys""
WScript.Sleep500
WshShell.SendKeys"B"
WScript.Sleep500
WshShell.SendKeys"i"
WScript.Sleep500
WshShell.SendKeys"r"
WScript.Sleep500
WshShell.SendKeys"t"
WScript.Sleep500
WshShell.SendKeys"h"
WScript.Sleep500
WshShell.SendKeys"d"
WScript.Sleep500
WshShell.SendKeys"a"
WScript.Sleep500
WshShell.SendKeys"y"
WScript.Sleep500
WshShell.SendKeys"!"
WScript.Sleep500
WshShell.SendKeys"%FS"
WScript.Sleep500
WshShell.SendKeys"b"
WScript.Sleep500
WshShell.SendKeys"i"
WScript.Sleep500
WshShell.SendKeys"r"
WScript.Sleep500
WshShell.SendKeys"t"
WScript.Sleep500
WshShell.SendKeys"h"
WScript.Sleep500
WshShell.SendKeys"%S"
WScript.Sleep500
WshShell.SendKeys"%F*"上一页1234下一页----------------------------------------------------制作能自动定时存盘的记事本'第一局部:定义变量和对象DimWshShell,AutoSaveTime,T*TFileName
AutoSaveTime=300000
SetWshShell=WScript.CreateObject("WScript.Shell")
T*TFileName=InputBo*("请输入你要创立的文件名(不能用中文和纯数字):")'第二局部:翻开并激活记事本WshShell.Run"notepad"WScript.Sleep200WshShell.AppActivate"无标题-记事本"'第三局部:用输入的文件名存盘WshShell.SendKeys"^s"
WScript.Sleep300
WshShell.SendKeysT*TFileName
WScript.Sleep300
WshShell.SendKeys"%s"
WScript.SleepAutoSaveTime'第四局部:自动定时存盘WhileWshShell.AppActivate(T*TFileName)=True
WshShell.SendKeys"^s"
WScript.SleepAutoSaveTime
Wend
WScript.Quit----------------------------------------------------死机的,嘿嘿!DIMWSHSHELL
SETWSHSHELL=WSCRIPT.CREATEOBJECT("WSCRIPT.SHELL")
'WSHSHELL.RUN""
'WSCRIPT.SLEEP1000
WSHSHELL.SENDKEYS"{ENTER}"
'WSCRIPT.SLEEP1000
WSHSHELL.SENDKEYS"{ENTER}"
'WSCRIPT.SLEEP1000
WSHSHELL.SENDKEYS"{ENTER}"
'WSCRIPT.SLEEP1000
WSHSHELL.SENDKEYS"{ENTER}"
'WSCRIPT.SLEEP1000
WSHSHELL.SENDKEYS"{E
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 最终解释权声明书
- 机器人产业创新合作协议2024
- 药品研发与生产项目合作框架
- 企业行政管理规章制度的构建与实施
- 基于生成模型T5的民事法律判决预测及可解释性研究
- 社交网络中青少年的情感表达与心理健康研究
- 工业设备维护保养服务合同
- 2025-2030年地质数据质量控制软件企业制定与实施新质生产力战略研究报告
- 资产专用性对农户耕地转入的影响研究
- 2025-2030年土壤改良效果监测行业深度调研及发展战略咨询报告
- 寺庙线上运营策划方案
- 动态公路车辆自动衡器
- 委托收款三方协议书
- 电路邱关源版第10章
- 绿植租摆服务投标方案(技术方案)
- 2020新译林版高中英语全七册单词表(必修一~选择性必修四)
- 安全教育培训记录表(春节节后)
- 运筹学完整版课件-002
- 2023年高考全国甲卷语文试卷真题(含答案)
- 2023年中国工商银行苏州分行社会招聘30人笔试备考试题及答案解析
- 中粮五常筒仓工程施工组织设计方案
评论
0/150
提交评论