2016-03-27 15 views
0

Belirli tarayıcı penceresi başlıklarının açık olup olmadığını denetleyen bir toplu iş dosyası yazmaya çalışıyorsanız, bunları açmaya çalışın. Sorun, etkileşim kurduğum en yeni tarayıcı penceresini algıladığı görülüyor. "Pandora" ve "Facebook" açık ve son "Facebook" ile etkileşime girdiysem, "Pandora" için bir "Bilinmeyen" pencere başlığı döndürür. Bunu test ettiğim tüm tarayıcılarda oluyor ... Bunu önlemek için herhangi bir yol var mı? Bir toplu iş dosyasından çağrılabildiği sürece batch/vbscript/powershell çözümlerine açığım."tasklist/fi windowtitle" ve çoklu tarayıcı pencereleri

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 
) 
+0

[bu yorumu görün (http://stackoverflow.com/questions/25928894/enumerate-open-google-chrome-windows-tabs-in-delphi#comment40590473_25928894) by @bummi – JosefZ

cevap

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

listenin açık kabuk pencereleri (klasörler ve tarihsel nedenlerden dolayı web siteleri).