Настроить предупреждение при запуске приложения в Windows

У меня есть программное обеспечение, которое лицензировано для одновременного использования на одном компьютере. Он подключается к службе и получает данные из этой службы. Если я запускаю приложение на втором компьютере, то соединение для передачи данных первого компьютера прекращается.

Временами я запускаю программное обеспечение на Computer1, и оно выполняет некоторую жизненно важную работу со сбором данных и т. Д., И я забуду, что оно работает там и запускает его на Computer2, вызывая разрыв соединения для передачи данных Computer1 и т. Д.

То, что я хочу сделать, это настроить предупреждение на Computer2, чтобы при каждом запуске этого приложения появлялось диалоговое окно с сообщением: «Эй, это программное обеспечение может работать на другом компьютере, вы уверены, что хотите запустить его здесь?»

Я использую Windows 7 на Computer2. Есть ли способ для меня, чтобы выполнить эту задачу?

Вы можете использовать скрипт VBS. Это вызовет блокнот, если вы скажете «да» и уведомите вас, что вы нажали «Отмена» (если вы нажали «Отмена»).

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

Просто скопируйте / вставьте его в текстовый файл и измените текст в VBS.

Это не идеально, но это просто, и это делает то, что вы хотите. Я настроил это, чтобы открыть Word 2010 в качестве примера, но вы бы добавили свою программу. Создайте пакетный файл .bat, чтобы открыть вашу программу со следующим кодом, и используйте его для запуска вашей программы:

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