Question

VBS判断一个程序是否存在

需要一段小程序。5分钟一次。查看这个程序在应用程序里是否正常工作。如果任务管理器-应用程序 里找不到，而进程管理器里存在，就结束进程，然后重新运行这个程序
D:\LentroAppServer\LentroAppServer.exe





Answer 1

'test.vbs

strComputer = "."
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process Where Name = 'javaw.exe'")
If colProcessList.Count>0 Then
WScript.Echo "运行"
Else
WScript.Echo "没运行"
End If
存为test.vbs文件，双击执行即可
或命令行 cscript.exe c:\test.vbs
VBScript ，Visual Basic Script的简称，是微软公司出品的脚本语言，有时也被缩写为VBS。VBScript是asp动态网页默认的编程语言，配合asp内建对象和ADO对象，用户很快就能掌握访问数据库的asp动态网页开发技术。
VBScript是微软开发的一种解析型的服务端（也支持客户端）脚本语言，可以看作是VB语言的简化版，与VBA的关系也非常密切。它具有原语言容易学习的特性。目前这种语言广泛应用于网页和ASP程序制作，同时还可以直接作为一个可执行程序。用于调试简单的VB语句非常方便。