请问做个vbs怎样判断一个进程启动。

............

我要做一个vbs，或一个简单的脚本。

启动后判断一个名字叫XXX.exe的应用程式是否已经启动了。(或者label也可以。)

如果已经启动就直接退出。
如果还没有启动就，去启动另外一个名字叫ooo.exe的程式。

请问这样的脚步要怎样写？

谢谢。

filk

http://www.tech-archive.net/Arch ... 05-06/msg00243.html

这个例子应该符合你要的

............

恩，应该是这个了。。

1. sProcessName = "CLFYRPCServ.exe"
   
2. 
   
3. sComputer = "."    ' use "." for local computer
   
4. Set oWmi = GetObject("winmgmts:" _
   
5.    & "{impersonationLevel=impersonate}!\" & sComputer & "\root\cimv2")
   
6. 
   
7. Set oShell = CreateObject("WScript.Shell")
   
8. 
   
9. ' go into eternal loop
   
10. Do
    
11.   Set colProcessList = oWmi.ExecQuery _
    
12.       ("Select * from Win32_Process Where Name = '" & sProcessName & "'")
    
13. 
    
14.   If colProcessList.Count = 0 Then
    
15.     ' process is not running
    
16. 
    
17.     ' do the CLFYtest here
    
18. 
    
19.     If remote server is up Then
    
20.       oShell.Run "C:\SomePath\CLFYRPCServ.exe", 1, False
    
21.     End If
    
22.   End If
    
23. 
    
24.   WScript.Sleep 5 * 60 * 1000 ' wait 5 minutes before trying again
    
25. Loop

复制代码

=====

请问如果要改成检查3个应用程式：

例如：
1.exe，2.exe，3.exe，

没有这3个在运行才去启动4.exe可以吗？

还有执行地址可以使用相对地址吗？
.\XXX.exe，而不是c:\windows\XXX.exe

谢谢。

filk

我没有学过VBs..
你自己google下吧

http://www.empinstitute.org/caspdoc/html/vbscript_or_operator.htm
大概是
1.exe or 2.exe or 3.exe are true 就不启动
else 启动

............

恩，我也是没有学过vbs的。
只是需要用一个文本能编辑的文件去做这个检查。

还是有其他语言可以简单的做到的也行。也可以cmd。

filk

我只会皮毛罢了,帮不到你-.-
多多google吧

............

恩，我更死连皮都没有

刚刚test了显示：
Script E:\test\test.vbs
line 19
char 15
error Expected 'Then'
code 800A03F9
Source Microsoft VBScript compilation error

小陈陈

原帖由 ............ 于 26-8-2009 10:12 AM 发表
恩，我更死连皮都没有

刚刚test了显示：
Script E:\test\test.vbs
line 19
char 15
error Expected 'Then'
code 800A03F9
Source Microsoft VBScript compilation error

看下得你的coding

但是照error来看
因该是你多了一个Then