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

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

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

Бывают моменты, когда я запускаю программное обеспечение на Компьютере 1, и оно выполняет какую-то важную работу по сбору данных и т. д., а затем я забываю, что оно там запущено, и запускаю его на Компьютере 2, что приводит к разрыву соединения с компьютером 1 и т. д.

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

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

решение1

Вы можете использовать скрипт 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

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

решение2

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

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

Связанный контент