关于VBS的问题

Question

当使用WScript中的run、AppActivate等方法，属性，会不会返回值啊？如何调用？假设说：使用AppActivate后，返回"1"，能用如果语句判断是否成立"1"，然后发生别的事件？
ywjco，if后边应该不是()吧,应该是[],我试了几次。
set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "Calculator"
if [WshShell.AppActivate "Calculator"] then
msgbox "Calculator running"
else
msgbox "Calculator not running"
end if
可老是返回"Calculator not running"
哎，你能不能再说一些啊

Answer 1

set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "Calculator"
AppActivate 方法返回的布尔值表示过程调用是否成功。例如，可用下列方法判断：
if (WshShell.AppActivate "Calculator") then
msgbox "Calculator running"
else
msgbox "Calculator not running"
end if
根据调用的方法、函数的返回值作下一步的操作。具体的参考可看“Script56.CHM”。

****************************************
对不起，疏忽了，我再次查帮助：

1、前面的例子漏了一句：
WshShell.Run "calc"

AppActivate 方法返回的布尔值表示过程调用是否成功。该方法将焦点转移到命名应用程序或窗口中。
------------------------------------------
此方法并不能监视启动的程序是否还在运行。
并且我也不知道为何在脚本运行与帮助中所说的不一致。但我试了几种方法，脚本大多不能监控所调用的外部程序的状态。

2、脚本中用Run方法调用外部程序，可以等待程序执行完成，并查看其返回值：

object.Run(strCommand, [intWindowStyle], [bWaitOnReturn])

bWaitOnReturn ：
可选。布尔值，表示在继续执行脚本中的下一条语句之前，脚本是否等待执行完程序。如果设为 true，则在执行完程序后才执行脚本，Run 方法返回由程序返回的任何错误代码。如果设为 false（默认值），则 Run 方法将自动在启动程序后立即返回 0（不是错误代码）。
--------------------------------------------
例子：

Set WshShell = WScript.CreateObject("WScript.Shell")

Return = WshShell.Run("calc", 1, true)
WScript.Sleep 100

if Return<>0 Then '程序出错
WshShell.Popup "Calculator running error,"&vbcrlf&_
" Return value is: "& Return,4
Else '正常退出
WshShell.Popup "Calculator stop running,"&vbcrlf&_
" Return value is: "& Return,4
End If

set WshShell =Nothing

目前只有这一个算是可行的了。

Answer 2

你去找找教程吧~