当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > vbScript中WScript.Shell对象的run和exec使用心得分享

VBScript
用vbs检索在运行对话框中键入的一系列命令的代码
编写可以打开文本文件并打乱在该文件中所找到的单词顺序的vbs脚本
在 HTA 中暂停脚本的方法
运行脚本之前,如何确定计算机上的默认脚本宿主的代码
用vbs实现删除名称中有撇号的文件夹
用vbs将输出内容写到屏幕以覆盖当前屏幕上的内容的方法
用vbs实现配置无人登录计算机时使用的屏幕保护程序
用vbs更改 Internet Explorer 的标题栏
用vbs读取文本文件的最后一行
用vbs实现重新启动 Internet Explorer
用vbs实现禁用服务
用vbs确定计算机是否有 USB 2.0 端口的代码
用vbs列出注册表中 Run 项中的所有项目
用vbs将名称截断以使其最多包含 16 个字符的代码
用vbs将本地文件替换为在文件服务器上找到的新版本
用vbs确定脚本正在哪一个帐户下运行
用vbs确定可移动驱动器的连接时间
用vbs记录屏幕保护程序的开始时间和结束时间
用vbs计算某个词在日志文件中的出现次数
vbs病毒的简单例子源代码解析

VBScript 中的 vbScript中WScript.Shell对象的run和exec使用心得分享


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 410 ::
收藏到网摘: n/a

Set exeRs = objws.Exec("pscp -r -scp -pw " & password & " " & loginid & "@" & host & ":" & data_path & fileName & " " & windows_path)
但在测试候,当拷的文件比大,拷贝时间较长候就出cmd窗口死在那里不了的情况,直接在cmd窗口中运行pscp相同的文件就可以正常 束。也找不到是什原因,于是改成run方法一下,run方法是可以正常束的,但是原来的代中有需要取得cmd的控制台出信息,而run却 不方便取得控制台信息,最后只能先把控制台信息重定向到文件中,然后程序在取。最后一下runexec两个方法的区的一些理解:

两个方法的声明如下
Function Exec(ByVal Command As String) As WshExec

Function Run(ByVal Command As String, [ByVal WindowStyle], [ByVal WaitOnReturn]) As Integer

可以看出几点区

1run的返回是一个整数,就是01成功和失两个状,而exec方法的返回是一个象,从返回象中可以得控制台出信息和控制台错误信息,即StdOutStdErr属性等。例如:

Set exeRs = objws.Exec("pscp -r -scp -pw 。。。。"

errMsg = exeRs.StdErr.ReadAll()

stdMsg = oExec.StdOut.ReadAll()

可以取道控制台错误和控制台信息。
2Run 的后两个参数,一个是cmd窗口的格,一个是是否等待行完成。最后一个参数很有用,如果你希望等待本次cmd行的程序束后,在 objws.Exec后面的句的,只要个参数true就可以了,否后面的句将不等待cmd窗口完成,直接运行(我们项目就有这个需求,从服务器上拷贝一个文件到本地后,马上要打开这个文件操作,如果文件没有拷贝完就去操作就会出错的。)。另外,如果你使用exec 方法的候,如果希望等待cmd中程序行完后,在行后面的句,也可以通下面的方法:

oExec.StdErr.ReadAll()或者oExec.StdOut.ReadAll(),道理上也应该好理解,要得到出的信息,肯定要cmd行完后才会有出的。

参数的详细信息可以参考msdn

http://msdn.microsoft.com/zh-cn/library/ateytk4a(en-us,VS.85).aspx

http://msdn.microsoft.com/zh-cn/library/d5fk67ky(en-us,VS.85).aspx