Como posso fazer um arquivo .bat ser executado automaticamente quando uma caixa de alerta aparecer?

Question

Às vezes, o POP Peeper de repente não funciona no meu computador. Sempre que isso acontecer, uma caixa de alerta será exibida e o PID da caixa no Gerenciador de Tarefas será 244. A solução é reiniciar o POP Peeper. Eu sei como usar um arquivo .bat para reiniciar um programa, mas não sei como fazer o arquivo ser executado automaticamente quando a caixa de alerta aparece.

Alguém pode me ensinar como fazer isso?
O seguinte é a caixa de alerta em questão.

    

Answer 1

O script abaixo deve fazer o que você deseja, ou seja, fechar o pop-up quando ele chegar & então reinicie outro processo

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\" & strComputer & "\root\cimv2")
    i = x 
    Do While i = x
        Set colProcesses = objWMIService.ExecQuery _
            ("Select * from Win32_Process Where Name = 'notepad.exe'")
            '("Select * from Win32_Process Where Name = 'Name of Your process you are waiting for to start'")

    If colProcesses.Count = 0 Then
        'It does not exist do nothing
    Else
        For Each objProcess in colProcesses
            'this will close the process you were watching, as soon as it starts
            objProcess.Terminate()

                'Closing the process you want to restart
                Set colProcesses = objWMIService.ExecQuery _
                 ("SELECT * FROM Win32_Process WHERE Name = 'winword.exe'")
                 '("SELECT * FROM Win32_Process WHERE Name = 'name of the process you want to terminate'")
                For Each objProcess2 in colProcesses
                 objProcess2.Terminate()
                Next

            Dim objShell
            Set objShell = WScript.CreateObject( "WScript.Shell" )

            objShell.Run("""C:\Program Files (x86)\Internet Explorer\iexplore.exe""")
            'objShell.Run("""process or application you want to start""")
            Set objShell = Nothing

        Next
    End If

Loop