精华内容
下载资源
问答
  • Vbs脚本编程简明教程之六
    2017-11-15 20:22:00
    Vbs 脚本编程简明教程之六   <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

    修改注册表

     

    Vbs 中修改注册表的语句主要有:

    1 读注册表的关键词和值:

    可以通过把关键词的完整路径传递给 wshshell 对象的 regread 方法。例如:

    set ws=wscript.createobject("wscript.shell")

    v=ws.regread("HKLM\Software\7-Zip\Path ")

    wscript.echo v

    2 写注册表

    使用 wshshell 对象的 regwrite 方法。例子:

    path="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\"

    set ws=wscript.createobject("wscript.shell")

    t=ws.regwrite(path & "jj","hello")

    这样就把

    HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\jj 这个键值改成了 hello. 不过要注意:这个键值一定要预先存在。

    如果要创建一个新的关键词,同样也是用这个方法。

    path="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\run\sssa2000\love\"

    set ws=wscript.createobject("wscript.shell")

    val=ws.regwrite(path,"nenboy")

    val=ws.regread(path)

    wscript.echo val

     

    3 删除关键字和值

    使用 regdelete 方法,把完整的路径传递给 regdelete 就可以了

    例如

    val=ws.regdel(path)

    注意,如果要删除关键词的值的话   一定要在路径最后加上“ \ ”,如果不加斜线,就会删除整个关键词。









    本文转自 chengchow 51CTO博客,原文链接:http://blog.51cto.com/chengchow/886773,如需转载请自行联系原作者
    更多相关内容
  • Vbs脚本编程简明教程

    2013-05-24 09:23:27
    在WINDOWS中,学习计算机操作也许很简单,但是很多计算机工作是重复性劳动,例如你也许需要对一些计算机文件进行复制,粘贴,改名,删除,也许你......把这些各式各样的数据操作按照某种规则排列起来......
  • Vbs脚本编程简明教程之一 —为什么要使用Vbs? 在Windows中,学习计算机操作也许很简单,但是很多计算机工作是重复性劳动,例如你每周也许需要对一些计算机文件进行复制、粘贴、改名、删除,也许你每天启动计算机...
  • VBS脚本编程简明教程

    2011-07-07 16:16:20
    很不错的教程,对于新手学习VBS编程有很大帮助。
  • VBS脚本编程简明教程.doc
  • 在Windows中,学习计算机操作也许很简单,但是很多计算机工作是重复性劳动,例如你每周也许需要对一些计算机文件进行复制、粘贴、改名、删除
  • Vbs脚本编程简明教程.doc
  • vbs脚本编程简明教程

    2009-04-13 14:45:27
    我个人认为Vbs脚本其实就是一种计算机编程语言,但是由于缺少计算机程序设计语言中的部分要素,对于事件的描述能力较弱,所以称为脚本,它最方便的地方就是提供了对COM对象的简便支持。那么什么是COM对象呢?
  • 看了沼泽介绍的wmi脚本相关知识,对新手是个不错的教材,如果想和系统结合的更好,想实现更大功能的代码,那么学习vbs就不得不用wmi脚本
  • Vbs脚本编程简明教程之四<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> 如何利用Vbs运行外部程序 Vbs只提供了编程的一个基本框架,用户可以使用Vbs来定义变量、...
    Vbs 脚本编程简明教程之四   <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

    如何利用Vbs运行外部程序

     

    Vbs 只提供了编程的一个基本框架,用户可以使用 Vbs 来定义变量、过程和函数, vbs 也提供了一些内部函数和对象,但是 Vbs 没有提供任何命令来访问 Windows 系统内部的部件 ,但是值得庆幸的是, Vbs 虽然不能自己完成这些任务,但是它提供了一条极为方便、功能也相当强的命令—— CreateObject ,这条命令可以访问 windows 系统内安装的所有 com 对象,并且可以调用这些部件中存放的命令

    于是问题解决了,比如说,我手头有 1000 个小文本,我首先要对每一个文本的语法进行查错和修改,然后按照预先定义好的规则对这些文本进行排序,最后将这些文本合并成为一个文件。正常情况下,我们需要把打开第一个小文本,然后把它复制到 WORD 中,然后利用里面的除错功能进行除错和修改,然后再导入到 EXCEL 中进行排序,将这个过程重复 1000 遍,然后再将所有得到的文本复制到一个大文本中。实在是太枯燥、工作量太大了。有了 Vbs CreateObject ,问题得到解决,我只需要找到相应的模块,调用相应的功能就可以了,作为脚本,把一个枯燥的过程重复 1000 次,本就是它的拿手好戏。

    好了,我们走入正题,从最简单的——只启动一个程序开始。

    WSH 也就是用来解析 Vbs 的宿主,本身包含了几个个常用对象

    1 Scripting.FileSystemObject    >   提供一整套文件系统操作函数

    2 Scripting.Dictionary    >   用来返回存放键值对的字典对象

    3 Wscript.Shell    >   提供一套读取系统信息的函数,如读写注册表、查找指定文件的路径、读取 DOS 环境变量,读取链接中的设置

    4 Wscript.NetWork    >   提供网络连接和远程打印机管理的函数。(其中,所有 Scripting 对象都存放在 SCRRUN.DLL 文件中,所有的 Wscript 对象都存放在 WSHOM.ocx 文件中 。)

    现在我们需要的是第三个对象,好了,让我们先连接一下对象看看,在记事本的编辑窗口中输入:

    Option Explicit

    Dim objShell

    Set objShell = CreateObject(“Wscript.Shell”)

    objShell.Run “notepad”

    同样,保存执行。那么看到了一个什么样的结果呢?在桌面上又打开了一个记事本。

    说明之一: Set Vbs 指令,凡是将一对象引用赋给变量,就需要使用 set 关键字 。那么什么是对象引用呢?凡是字符串、数值、布尔值之外的变量都是对象引用 Objshell 是变量名,可以随意修改。

    说明之二:凡是正确引用的对象,其本身内置有函数和变量,其引用方法为在变量后加“ ”,后紧跟其实现功能的函数就可以了。 Objshell.run  的意思就是调用 Wscript.shell 中的运行外部程序的函数—— run notepad 是记事本程序的文件名。当然你也可以改成“ calc ”,这是计算器的文件名, winword word 的文件名,等等吧,所有可执行文件的文件名都可以。但是需要注意的是,如果你要执行的可执行文件存放的地方不是程序安装的常用路径,一般情况下,需要提供合法的路径名,但是 run 在运行解析时,遇到空格会停止,解决的方法是使用双引号 ,例如:在我的机器上运行 qq ,代码为:

    objshell.run """C:\Program Files\QQ2006\QQ.exe"""   ‘注:三个引号

    好,   我们再进一步,启动两个程序会如何呢?

    输入如下代码:

    Set objShell = CreateObject(“Wscript.Shell”)

    objShell.Run “notepad”

    objShell.Run “calc”

    执行会如何呢?两个程序基本上同时启动了。如果我们需要先启动 notepad 再启动 calc 将如何呢?很简单在需要顺序执行的代码后加  , , True 参数就可以了

    好了输入代码:

    Set objShell = CreateObject(“Wscript.Shell”)

    objShell.Run “notepad” ,,true

    objShell.Run “calc”

    看看执行的结果怎么样吧!

    总结: run 函数有三个参数,第一个参数是你要执行的程序的路径,第二个程序是窗口的形式, 0 是在后台运行; 1 表示正常运行; 2 表示激活程序并且显示为最小化; 3 表示激活程序并且显示为最大化;一共有 10 个这样的参数我只列出了 4 个最常用的。   第三个参数是表示这个脚本是等待还是继续执行,如果设为了 true, 脚本就会等待调用的程序退出后再向后执行

    其实, run 做为函数,前面还有一个接受返回值的变量,一般来说如果返回为 0 ,表示成功执行,如果不为 0 ,则这个返回值就是错误代码 ,可以通过这个代码找出相应的错误。









    本文转自 chengchow 51CTO博客,原文链接:http://blog.51cto.com/chengchow/886752,如需转载请自行联系原作者
    展开全文
  • Vbs脚本编程简明教程之二<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> 如何开始第一个Vbs脚本? 就像多数计算机教程一样,我们从“HelloWorld!”程序开始我们的...
    Vbs 脚本编程简明教程之二   <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

    如何开始第一个Vbs脚本?

     

    就像多数计算机教程一样   ,我们从“ Hello  World !”程序开始我们的练习。什么?不知道是什么意思?就是说大部分的计算机程序设计教程开篇入门都是编写一个小程序,执行这个程序的结果就是在计算机的屏幕上或者 dos 窗口中显示一行文字: Hello  World !好了,我们开始吧。

    打开你的“记事本”程序,在编辑窗口填写:

    msgbox "Hello World!"

    然后用鼠标单击“文件”菜单,单击“保存”,把“保存在”一栏设为桌面,在“文件名”一栏中填写 kk.vbs ,单击“保存”就可以了。然后最小化“记事本”窗口,在桌面上寻找你刚刚保存的 kk.vbs ,然后双击。看到弹出的对话框了没有,单击“确定”,对话框消失了。难看了点,不过确实是你编写的第一个脚本程序。

    说明之一:上面的操作中,保存位置放在桌面,仅仅是为了执行方便,你保存到其他的地方完全没有问题,只要你知道你保存在什么地方就可以了,什么?是废话,自己保存的当然知道保存在那里了。不,自己保存的文件自己找不到的人我见的多了去了。文件名你可以随意填写,不一定非要写 kk ,只要符合 Windows 的文件命名规则就可以了,但是扩展名必须是 vbs ,什么 ? 不知道什么是扩展名?就是文件名中“ . ”后的那部分,简单说,就是 vbs 脚本文件命名时必须是: xxx.vbs ,其中 xxx 你随意。

    说明之二:在记事本编辑窗口中写的这行是什么意思?

    Msgbox VBS 内建的函数,每一个函数都可以完成一定的功能,你只需要按照语法要求,在函数的相应部分填写相应的内容就可以了,这部分内容我们称为参数,当然函数执行的结果我们称为返回值,一个函数可以有返回值也可以没有,可以有参数也可以没有。你不用了解函数是怎么运作的,只要了解这个函数能干什么就行了。

    Msgbox 语法: msgbox  " 对话框内容 ", , " 对话框的标题 "

    你不妨用记事本打开刚才的文件在编辑窗口中输入:

    msgbox "Hello World!" , , " 系统提示 "

    执行一下,看看效果和位置。

    说明之三:如果执行失败,看看你的标点符号,所有的标点符号必须是在英文状态下输入的。当然,这个脚本实在是太简单了,甚至连最简单的交互都没有,所以你可以把脚本这样修改一下:

    Dim name

    name=Inputbox(" 请输入你的名字 :"," 名称 ")

    Msgbox  name, , " 您的名字是 "

    保存执行一下,看到弹出的对话框了么?填入你的名字,点确定,看到结果了吗?

    说明之一:第一句是定义变量, dim 是定义变量的语句

    其格式为: dim  变量 1, 变量 2 ……,

    Vbs 只有一种变量类型 ,所以不用声明变量类型。系统会自动分辨变量类型。

    说明之二: inputbox VBS 内建的函数,可以接受输入的内容,其语法格式为:

    Inputbox(" 对话框内容 "," 对话框标题 ")

    第二句的意思是接受用户的输入,并把输入结果传递给变量 name

    好了,到此脚本基本的输入输出函数都有了,已经可以完成一些比较简单的功能了,你可以编写一个简单的脚本,然后拷贝的“程序”— > “启动”中,然后重新启动计算机看看结果









    本文转自 chengchow 51CTO博客,原文链接:http://blog.51cto.com/chengchow/886726,如需转载请自行联系原作者
    展开全文
  • Vbs脚本编程简明教程之十二<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> 使用系统对话框 在VBS脚本设计中,如果能使用windows提供的系统对话框,可以简化脚本...
    Vbs 脚本编程简明教程之十二 <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

     

    使用系统对话框

     

    VBS 脚本设计中,如果能使用 windows 提供的系统对话框,可以简化脚本的使用难度,使脚本人性化许多,很少有人使用,但 VBS 并非不能实现这样的功能,方法当然还是利用 COM 对象。

    1 SAFRCFileDlg.FileSave 对象:属性有: FileName    指定默认文件名; FileType    指定文件扩展名; OpenFileSaveDlg    显示文件保存框体方法。

    2 SAFRCFileDlg.FileOpen  对象: FileName    默认文件名属性; OpenFileOpenDlg    显示打开文件框体方法。

    3 UserAccounts.CommonDialog 对象: Filter    扩展名属性( "vbs File|*.vbs|All Files|*.*" );

    FilterIndex    指定

    InitialDir    指定默认的文件夹

    FileName    指定的文件名

    Flags    对话框的类型

    Showopen 方法:

    很简单, ok ,让我们来举两个简单的例子:

    例一:保存文件

    Set objDialog = CreateObject("SAFRCFileDlg.FileSave")

    Set objFSO = CreateObject("Scripting.FileSystemObject")

    objDialog.FileName = "test"

    objDialog.FileType = ".txt"

    intReturn = objDialog.OpenFileSaveDlg

    If intReturn Then

    objFSO.CreateTextFile(objDialog.FileName & objdialog.filetype)

    Else

    Wscript.Quit

    End If

    注意: 1 SAFRCFileDlg.FileSave 对象仅仅是提供了一个方便用户选择的界面,本身并没有保存文件的功能,保存文件还需要使用 FSO 对象来完成。 2 、用 FileType 属性来指定默认的文件类型。 3 、在调用 OpenFileSaveDlg 方法时,最好把返回值保存到一变量中,用它可以判断用户按下的是确定还是取消。

    例二: . 打开文件

    set objFile = CreateObject("SAFRCFileDlg.FileOpen")

    intRet = objFile.OpenFileOpenDlg

    if intret then

    msgbox  “文件打开成功!文件名为:”  & objFile.filename

    else

    wscript.quit

    end if

    例三:比较复杂的打开文件对话框

    Set objDialog = CreateObject("UserAccounts.CommonDialog")

    objDialog.Filter = "vbs File|*.vbs"

    objDialog.InitialDir = "c:\"

    tfile=objDialog.ShowOpen

    if tfile then

    strLoadFile = objDialog.FileName

    msgbox strLoadFile

    else

    wscript.quit

    end if

    说明:在脚本中加入  objDialog.Flags = &H020  看看会出现什么结果









    本文转自 chengchow 51CTO博客,原文链接:http://blog.51cto.com/chengchow/886810,如需转载请自行联系原作者
    展开全文
  • Vbs脚本编程简明教程之十五 VBS内置函数之一<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> Abs函数:返回数的绝对值。 Array函数:返回含有数组的变体。 Asc...
  • 将下面的脚本复制到一个文本文件中,并将其文件名命名为:自动登陆.vbs,然后将拨号软件及本脚本一起复制到程序——启动项中,就可以实现自动拨号上网,并登陆到博客上。<?xml:namespace prefix="o" ns="urn:...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 492
精华内容 196
热门标签
关键字:

vbs脚本编程简明教程

友情链接: phne.rar