Πώς να προγραμματίσετε την εκκίνηση μιας εφαρμογής σε μια καθορισμένη ώρα, αλλά μόνο εάν το. η εφαρμογή δεν εκτελείται ήδη;
Εισαγωγή
Με τις Προγραμματισμένες εργασίες, μπορείτε να προγραμματίσετε οποιοδήποτε σενάριο, πρόγραμμα ή έγγραφο. τρέξτε την ώρα που είναι πιο βολική για εσάς. Υπάρχουν καταστάσεις όπου εσείς. δεν θέλω να ξεκινήσει ένα πρόγραμμα, εάν υπάρχει ήδη μια παρουσία του προγράμματος. τρέξιμο. Δείτε την ερώτηση παρακάτω:
Έχω προγραμματίσει το Microsoft Outlook να εκτελείται σε αυτές τις ώρες:
- Καθορισμένη ώρα όπως 6 π.μ
- Εκκίνηση των Windows
Πώς μπορώ να το κανονίσω έτσι ώστε αν το πρόγραμμα τρέχει ήδη, ένα δεύτερο. η παρουσία του προγράμματος δεν θα ξεκινήσει. Για παράδειγμα, αν συνδεθώ στις 5 π.μ. και το. έχει ξεκινήσει το πρόγραμμα. Στις 6 π.μ. δεν θα απαιτούσα να ξαναρχίσει αφού είναι. εκτελείται ήδη. Πώς μπορώ να ολοκληρώσω αυτήν την εργασία;
Ανάλυση
Αυτό μπορεί πολύ εύκολα να επιτευχθεί χρησιμοποιώντας τη δέσμη ενεργειών των Windows. Το ακόλουθο. Το σενάριο ελέγχει εάν η εφαρμογή εκτελείται ήδη ή όχι και ενεργεί. αναλόγως. Εάν το Outlook.exe δεν εκτελείται ήδη, τότε εκκινείται. Αντιγράψτε το. παρακάτω γραμμές στο Σημειωματάριο και αποθηκεύστε ως "
msolaunch.vbs" (με. διπλά εισαγωγικά) στην επιφάνεια εργασίας. Στη συνέχεια, μπορείτε να προγραμματίσετε αυτό το σενάριο να εκτελεστεί στο a. καθορισμένο χρόνο.«Ραμές. Srinivasan - 13 Δεκεμβρίου 2005
Ορίστε WshShell = WScript. CreateObject("WScript. Κέλυφος")
strComputer = "."
Ορισμός objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Ορίστε colProcesses = objWMIService. ExecQuery _
("SELECT * FROM Win32_Process WHERE Name = 'outlook.exe'")
Αν colProcesses. Μέτρηση = 0 Στη συνέχεια
WshShell. Εκτέλεση chr (34) & _
"%Programfiles%\Microsoft Office\Office10\Outlook.exe" & Chr (34)
Τέλος εαν
Ο παραπάνω κώδικας είναι προσαρμοσμένος για το Outlook 2002. Εάν έχετε διαφορετική έκδοση. του Outlook, τότε η διαδρομή της εφαρμογής ποικίλλει. Σημειώστε την προεπιλογή. τοποθεσία του εκτελέσιμου Microsoft Outlook. Επιλέξτε την έκδοσή σας ανάλογα:
OL98 και OL2000
%Programfiles%\Microsoft Office\Office\outlook.exe
OL2002
%Programfiles%\Microsoft Office\Office10\Outlook.exe
OL2003
%Programfiles%\Microsoft Office\Office11\Outlook.exe