Windows 7 VBScript按标题选择窗口

Question

因此，似乎以下一些代码适用于Windows XP，但不适用于Windows 7：

Dim objFileSys

Set objFileSys = CreateObject("Scripting.FileSystemObject")

If objShell.AppActivate("Query Express") Then 
Else
    objShell.run chr(34) & "I:\SQL-Queries\QueryExpress\QueryExpress.exe" & chr(34),1,False
End If

基本上，它会检查窗口是否已打开。如果它没有打开，则打开它。

很简单，嗯？好吧，这段代码在Windows 7中不能像脚本一样工作。有人能否告诉我如何更新它？

谢谢！