「tasklist/fi windowtitle」と複数のブラウザウィンドウ

Question

現在、特定のブラウザのウィンドウタイトルが開いているかどうかを確認し、そうでない場合は開いているかどうかを確認するバッチファイルを作成しようとしています。問題は、私がやり取りした最新のブラウザウィンドウしか検出していないようだということです。 「Pandora」と「Facebook」を開いて「Facebook」と最後にやり取りすると、「Pandora」の「Unknown」ウィンドウタイトルが返されます。私はこれをテストしたすべてのブラウザで発生します...これを回避する方法はありますか？バッチファイルから呼び出すことができる限り、私はバッチ/ vbscript/powershellソリューションにオープンしています。

tasklist /fi "windowtitle eq Facebook - Google Chrome" 2>NUL | find /i /n "chrome.exe">NUL 
if "%ERRORLEVEL%"=="0" (
    echo Facebook is Open 
) else (
    echo Starting Facebook 
    start C:\Progra~2\Google\Chrome\Application\chrome.exe --new-window http://facebook.com 
) 

Answer 1

Set objShell = CreateObject("Shell.Application") 
Set AllWindows = objShell.Windows 
For Each window in AllWindows 
    msgbox window.locationname 
Next 

リスト開いているシェル・ウィンドウ（フォルダや歴史的な理由のためのウェブサイト）。