下载

1下载券

加入VIP
  • 专属下载特权
  • 现金文档折扣购买
  • VIP免费专区
  • 千万文档免费下载

上传资料

关闭

关闭

关闭

封号提示

内容

首页 VBS脚本教程

VBS脚本教程.doc

VBS脚本教程

xyzduan
2012-02-05 0人阅读 举报 0 0 暂无简介

简介:本文档为《VBS脚本教程doc》,可适用于IT/计算机领域

VBS脚本教程(一)打开你的“记事本”程序在编辑窗口填写:msgbox"HelloWorld!"然后用鼠标单击“文件”菜单单击“保存”把“保存在”一栏设为桌面在“文件名”一栏中填写kkvbs单击“保存”就可以了。然后最小化“记事本”窗口在桌面上寻找你刚刚保存的kkvbs然后双击。看到弹出的对话框了没有单击“确定”对话框消失了。难看了点不过确实是你编写的第一个脚本程序。说明之一:上面的操作中保存位置放在桌面仅仅是为了执行方便你保存到其他的地方完全没有问题只要你知道你保存在什么地方就可以了什么?是废话自己保存的当然知道保存在那里了。不自己保存的文件自己找不到的人我见的多了去了。文件名你可以随意填写不一定非要写kk只要符合Windows的文件命名规则就可以了但是扩展名必须是vbs什么不知道什么是扩展名?就是文件名中“”后的那部分简单说就是vbs脚本文件命名时必须是:xxxvbs其中xxx你随意。说明之二:在记事本编辑窗口中写的这行是什么意思?Msgbox是VBS内建的函数每一个函数都可以完成一定的功能你只需要按照语法要求在函数的相应部分填写相应的内容就可以了这部分内容我们称为参数当然函数执行的结果我们称为返回值一个函数可以有返回值也可以没有可以有参数也可以没有。你不用了解函数是怎么运作的只要了解这个函数能干什么就行了。Msgbox语法:msgbox"对话框内容",,"对话框的标题"你不妨用记事本打开刚才的文件在编辑窗口中输入:msgbox"HelloWorld!",,"系统提示"执行一下看看效果和位置。说明之三:如果执行失败看看你的标点符号所有的标点符号必须是在英文状态下输入的。当然这个脚本实在是太简单了甚至连最简单的交互都没有所以你可以把脚本这样修改一下:Dimnamename=Inputbox("请输入你的名字:","名称")Msgboxname,,"您的名字是"保存执行一下看到弹出的对话框了么?填入你的名字点确定看到结果了吗?说明之一:第一句是定义变量dim是定义变量的语句其格式为:dim变量,变量……Vbs只有一种变量类型所以不用声明变量类型。系统会自动分辨变量类型。说明之二:inputbox是VBS内建的函数可以接受输入的内容其语法格式为:Inputbox("对话框内容","对话框标题")第二句的意思是接受用户的输入并把输入结果传递给变量name。好了到此脚本基本的输入输出函数都有了已经可以完成一些比较简单的功能了你可以编写一个简单的脚本然后拷贝的“程序”>“启动”中然后重新启动计算机看看结果。◎Vbs脚本编程简明教程之三Vbs的基本语法(牢记)VBScript基础知识一、变量、所有单引号后面的内容都被解释为注释。、在VBScript中变量的命名规则遵循标准的命名规则需要注意的是:在VBScript中对变量、方法、函数和对象的引用是不区分大小写的。在申明变量时要显式地申明一个变量需要使用关键字DIm来告诉VBScript你要创建一个变量并将变量名称跟在其后。申明多个同类型变量可以用逗号分隔。注意:VBScript中不允许在申明变量的时候同时给变量赋值。但是允许在一行代码内同时对两个变量进行赋值中间用冒号分隔。、你可以使用OptionExplicit来告诉宿主变量必须先声明后使用。、VBScript在定义时只有一种变量类型在实际使用中需要使用类型转换函数来将变量转换成相应的变量类型。Cbool函数将变量转换成布尔值Cbyte函数将变量转换为到之间的整数。Ccur函数、Cdbl函数和Csng函数将变量转换为浮点数值前者只精确到小数点后四位后两者要更加精确数值的范围也要大的多。Cdate函数将变量转换为日期值。Cint函数和Clng函数将变量转换为整数后者的范围比前者要大的多。Cstr函数将变量转换为字符串。二、数组数组的定义与变量非常类似只需要在变量后描述这个数组的个数和维数。需要注意的是:数组的下标总是从开始而以数组定义中数值减一结束。也就是说你以要定义一个有十个数据的数组将这样书写代码:dImarray()同样当你要访问第五个元素时实际的代码是array()。当然你可以通过不指定数组的个数和维数来申明动态数组。等到数组的个数和维数固定后使用关键字redim来改变数组。注意在改变数组的大小时数组的数据会被破坏使用关键字preserve来保护数据。例如:RedIm空格preserve空格array括号个数逗号维数括号三、操作符在VBScript运算符中加减乘除都是我们常用的符号乘方使用的是^取模使用的Mod。在比较操作符中等于、小于、大于、小于等于、大于等于都与我们常用的符号是一致的而不等于是小于和大于连用。逻辑运算符为:和操作>AND非操作>NOT或操作>OR你可以使用操作符和操作符来连接字符串一般使用操作符另外还有一个比较特殊的操作符Is用来比较对象例如按钮对象如果对象是同一类型结果就是真如果对象不是同一类型结果就是假。四、条件语句主要有if……then语句和selectcase语句两种形式在if……then语句中其基本形式为:If条件then处理条件的语句……Endif基本形式只能对单个条件进行验证如果有两个条件则需要在基本形式中添加单行语句else如果还有更多的条件需要验证则需要添加语句Elseif条件then处理条件语句在selectcase语句中其基本形式为:Selectcase变量Case条件值处理条件语句并对上两句进行重复最后一句应为caseelse处理语句当然不要忘记将条件结束语句Endselect放在最后一行注意:在执行字符串比较时需要特别注意大小写一般情况下我们在比较前使用lcase函数将字符串转换成小写使用ucase函数将字符串转换成大写大写。五、循环控制语句循环控制语句有for……next循环、for……each循环、do……while循环、do……until循环、while循环五种形式。在使用循环控制语句前首先要对循环条件进行判断如果循环次数是有固定次数的那么使用For……next循环其结构为:For计数器变量=开始计数值to最后计数值执行循环体Next如果是需要对数组或对象集合中的每一个元素进行判断则需要使用for……each循环其结构为:Foreach循环计数变量in要查看的对象或数组执行处理语句Next注意:在上述两种循环中随时可以使用exitfor来退出循环如果你希望在条件满足时执行一段代码则使用do……while语句结构为:Dowhile条件执行循环体Loop如果你希望在条件不满足时执行代码则使用do……until语句结构为:Do until 条件执行循环体Loop当然在这两种循环语句中你可以使用exitdo来退出循环最后一种循环语句是条件满足时一直执行循环While条件执行循环体Wend六、使用过程常用的过程有两种一种为函数给调用者返回值一种为子程序无返回值还有一种叫事件的特殊子程序用的比较少。函数的基本定义方法为:Function函数名称(参数列表)函数代码函数名称=某值‘用来返回值endfunction子程序一些都类似不过没有返回值注意:尽管在定义子程序的时候参数列表要加括号但在调用子程序的时候参数列表不加括号括号只在函数中使用。另外子程序不能在表达式中使用。而函数只能出现在赋值语句的右边或者表达式中函数不能直接使用如果必须直接使用函数则必须使用call语句调用并取消返回值◎Vbs脚本编程简明教程之四如何利用Vbs运行外部程序?Vbs只提供了编程的一个基本框架用户可以使用Vbs来定义变量、过程和函数vbs也提供了一些内部函数和对象但是Vbs没有提供任何命令来访问Windows系统内部的部件但是值得庆幸的是Vbs虽然不能自己完成这些任务但是它提供了一条极为方便、功能也相当强的命令CreateObject这条命令可以访问windows系统内安装的所有com对象并且可以调用这些部件中存放的命令。于是问题解决了比如说我手头有个小文本我首先要对每一个文本的语法进行查错和修改然后按照预先定义好的规则对这些文本进行排序最后将这些文本合并成为一个文件。正常情况下我们需要把打开第一个小文本然后把它复制到WORD中然后利用里面的除错功能进行除错和修改然后再导入到EXCEL中进行排序将这个过程重复遍然后再将所有得到的文本复制到一个大文本中。实在是太枯燥、工作量太大了。有了Vbs和CreateObject问题得到解决我只需要找到相应的模块调用相应的功能就可以了作为脚本把一个枯燥的过程重复次本就是它的拿手好戏。好了我们走入正题从最简单的只启动一个程序开始。WSH也就是用来解析Vbs的宿主本身包含了几个个常用对象:、ScriptingFileSystemObject>提供一整套文件系统操作函数、ScriptingDictionary>用来返回存放键值对的字典对象、WscriptShell>提供一套读取系统信息的函数如读写注册表、查找指定文件的路径、读取DOS环境变量读取链接中的设置、WscriptNetWork>提供网络连接和远程打印机管理的函数。(其中所有Scripting对象都存放在SCRRUNDLL文件中所有的Wscript对象都存放在WSHOMocx文件中。)现在我们需要的是第三个对象好了让我们先连接一下对象看看在记事本的编辑窗口中输入:SetobjShell=CreateObject(“WscriptShell”)objShellRun“notepad”同样保存执行。那么看到了一个什么样的结果呢?在桌面上又打开了一个记事本。说明之一:Set是Vbs指令凡是将一对象引用赋给变量就需要使用set关键字。那么什么是对象引用呢?凡是字符串、数值、布尔值之外的变量都是对象引用。Objshell是变量名可以随意修改。说明之二:反是正确引用的对象其本身内置有函数和变量其引用方法为在变量后加“”后紧跟其实现功能的函数就可以了。Objshellrun的意思就是调用Wscriptshell中的运行外部程序的函数runnotepad是记事本程序的文件名。当然你也可以改成“calc”这是计算器的文件名winword是word的文件名等等吧所有可执行文件的文件名都可以。但是需要注意的是如果你要执行的可执行文件存放的地方不是程序安装的常用路径一般情况下需要提供合法的路径名但是run在运行解析时遇到空格会停止解决的方法是使用双引号例如:在我的机器上运行qq代码为:objshellrun"""C:ProgramFilesQQQQexe"""‘注:三个引号好我们再进一步启动两个程序会如何呢?输入如下代码:SetobjShell=CreateObject(“WscriptShell”)objShellRun“notepad”objShellRun“calc”执行会如何呢?两个程序基本上同时启动了。如果我们需要先启动notepad再启动calc将如何呢?很简单在需要顺序执行的代码后加,,True参数就可以了。好了输入代码:SetobjShell=CreateObject(“WscriptShell”)objShellRun“notepad”,,trueobjShellRun“calc”看看执行的结果怎么样吧!总结:run函数有三个参数第一个参数是你要执行的程序的路径第二个程序是窗口的形式是在后台运行表示正常运行表示激活程序并且显示为最小化表示激活程序并且显示为最大化一共有个这样的参数我只列出了个最常用的。第三个参数是表示这个脚本是等待还是继续执行如果设为了true,脚本就会等待调用的程序退出后再向后执行。其实run做为函数前面还有一个接受返回值的变量一般来说如果返回为表示成功执行如果不为则这个返回值就是错误代码可以通过这个代码找出相应的错误◎Vbs脚本编程简明教程之五错误处理引发错误的原因有很多例如用户输入了错误类型的值或者脚本找不到必需的文件、目录或者驱动器我们可以使用循环技术来处理错误但是VBS本身也提供了一些基本技术来进行错误的检测和处理。、最常见的错误是运行时错误也就是说错误在脚本正在运行的时候发生是脚本试图进行非法操作的结果。例如零被作为除数。在vbs中任何运行时错误都是致命的此时脚本将停止运行并在屏幕上显示一个错误消息。你可以在脚本的开头添加OnErrorResumeNext这行语句可以告诉vbs在运行时跳过发生错误的语句紧接着执行跟在它后面的语句。发生错误时,该语句将会把相关的错误号、错误描述和相关源代码压入错误堆栈。、虽然OnErrorResumeNext语句可以防止vbs脚本在发生错误时停止运行但是它并不能真正处理错误要处理错误你需要在脚本中增加一些语句用来检查错误条件并在错误发生时处理它。vbscript提供了一个对象err对象他有两个方法clearraise个属性:descriptionhelpcontexthelpfilenumbersourceerr对象不用引用实例可以直接使用例如:onerrorresumenexta=b=c=abiferrnumber<>thenwscriptechoerrnumbererrdescriptionerrsourceendif◎Vbs脚本编程简明教程之六修改注册表Vbs中修改注册表的语句主要有:、读注册表的关键词和值:可以通过把关键词的完整路径传递给wshshell对象的regread方法。例如:setws=wscriptcreateobject("wscriptshell")v=wsregread("HKEYLOCALMACHINESOFTWAREMicrosoftWindowsCurrentVersionRunnwiz")wscriptechov、写注册表使用wshshell对象的regwrite方法。例子:path="HKEYLOCALMACHINESOFTWAREMicrosoftWindowsCurrentVersionRun"setws=wscriptcreateobject("wscriptshell")t=wsregwrite(path"jj","hello")这样就把HKEYLOCALMACHINESOFTWAREMicrosoftWindowsCurrentVersionRunjj这个键值改成了hello不过要注意:这个键值一定要预先存在。如果要创建一个新的关键词同样也是用这个方法。path="HKEYLOCALMACHINESOFTWAREMicrosoftWindowsCurrentVersionrunsssalove"setws=wscriptcreateobject("wscriptshell")val=wsregwrite(path,"nenboy")val=wsregread(path)wscriptechoval删除关键字和值使用regdelete方法把完整的路径传递给regdelete就可以了例如val=wsregdel(path)注意如果要删除关键词的值的话一定要在路径最后加上“”如果不加斜线就会删除整个关键词。◎Vbs脚本编程简明教程之七FSO的常见对象和方法文件系统是所有操作系统最重要的部分之一脚本经常会需要对文件及文件夹进行访问和管理在Vbs中对桌面和文件系统进行访问的顶级对象是FileSystemObject(FSO)这个对象特别复杂是vbs进行文件操作的核心。此节内容应了如指掌。FSO包含的常见对象有:Drive对象:包含储存设备的信息包括硬盘、光驱、ram盘、网络驱动器Drives集合:提供一个物理和逻辑驱动器的列表File对象:检查和处理文件Files集合:提供一个文件夹中的文件列表Folder对象:检查和处理文件夹Folders集合:提供文件夹中子文件夹的列表Textstream对象:读写文本文件FSO的常见方法BulidPath:把文件路径信息添加到现有的文件路径上CopyFile:复制文件CopyFolder:复制文件夹CreateFolder:创建文件夹CreateTextFile:创建文本并返回一个TextStream对象DeleteFile:删除文件DeleteFolder:删除文件夹及其中所有内容DriveExits:确定驱动器是否存在FileExits:确定一个文件是否存在FolderExists:确定某文件夹是否存在GetAbsolutePathName:返回一个文件夹或文件的绝对路径GetBaseName:返回一个文件或文件夹的基本路径GetDrive:返回一个dreve对象GetDriveName:返回一个驱动器的名字GetExtensionName:返回扩展名GetFile:返回一个file对象GetFileName:返回文件夹中文件名称GetFolder:返回一个文件夹对象GetParentFolderName:返回一个文件夹的父文件夹GetSpecialFolder:返回指向一个特殊文件夹的对象指针GetTempName:返回一个可以被createtextfile使用的随机产生的文件或文件夹的名称MoveFile:移动文件MoveFolder:移动文件夹OpenTextFile:打开一个存在的文件并返回一个TextStream对象◎Vbs脚本编程简明教程之八FSO中文件夹的基本操作、使用fso由于fso不是wsh的一部分所以我们需要建立他的模型例如setfs=wscriptcreateobject(“scriptingfilesystemobject”)这样就建立了fso的模型。如果要释放的话也很简单setfs=nothing、使用文件夹在创建前我们一般需要检查该文件夹是否存在例如:dimfs,s定义fs、s两个变量setfs=wscriptcreateobject(“scriptingfilesystemobject”)fs为FSO实例if(fsfolderexists(“c:temp”))then判断c:temp文件夹是否存在s=”isavailable”elses=”notexist”setfoldr=fscreatefolder(“c:temp”)不存在则建立endif删除:setfs=wscriptcreateobject(“scriptingfilesystemobject”)fsdeletefolder(“c:windows”)拷贝:setfs=wscriptcreateobject(“scriptingfilesystemobject”)fscopyfolder“c:data”“d:data”注意:如果c:data和d:data都存在脚本会出错复制也就会停止如果要强制覆盖使用fscopyfolder“c:data”“d:data”true移动:setfs=wscriptcreateobject(“scriptingfilesystemobject”)fsmovefolder“c:data”“d:data”我们可以使用统配符来方便操作:例如fsmovefolder:c:datate*”,“d:working”注意:在目的路径最后没有使用“”也就是说我没有这样写:fsmovefolderc:datate*”,“d:working”这样写的话如果d:working目录不存在windows就不会为我们自动创建这个目录。注意:上面我们所举的例子都是在利用fso提供的方法如果使用folder对象也完全是可以的:setfs=wscriptcreateobject(“scriptingfilesystemobject”)setf=fsgetfolder(“c:data”)fdelete删除文件夹c:data。如果有子目录也会被删除fcopy“d:working”,true拷贝到d:workingfmove“d:temp”移动到d:temp、特殊文件夹一般指的就是系统文件夹:windowssystem临时文件夹windows文件夹在前几篇的时候我们提过一下:例如setfs=wscriptcreateobject(“scriptingfilesystemobject”)setwshshell=wscriptcreateobject(“wscriptshell”)osdir=wshshellexpandenvironmentstrings(“systemroot”)setf=fsgetfolder(osdir)wscriptechof当然还有简单的方法那就是使用getspecialfolder()这个方法使用种值:表示windows文件夹相关常量是windowsfolder系统文件夹相关常量是systemfolder临时目录相关常量temporaryfolder例如:setfs=wscriptcreateobject(“scriptingfilesystemobject”)setwfolder=fsgetspecialfolder()‘返回windows目录setwfolder=fsgetspecialfolder()‘返回systemsetwfolder=fsgetspecialfolder()'返回临时目录◎Vbs脚本编程简明教程之九妙用SendKeys简化重复操作每次开机的时候你想自动登陆你的QQ或者网志吗?巧妙使用VBS中的SendKeys命令(这个命令的作用就是模拟键盘操作将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行)可以极大的方便我们的常用操作。其使用格式为:ObjectSendKeysstring其中:Object:为WshShell对象即脚本的第一行为:SetWshShell=WScriptCreateObject("WScriptShell")将Object替换为WshShell“string”:表示要发送的按键指令字符串需要放在英文双引号中。它包含如下内容:.基本键:一般来说要发送的按键指令都可以直接用该按键字符本身来表示例如要发送字母“x”使用“WshShellSendKeys"x"”即可。当然也可直接发送多个按键指令只需要将按键字符按顺序排列在一起即可例如要发送按键“cfan”可以使用“WshShellSendKeys"cfan"”。.特殊功能键:对于需要与Shift、Ctrl、Alt三个控制键组合的按键SendKeys使用特殊字符来表示:ShiftCtrl^Alt如要发送的组合按键是同时按下Ctrl+E需要用“WshShellSendKeys"^e"”表示如果要发送的组合按键是按住Ctrl键的同时按下E与C两个键这时应使用小括号把字母键括起来书写格式为“WshShellSendKeys"^(ec)"”这里要注意它与“WshShellSendKeys"^ec"”的区别后者表示组合按键是同时按住Ctrl和E键然后松开Ctrl键单独按下“C”字母键。由于“”、“^”这些字符用来表示特殊的控制按键了如何表示这些按键呢?只要用大括号括住这些字符即可。例如要发送加号“”可使用“WshShellSendKeys"{}"”。另外对于一些不会生成字符的控制功能按键也同样需要使用大括号括起来按键的名称例如要发送回车键需要用“WshShellSendKeys"{ENTER}"”表示发送向下的方向键用“WshShellSendKeys"{DOWN}"”表示。如果需要发送多个重复的单字母按键不必重复输入该字母SendKeys允许使用简化格式进行描述使用格式为“{按键数字}”。例如要发送个字母“x”则输入“WshShellSendKeys"{x}"”即可。例一:WshShellSendKeys"^{ESC}u"代码的含义为:按下Ctrl+Esc组合键(相当于按Win键)打开“开始”菜单接着按U键打开“关机”菜单。例二:让VBS脚本自动在记事本中输入一行文字“hello,welcometocfan”。DimWshShellSetWshShell=WScriptCreateObject("WScriptShell")WshShellRun"notepad"WScriptSleep本行的含义为是脚本暂停秒给notepad一个打开的时间有时时间太短可能导致后面的字符无法进入编辑区WshShellAppActivate"无标题记事本"AppActivate为寻找可执行程序的标题框”无标题-记事本”内容你的自己打开看一下WshShellSendKeys"hello,welcometocfan"作业:让脚本自动输入下面两段小短句ThisisthemostwonderfuldayofmylifebecauseI'mherewithyounow作业:让脚本在输入短句后自动关闭记事本并保存文件名为“test”注意关闭记事本可以直接使用组合按键Alt+F来实现例三:制作能自动定时存盘的记事本我们最常用的记事本没有Word、WPS那样的自动定时存盘功能其实利用VBS脚本再加上SendKeys命令就能弥补这个遗憾。打开记事本输入以下内容(为容易描述和分析把代码分为四个部分):'第一部分:定义变量和对象DimWshShell,AutoSaveTime,TXTFileNameAutoSaveTime=SetWshShell=WScriptCreateObject("WScriptShell")TXTFileName=InputBox("请输入你要创建的文件名(不能用中文和纯数字):")'第二部分:打开并激活记事本WshShellRun"notepad"WScriptSleepWshShellAppActivate"无标题记事本"'第三部分:用输入的文件名存盘WshShellSendKeys"^s"WScriptSleepWshShellSendKeysTXTFileNameWScriptSleepWshShellSendKeys"s"WScriptSleepAutoSaveTime'第四部分:自动定时存盘WhileWshShellAppActivate(TXTFileName)=TrueWshShellSendKeys"^s"WScriptSleepAutoSaveTimeWendWScriptQuit将其保存为记事本vbs以后要使用记事本时都通过双击这个脚本文件来打开。程序说明:这个脚本的基本思路是定时向记事本发送Ctrl+S这个存盘组合键。第一部分:定义了脚本中需要用到的变量和对象。“AutoSaveTime”变量用来设置自动存盘间隔单位为毫秒这里设置为分钟。“TXTFileName”变量通过输入框取得你要创建的文本文件名称。第二部分:运行记事本对于Windows本身提供的程序比如计算器等可直接在“WshShellRun”后输入程序名称如"calc"对于非系统程序则可输入完全路径但要注意使用格式输入比如“"D:Progra~TencentQQexe"”。第三部分:这里用SendKeys命令执行了这样的操作流程(请注意每个操作之间延时命令的使用):在记事本中按Ctrl+S组合键→弹出保存文件的窗口→输入文件名→按Alt+S组合键进行保存(默认保存在“我的文档”目录)。第四部分:定时存盘的关键通过“While……Wend”这个当条件为“真”时循环命令实现自动存盘代码“WshShellSendKeys"^s"”和定时代码“WScriptSleepAutoSaveTime”的重复执行。因为不能让这个定时存盘循环一直执行退出记事本后必须自动退出脚本并结束循环所以设计了一个循环判断条件“WshShellAppActivateTXTFileName=True”当记事本运行中时可以激活记事本窗口这个条件运行结果为“True”定时存盘循环一直执行退出记事本后脚本无法激活记事本窗口就会跳出循环执行“Wend”后面的“WScriptQuit”退出脚本。例四:快速登陆QQ软件。假设QQ号码是:密码是:隐身登陆:setws=wscriptcreateobject("wscriptshell")wsrun"C:Progra~TencentQQQQexe",wscriptSleepwsAppActivate"QQ用户登录"wsSendKeys""wscriptSleepwsSendKeys"{TAB}"wsSendKeys"*********"wscriptSleepwsSendKeys"{ENTER}"例五:关机菜单立刻显身打开记事本输入以下命令并将其保存为vbs:setWshShell=CreateObject("WScriptShell")WshShellSendKeys"^{ESC}u"双击运行它你会发现关机菜单立刻出现了。将“WshShellSendKeys"^{ESC}u"”改为“WshShellSendKeys"^{ESC}"”运行一下看看是否打开了任务管理器妙用SendKeys自动上网并登陆网志将下面的脚本复制到一个文本文件中并将其文件名命名为:自动登陆vbs然后将拨号软件及本脚本一起复制到程序启动项中就可以实现自动拨号上网并登陆到网志上。代码如下:Setwshshell=CreateObject("wscriptshell")wshshellAppActivate"连接MAEU拨号连接"wscriptSleepwshshellSendKeys"{enter}"wshshellRun"iexplore"WScriptSleepwshshellAppActivate"hao网址之家实用网址,搜索大全,尽在wwwhaocomMicrosoftInternetExplorer"'引号中的内容修改为你的浏览器打开后标题栏中的内容wshshellSendKeys"d"wshshellSendKeys"http:passportbaiducomlogin"wshshellSendKeys"{enter}"WScriptSleepwshshellSendKeys"此处修改为网志帐号"wshshellSendKeys"{tab}"wshshellSendKeys"此处修改为网志密码"wshshellSendKeys"{enter}"'wshshellSendKeys"d"◎Vbs脚本编程简明教程之十Vbs脚本编程常用的编辑器、VBSEDit汉化版、primalscript汉化版可以对多种脚本进行编辑◎Vbs脚本编程简明教程之十一FSO中文件的基本操作一、文件属性:在windows中文件的属性一般用数字来表示:代表normal即普通文件未设置任何属性。代表只读文件。代表隐藏文件。代表系统文件。代表文件夹或目录。代表存档文件。代表链接或快捷方式。例如:setfs=wscriptcreateobject(“scriptingfilesystemobject”)setf=fsgetfile(“d:indextxt”)msgboxfAttributes‘attributes函数的作用是显示文件属性需要说明的是:msgbox显示的结果往往不是上面说明的数字而是有关属性代表数字的和。作者:临汾市外事旅游局薛靖澜转载请注明出处二、创建文件:objectcreatetextfile方法注意创建前一般需要检查文件是否存在。例如:setfso=wscriptcreateobject(“scriptingfilesystemobject”)iffsofileexists(“c:kktxt”)thenmsgbox“文件已存在”elsesetf=fsocreatetextfile(“c:kktxt”)endif如需要强制覆盖已存在的文件则在文件名后加true参数。三、复制、移动、删除文件:使用copyfile方法、movefile方法、deletefile方法。例如:setfso=wscriptcreateobject(“scriptingfilesystemobject”)fsocopyfile“c:kktxt”,”d:kktxt”,true如上文说述true代表强制覆盖fsomovefile“c:kktxt”,“d:”移动文件fsodeletefile“c:kktxt”删除文件四、文件的读写:、打开文件:使用opentextfile方法如:setts=fsoopentextfile(“c:kktxt”,,true)说明:第二个参数为访问模式为只读、写入、为追加第三个参数指定如文件不存在则创建。、读取文件:read(x)读x个字符readline读一行readall全部读取如:setffile=fsoopentextfile(“c:kktxt”,,true)value=ffileread()line=ffilereadlinecontents=ffilereadall、常见的指针变量:atendofstream属性:当处于文件结尾的时候这个属性返回true。一般用循环检测是否到达文件末尾。例如:dowhileffileatendofstream<>trueffileread()loopatendofline属性:如果已经到了行末尾这个属性返回true。Column属性(当前字符位置的列号)和line属性(文件当前行号):在打开一个文件后行和列指针都被设置为。、在文件中跳行:skip(x)跳过x个字符skipline跳过一行、在文件中写入字符:可以用-写入和-追加的方式来写入其方法有:write(x)写入x字符串writeline(x)写入x代表的一行writeblanklines(n)写入n个空行注意:最后一定要使用close方法关闭文件。作者:临汾市外事旅游局薛靖澜转载请注明出处读文件后一定要关闭才能以写的方式打开。◎Vbs脚本编程简明教程之十二使用系统对话框在VBS脚本设计中如果能使用windows提供的系统对话框可以简化脚本的使用难度使脚本人性化许多很少有人使用但VBS并非不能实现这样的功能方法当然还是利用COM对象。、SAFRCFileDlgFileSave对象:属性有:FileName指定默认文件名FileType指定文件扩展名OpenFileSaveDlg显示文件保存框体方法。、SAFRCFileDlgFileOpen对象:FileName默认文件名属性OpenFileOpenDlg显示打开文件框体方法。、UserAccountsCommonDialog对象:Filter扩展名属性("vbsFile|*vbs|AllFiles|**")FilterIndex指定InitialDir指定默认的文件夹FileName指定的文件名Flags对话框的类型Showopen方法:很简单ok让我们来举两个简单的例子:例一:保存文件SetobjDialog=CreateObject("SAFRCFileDlgFileSave")SetobjFSO=CreateObject("ScriptingFileSystemObject")objDialogFileName="test"objDialogFileType="txt"intReturn=objDialogOpenFileSaveDlgIfintReturnThenobjFSOCreateTextFile(objDialogFileNameobjdialogfiletype)ElseWscriptQuitEndIf注意:、SAFRCFileDlgFileSave对象仅仅是提供了一个方便用户选择的界面本身并没有保存文件的功能保存文件还需要使用FSO对象来完成。、用FileType属性来指定默认的文件类型。、在调用OpenFileSaveDlg方法时最好把返回值保存到一变量中用它可以判断用户按下的是确定还是取消。例二:打开文件setobjFile=CreateObject("SAFRCFileDlgFileOpen")intRet=objFileOpenFileOpenDlgifintretthenmsgbox“文件打开成功!文件名为:”objFilefilenameelsewscriptquitendif例三:比较复杂的打开文件对话框SetobjDialog=CreateObject("UserAccountsCommonDialog")objDialogFilter="vbsFile|*vbs"objDialogInitialDir="c:"tfile=objDialogShowOpeniftfilethenstrLoadFile=objDialogFileNamemsgboxstrLoadFileelsewscriptquitendif说明:在脚本中加入objDialogFlags=H看看会出现什么结果。◎Vbs脚本编程简明教程之十三WMI基础WMI即Windows管理规范是用户管理本地和远程计算机的一种模型。通过它可以访问、配置、管理和监视几乎所有的Windows资源。WMI的语法十分简单基本上常见的命名空间、对象等用几乎一模一样。它对应的是Windows里的WMI服务(winmgmt)。一、WMI的起源几年前几家资深的计算机公司由于系统管理领域缺少标准委托DMTF启动了CIM(通用信息模型)项目理想的CIM是一种不受限制于任何特定实现环境的管理工具。WMI是CIM的微软实现它有很多类是从CIM中派生出来的。二、WMI的命名空间那么命名空间是做什么作用的呢?我简单这样说在同一段代码中如果有两个变量或函数的名字完全相同就会出现冲突。命名空间就是为解决变量、函数的命名冲突而服务的。解决的办法就是将你的变量定义在一个不同名字的命名空间中。就好像财政局有个张三公安局也有个张三但我们清楚就是因为他们分属不同的单位。有些地方可能不太准确但大致意思就是这样了。WMI的命名空间创建了一个层次结构有点类似于我们的目录文件结构。、root作为所有其他名字的占位符、rootdefault与注册表操作有关的类、rootsecurity与系统安全有关的类、rootcimv从CIM派生的类代表我们最常用的工作环境。三、WMI的对象路径WMI的对象路径用来在CIM库中定位类和它的事例对象路径用两个反斜杠开头第一个元素是目标计算机的名字第二个元素是相应的WMI命名空间第三个元素是相应的类名并用:将它与命名空间分隔开来。例如:rootcimv:winservice其中那个代表是本地系统。四、WMI的查询语言WQL仅仅是ANSISQL的一个子集只能用于数据的提取。数据、事件查询的基本语法为:Selectpro,pro,profrommyclass(myclassevent)例如:Selectname,pathfromWinshare说明:列出所有共享的名称和路径也可以使用通配符*例如:Select*fromWinshare关键字Where用于限定查询的范围。例如:Select*fromWinsharewherename=”Admin”五、WMI脚本中使用的三个步骤步骤:连接到WMI服务在任何WMI脚本中第一个步骤都是建立一个到目标计算机上的Windows管理服务的连接。方法是调用作者:临汾市外事旅游局薛靖澜转载请注明出处VBScript的Getobject函数并将WMI脚本库的名字对象的名称(即“winmgmts:”后跟目标计算机的名称)传递到Getobject并返回一个对象的引用此时您就可以调用其提供的方法如:InstancesOf正如方法名所示InstancesOf返回由资源的类名标识的托管资源的所有实例。步骤:检索WMI托管资源的实例一般采用WQL来实现。步骤:显示WMI托管资源的属性最后一个步骤是枚举检索得到集合的内容。一般采用Foreachenuminmyclass…Next结构来实现。六、WMI测试器(wbemtestexe)验证脚本执行结果现在您对可用于浏览和查看CIM的工具已经有了一些认识让我们使用WMI测试器(wbemtestexe)来检查WinProcess类定义以便从在您的本地计算机上运行的进程检索一些属性。打开一个命令提示键入C:>wbemtestexe按下Enter来开始WMI测试器工具。请注意大部分按钮在主WMI测试器窗口上是被禁用的这说明此时您没有连接到WMI。单击“连接”按钮连接到本地或远程计算机上的WMI服务。显示“连接”对话框它提供一个标记为名称空间的文本输入区域该区域默认值为rootdefault。将名称空间区域的值更改为rootcimv单击“连接”对话框的连接按钮返回到主WMI测试器窗口。主窗口中左上角的命名空间标识符应该显示为rootcimv。请注意所有的按钮现在都已启用这说明在当前凭据环境下您已经成功连接到本地主机上的WMI。单击枚举类别打开“超类信息”对话框。在“超类信息”对话框中不要填写输入超类别名称区域单击递归选项单击确定以枚举rootcimv名称空间中定义的所有CIM类。请注意列于“查询结果”对话框顶部的类是以两个下划线为开头的。这些是系统类。系统类是预定义的CIM类支持内部WMI配置与操作例如提供程序注册、命名空间安全性及事件通知等。现在忽略系统类向下滚动“查询结果”对话框直至看到以CIM开头的类。名称以CIM开头的类是由DMTF维护的核心与公共基类。继续向下滚动直至到达以Win开头的类。名称以Win开头的类是Microsoft扩展类表示Windows特定的托管资源。如果这是您第一次检查rootcimv命名空间您可能希望熟悉rootcimv命名空间中的类的完整集合尤其是有Win前缀的类。向下滚动“查询结果”对话框直至到达WinProcess类双击该类名打开WinProcess对话框的对象编辑器。“对象编辑器”对话框显示被选定类的定义和实现的详细信息(属性和方法)。选择HideSystemProperties复选框隐藏系统属

用户评价(0)

关闭

新课改视野下建构高中语文教学实验成果报告(32KB)

抱歉,积分不足下载失败,请稍后再试!

提示

试读已结束,如需要继续阅读或者下载,敬请购买!

文档小程序码

使用微信“扫一扫”扫码寻找文档

1

打开微信

2

扫描小程序码

3

发布寻找信息

4

等待寻找结果

我知道了
评分:

/26

VBS脚本教程

VIP

在线
客服

免费
邮箱

爱问共享资料服务号

扫描关注领取更多福利