Konfigurasikan peringatan saat memulai aplikasi pada Windows

3

Saya memiliki beberapa perangkat lunak yang dilisensikan untuk digunakan pada satu komputer sekaligus. Terhubung ke layanan dan mengambil data dari layanan itu. Jika saya memulai aplikasi pada komputer kedua maka koneksi data komputer pertama diakhiri.

Ada saat-saat ketika saya akan menjalankan perangkat lunak di Computer1 dan itu melakukan beberapa pekerjaan penting dengan pengumpulan datanya dll. Dan saya akan lupa bahwa itu berjalan di sana dan memulainya di Computer2 menyebabkan koneksi data Computer1 untuk berakhir dll

Yang ingin saya lakukan adalah mengkonfigurasi peringatan pada Computer2 sehingga setiap kali saya memulai aplikasi ini muncul kotak dialog dan mengatakan "Hei, perangkat lunak ini mungkin berjalan di komputer lain, apakah Anda yakin ingin memulainya di sini?"

Saya menggunakan Windows 7 di Computer2. Apakah ada cara bagi saya untuk menyelesaikan tugas ini?

Orang
sumber
1
Hanya dua sen saya: Saya menguji jawaban skub, dan itu berhasil dengan sempurna. Saya pikir itu adalah jawaban Anda.
KCotreau

Jawaban:

4

Anda bisa menggunakan skrip vbs. Ini akan meluncurkan notepad jika Anda mengatakan ya dan memberi tahu Anda bahwa Anda telah menekan batal (jika Anda menekan batal).

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

Cukup salin / rekatkan ke file teks dan ubah txt ke vbs.

skub
sumber
1
+1 Memang sangat bagus. JAUH lebih baik dari milikku.
KCotreau
Anda sudah memiliki objek WshShell. Cukup gunakan kembali fungsi Run () dan saya pikir sub dapat dipromosikan ke tingkat atas karena hanya dipanggil sekali.
billc.cn
Saya memodifikasi kode untuk membuatnya sedikit lebih bersih. Maaf, ini seperti skrip vbs kedua saya.
skub
4

Ini tidak sempurna, tetapi sederhana, dan ia melakukan apa yang Anda inginkan. Saya mengatur ini untuk membuka Word 2010 sebagai contoh, tetapi Anda akan menambahkan program Anda. Buat file batch .bat untuk membuka program Anda dengan kode berikut di dalamnya, dan gunakan untuk meluncurkan program Anda:

@echo Are you sure you want to continue?
Pause
start "C:\Program Files\Microsoft Office\Office14\winword.exe"
exit
KCotreau
sumber
Ini tidak sempurna karena jika Anda melanjutkan untuk membuka, Anda harus mengklik untuk menutup kotak DOS.
KCotreau
Coba gunakan skrip vbs.
skub
@skub saya akan ... jika saya kompeten dalam hal itu. :)
KCotreau
Aww, jangan katakan itu, saya hanya mencari-cari di sekitar berbagai teknik dan menggabungkannya. Siapa pun bisa melakukannya!
skub