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

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

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

Alguém pode me ensinar como fazer isso?
A seguir está a caixa de alerta em questão. insira a descrição da imagem aqui

Responder1

O script abaixo deve fazer o que você queria, ou sejafeche o pop-up quando ele aparecer e 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

informação relacionada