☰

Configurar una advertencia al iniciar una aplicación en Windows

tag-icon • tag-icon windows-7
Configurar una advertencia al iniciar una aplicación en Windows

Tengo un software con licencia para usarse en una computadora a la vez. Se conecta a un servicio y recupera datos de ese servicio. Si inicio la aplicación en una segunda computadora, la conexión de datos de la primera computadora finaliza.

Hay ocasiones en las que estoy ejecutando el software en la Computadora1 y está haciendo un trabajo vital con la recopilación de datos, etc. y me olvido de que se está ejecutando allí y lo inicio en la Computadora2, lo que provoca que la conexión de datos de la Computadora1 finalice, etc.

Lo que quiero hacer es configurar una advertencia en Computadora2 para que cada vez que inicie esta aplicación aparezca un cuadro de diálogo que diga "Oye, es posible que este software se esté ejecutando en otra computadora, ¿estás seguro de que deseas iniciarlo aquí?"

Estoy usando Windows 7 en la Computadora2. ¿Existe alguna forma de realizar esta tarea?

Respuesta1

Podrías usar un script vbs. Esto iniciará el bloc de notas si dice que sí y le notificará que presionó cancelar (si presionó cancelar).

Set WshShell = CreateObject("WScript.Shell")

intButton = WshShell.Popup ("Hey, this software might be running on another computer, are you sure you want to start it here?", , , 1 + 48)

select case intButton

  case 1
    strMessage = ""
        sub shell(cmd)
            WshShell.Run(cmd)
            Set WshShell = Nothing
        end sub
    shell """C:\Program Files (x86)\UltraISO\UltraISO.exe"""

  case 2
    strMessage = "You clicked the Cancel button."
    WshShell.Popup strMessage, , , 32 

end select

Simplemente cópielo/péguelo en un archivo de texto y cambie el txt a vbs.

Respuesta2

Esto no es perfecto, pero es simple y hace lo que quieres. Configuré esto para abrir Word 2010 como ejemplo, pero agregarías tu programa. Cree un archivo por lotes .bat para abrir su programa con el siguiente código y utilícelo para iniciar su programa:

@echo Are you sure you want to continue?
Pause
start "C:\Program Files\Microsoft Office\Office14\winword.exe"
exit

información relacionada