vbscript - VB脚本:如何判断程序是否已在运行？

我正在编写一个脚本来打开RDP session ，但是我想检查一下RDP session 是否已经在运行。我最初的想法是检查内存中运行的MSTSC.EXE。任何想法如何做到这一点？

也为该问题提供替代解决方案。尝试防止客户端两次登录RDS服务器。允许多次登录，因为同一用户可能从不同的客户端登录。

最佳答案

我目前正在使用此功能。

就像这样IsProcessRunning "compname","mstsc.exe"

Function IsProcessRunning( strComputer, strProcess )
    Dim Process, strObject
    IsProcessRunning = False
    strObject   = "winmgmts://" & strComputer
    For Each Process in GetObject( strObject ).InstancesOf( "win32_process" )
    If UCase( Process.name ) = UCase( strProcess ) Then
        IsProcessRunning = True
        Exit Function
    End If
    Next
End Function