VBS脚本必备教学教育资料.doc
《VBS脚本必备教学教育资料.doc》由会员分享,可在线阅读,更多相关《VBS脚本必备教学教育资料.doc(50页珍藏版)》请在得力文库 - 分享文档赚钱的网站上搜索。
1、VBS 脚本教程就像多数计算机教程一样 ,我们从“Hello World!”程序开始我们的练习。 什么?不知道是什么意思?就是说大部分的计算机程序设计教程开篇入门都是 编写一个小程序,执行这个程序的结果就是在计算机的屏幕上或者 dos 窗口中 显示一行文字:Hello World!好了,我们开始吧。 打开你的“记事本”程序,在编辑窗口填写: msgbox “Hello World!“ 然后用鼠标单击“文件”菜单,单击“保存” ,把“保存在”一栏设为桌面,在 “文件名”一栏中填写 kk.vbs,单击“保存”就可以了。然后最小化“记事本” 窗口,在桌面上寻找你刚刚保存的 kk.vbs,然后双击。看
2、到弹出的对话框了没 有,单击“确定” ,对话框消失了。难看了点,不过确实是你编写的第一个脚本 程序。说明之一:上面的操作中,保存位置放在桌面,仅仅是为了执行方便,你保存 到其他的地方完全没有问题,只要你知道你保存在什么地方就可以了,什么? 是废话,自己保存的当然知道保存在那里了。不,自己保存的文件自己找不到 的人我见的多了去了。文件名你可以随意填写,不一定非要写 kk,只要符合 Windows 的文件命名规则就可以了,但是扩展名必须是 vbs,什么?不知道什么 是扩展名?就是文件名中“.”后的那部分,简单说,就是 vbs 脚本文件命名时 必须是:xxx.vbs,其中 xxx 你随意。说明之二:
3、在记事本编辑窗口中写的这行是什么意思?Msgbox 是 VBS 内建的函数,每一个函数都可以完成一定的功能,你只需要按照 语法要求,在函数的相应部分填写相应的内容就可以了,这部分内容我们称为 参数,当然函数执行的结果我们称为返回值,一个函数可以有返回值也可以没 有,可以有参数也可以没有。你不用了解函数是怎么运作的,只要了解这个函 数能干什么就行了。Msgbox 语法:msgbox “对话框内容“, , “对话框的标题“你不妨用记事本打开刚才的文件在编辑窗口中输入:msgbox “Hello World!“ , , “系统提示“执行一下,看看效果和位置。说明之三:如果执行失败,看看你的标点符号,
4、所有的标点符号必须是在英文 状态下输入的。当然,这个脚本实在是太简单了,甚至连最简单的交互都没有,所以你可以把 脚本这样修改一下:Dim namename=Inputbox(“请输入你的名字:“,“名称“) Msgbox name, , “您的名字是“ 保存执行一下,看到弹出的对话框了么?填入你的名字,点确定,看到结果了 吗?说明之一:第一句是定义变量,dim 是定义变量的语句其格式为:dim 变量 1,变量 2,Vbs 只有一种变量类型,所以不用声明变量类型。系统会自动分辨变量类型。说明之二:inputbox 是 VBS 内建的函数,可以接受输入的内容,其语法格式为:Inputbox(“对话
5、框内容“,“对话框标题“)第二句的意思是接受用户的输入,并把输入结果传递给变量 name。好了,到此脚本基本的输入输出函数都有了,已经可以完成一些比较简单的功 能了,你可以编写一个简单的脚本,然后拷贝的“程序”“启动”中,然后 重新启动计算机看看结果。Vbs 脚本编程简明教程之三Vbs 的基本语法(牢记)VBScript 基础知识一、变量1、所有单引号后面的内容都被解释为注释。2、在 VBScript 中,变量的命名规则遵循标准的命名规则,需要注意的是:在 VBScript 中对变量、方法、函数和对象的引用是不区分大小写的。在申明变量 时,要显式地申明一个变量,需要使用关键字 DIm 来告诉
6、VBScript 你要创建一 个变量,并将变量名称跟在其后。申明多个同类型变量,可以用逗号分隔。注 意:VBScript 中不允许在申明变量的时候同时给变量赋值。但是允许在一行代 码内同时对两个变量进行赋值,中间用冒号分隔。3、你可以使用 OptionExplicit 来告诉宿主变量必须先声明后使用。4、VBScript 在定义时只有一种变量类型,在实际使用中需要使用类型转换函 数来将变量转换成相应的变量类型。Cbool 函数将变量转换成布尔值;Cbyte 函数将变量转换为 0 到 255 之间的整数。Ccur 函数、Cdbl 函数和 Csng 函数将变量转换为浮点数值,前者只精确到小数 点后
7、四位,后两者要更加精确,数值的范围也要大的多。 CCur 函数可把表达式转换为货币(Currency)类型 CSng 函数可把表达式转换为单精度(Single)类型。Cdate 函数将变量转换为日期值。Cint 函数和 Clng 函数将变量转换为整数,后者的范围比前者要大的多。Cstr 函数将变量转换为字符串。二、数组数组的定义与变量非常类似,只需要在变量后描述这个数组的个数和维数。需 要注意的是:数组的下标总是从 0 开始,而以数组定义中数值减一结束。也就 是说你以要定义一个有十个数据的数组,将这样书写代码:dim array(9) ,同 样,当你要访问第五个元素时,实际的代码是 array
8、(4)。当然,你可以通过不 指定数组的个数和维数来申明动态数组。等到数组的个数和维数固定后,使用 关键字 redim 来改变数组。注意,在改变数组的大小时,数组的数据会被破坏, 使用关键字 preserve 来保护数据。例如:Redim 空格 preserve 空格 array 括号个数逗号维数括号 Redim preserve arry(3,1)三、操作符在 VBScript 运算符中,加减乘除都是我们常用的符号,乘方使用的是 ,取 模使用的 Mod。在比较操作符中,等于、小于、大于、小于等于、大于等于都与我们常用的符 号是一致的,而不等于是小于和大于连用(AND 非操作NOT 或操作OR;
9、你可以使用操作符 + 和操作符 & 来连接字符串,一般使用&操作符;另外还有一个比较特殊的操作符 Is 用来比较对象,例如按钮对象,如果对象是 同一类型,结果就是真,如果对象不是同一类型,结果就是假。四、条件语句主要有 ifthen 语句和 select case 语句两种形式在 ifthen 语句中,其基本形式为:If 条件 then处理条件的语句;Endif基本形式只能对单个条件进行验证,如果有两个条件,则需要在基本形式中添 加单行语句 else,如果还有更多的条件需要验证,则需要添加语句Elseif 条件 then处理条件语句在 select case 语句中,其基本形式为:Select
10、 case 变量 Case 条件值 处理条件语句并对上两句进行重复最后一句应为case else处理语句当然不要忘记将条件结束语句 End select 放在最后一行注意:在执行字符串比较时,需要特别注意大小写,一般情况下,我们在比较 前,使用 lcase 函数将字符串转换成小写,使用 ucase 函数将字符串转换成大 写。五、循环控制语句循环控制语句有 fornext 循环、foreach 循环、dowhile 循环、 dountil 循环、while 循环五种形式。在使用循环控制语句前,首先要对循环条件进行判断,如果循环次数是有固定 次数的,那么使用 Fornext 循环,其结构为:For
11、 计数器变量开始计数值 to 最后计数值执行循环体Next如果是需要对数组或对象集合中的每一个元素进行判断,则需要使用 foreach 循环,其结构为:For each 循环计数变量 in 要查看的对象或数组执行处理语句Next注意:在上述两种循环中随时可以使用 exit for 来退出循环如果你希望在条件满足时执行一段代码则使用 dowhile 语句,结构为:Do while 条件执行循环体Loop如果你希望在条件不满足时执行代码,则使用 dountil 语句,结构为:Do until 条件执行循环体Loop当然,在这两种循环语句中,你可以使用 exit do 来退出循环最后一种循环语句是条
12、件满足时一直执行循环,While 条件执行循环体Wend六、使用过程常用的过程有两种,一种为函数,给调用者返回值,一种为子程序,无返回值, 还有一种叫事件的特殊子程序,用的比较少。函数的基本定义方法为:Function 函数名称(参数列表)函数代码函数名称某值 用来返回值end function子程序一些都类似,不过没有返回值注意:尽管在定义子程序的时候,参数列表要加括号,但在调用子程序的时候, 参数列表不加括号,括号只在函数中使用。另外,子程序不能在表达式中使用。而函数只能出现在赋值语句的右边,或者表达式中,函数不能直接使用,如果 必须直接使用函数,则必须使用 call 语句调用,并取消返回
13、值Vbs 脚本编程简明教程之四如何利用 Vbs 运行外部程序? Vbs 只提供了编程的一个基本框架,用户可以使用 Vbs 来定义变量、过程 和函数,vbs 也提供了一些内部函数和对象,但是 Vbs 没有提供任何命令来访 问 Windows 系统内部的部件,但是值得庆幸的是,Vbs 虽然不能自己完成这些 任务,但是它提供了一条极为方便、功能也相当强的命令CreateObject, 这条命令可以访问 windows 系统内安装的所有 com 对象,并且可以调用这些部 件中存放的命令。于是问题解决了,比如说,我手头有 1000 个小文本,我首先要对每一个文本的 语法进行查错和修改,然后按照预先定义好
14、的规则对这些文本进行排序,最后 将这些文本合并成为一个文件。正常情况下,我们需要把打开第一个小文本,然后把它复制到 WORD 中,然后利用里面的除错功能进行除错和修改,然后再导 入到 EXCEL 中进行排序,将这个过程重复 1000 遍,然后再将所有得到的文本复 制到一个大文本中。实在是太枯燥、工作量太大了。有了 Vbs 和 CreateObject,问题得到解决,我只需要找到相应的模块,调用相应的功能就 可以了,作为脚本,把一个枯燥的过程重复 1000 次,本就是它的拿手好戏。好了,我们走入正题,从最简单的只启动一个程序开始。WSH 也就是用来解析 Vbs 的宿主,本身包含了几个个常用对象:
15、1、Scripting.FileSystemObject 提供一整套文件系统操作函数2、Scripting.Dictionary 用来返回存放键值对的字典对象3、Wscript.Shell 提供一套读取系统信息的函数,如读写注册表、查找 指定文件的路径、读取 DOS 环境变量,读取链接中的设置4、Wscript.NetWork 提供网络连接和远程打印机管理的函数。 (其中, 所有 Scripting 对象都存放在 SCRRUN.DLL 文件中,所有的 Wscript 对象都存放 在 WSHOM.ocx 文件中。 )现在我们需要的是第三个对象,好了,让我们先连接一下对象看看,在记事本 的编辑窗口
16、中输入:Set objShell = CreateObject(“Wscript.Shell”)objShell.Run “notepad”同样,保存执行。那么看到了一个什么样的结果呢?在桌面上又打开了一个记 事本。说明之一:Set 是 Vbs 指令,凡是将一对象引用赋给变量,就需要使用 set 关 键字。那么什么是对象引用呢?凡是字符串、数值、布尔值之外的变量都是对 象引用。Objshell 是变量名,可以随意修改。说明之二:反是正确引用的对象,其本身内置有函数和变量,其引用方法为在 变量后加“. ” ,后紧跟其实现功能的函数就可以了。Objshell.run 的意思就 是调用 Wscrip
17、t.shell 中的运行外部程序的函数run,notepad 是记事本程 序的文件名。当然你也可以改成“calc” ,这是计算器的文件名,winword 是 word 的文件名,等等吧,所有可执行文件的文件名都可以。但是需要注意的是, 如果你要执行的可执行文件存放的地方不是程序安装的常用路径,一般情况下, 需要提供合法的路径名,但是 run 在运行解析时,遇到空格会停止,解决的方 法是使用双引号,例如:在我的机器上运行 qq,代码为:objshell.run “C:Program FilesQQ2006QQ.exe“ 注:三个引号好, 我们再进一步,启动两个程序会如何呢?输入如下代码:Set
18、objShell = CreateObject(“Wscript.Shell”)objShell.Run “notepad”objShell.Run “calc”执行会如何呢?两个程序基本上同时启动了。如果我们需要先启动 notepad 再 启动 calc 将如何呢?很简单在需要顺序执行的代码后加 , , True 参数就可以 了。 好了输入代码:Set objShell = CreateObject(“Wscript.Shell”)objShell.Run “notepad” ,trueobjShell.Run “calc”看看执行的结果怎么样吧!总结:run 函数有三个参数,第一个参数是你
19、要执行的程序的路径,第二个程 序是窗口的形式,0 是在后台运行;1 表示正常运行;2 表示激活程序并且显示 为最小化;3 表示激活程序并且显示为最大化;一共有 10 个这样的参数我只列 出了 4 个最常用的。 第三个参数是表示这个脚本是等待还是继续执行,如果设 为了 true,脚本就会等待调用的程序退出后再向后执行。 其实,run 做为函数,前面还有一个接受返回值的变量,一般来说如果返回为 0,表示成功执行,如果不为 0,则这个返回值就是错误代码,可以通过这个代 码找出相应的错误Vbs 脚本编程简明教程之五错误处理引发错误的原因有很多,例如用户输入了错误类型的值,或者脚本找不到必需 的文件、目
20、录或者驱动器,我们可以使用循环技术来处理错误,但是 VBS 本身 也提供了一些基本技术来进行错误的检测和处理。1、最常见的错误是运行时错误,也就是说错误在脚本正在运行的时候发生,是 脚本试图进行非法操作的结果。例如零被作为除数。在 vbs 中,任何运行时错 误都是致命的,此时,脚本将停止运行,并在屏幕上显示一个错误消息。你可以在脚本的开头添加On Error Resume Next 这行语句可以告诉 vbs 在运行时跳过发生错误的语句,紧接着执行跟在它后面 的语句。发生错误时,该语句将会把相关的错误号、错误描述和相关源代码压入错误堆 栈。2、虽然 On Error Resume Next 语句
21、可以防止 vbs 脚本在发生错误时停止运行, 但是它并不能真正处理错误,要处理错误,你需要在脚本中增加一些语句,用 来检查错误条件并在错误发生时处理它。vbscript 提供了一个对象 err 对象,他有两个方法 clear,raise,5 个属性: description,helpcontext,helpfile,number,sourceerr 对象不用引用实例,可以直接使用,例如: on error resume next a=11 b=0 c=a/b if err.numbertrue ffile.read(10)loopatendofline 属性:如果已经到了行末尾,这个属性返回
22、true。Column 属性(当前字符位置的列号)和 line 属性(文件当前行号):在打开一个文件后,行和列指针都被设置为 1。4、在文件中跳行:skip(x)跳过 x 个字符;skipline 跳过一行5、在文件中写入字符:可以用 2写入和 8追加的方式来写入其方法有:write(x)写入 x 字符串;writeline(x)写入 x 代表的一行writeblanklines(n) 写入 n 个空行注意:最后一定要使用 close 方法关闭文件。读文件后一定要关闭,才能以写 的方式打开。Vbs 脚本编程简明教程之十二使用系统对话框在 VBS 脚本设计中,如果能使用 windows 提供的系
23、统对话框,可以简化脚本的 使用难度,使脚本人性化许多,很少有人使用,但 VBS 并非不能实现这样的功 能,方法当然还是利用 COM 对象。1、SAFRCFileDlg.FileSave 对象:属性有:FileName 指定默认文件名; FileType 指定文件扩展名;OpenFileSaveDlg 显示文件保存框体方法。2、SAFRCFileDlg.FileOpen 对象:FileName 默认文件名属性; OpenFileOpenDlg 显示打开文件框体方法。3、UserAccounts.CommonDialog 对象:Filter 扩展名属性(“vbs File|*.vbs|All Fi
24、les|*.*“) ;FilterIndex 指定InitialDir 指定默认的文件夹FileName 指定的文件名Flags 对话框的类型Showopen 方法:很简单,ok,让我们来举两个简单的例子:例一:保存文件Set objDialog = CreateObject(“SAFRCFileDlg.FileSave“)Set objFSO = CreateObject(“Scripting.FileSystemObject“)objDialog.FileName = “test“objDialog.FileType = “.txt“intReturn = objDialog.OpenFi
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VBS 脚本 必备 教学 教育 资料
限制150内