Cum să programați lansarea unei aplicații la o oră specificată, dar numai dacă. aplicația nu rulează deja?
Introducere
Cu Sarcini programate, puteți programa orice script, program sau document pentru. alergați la ora care vă este cel mai convenabil. Sunt situații în care tu. nu doresc ca un program să se lanseze, dacă o instanță a programului este deja. alergare. Vezi întrebarea de mai jos:
Am programat Microsoft Outlook să ruleze la aceste ore:
- Ora specificată, cum ar fi 6 AM
- Pornire Windows
Cum îl aranjez astfel încât, dacă programul rulează deja, o secundă. instanța programului nu va porni. De exemplu, dacă mă conectez la 5 AM și. programul este pornit. La 6 AM nu aș cere să pornească din nou, deoarece este. deja fuge. Cum îndeplinesc această sarcină?
Rezoluţie
Acest lucru poate fi realizat foarte ușor folosind Windows Scripting. Următoarele. scriptul verifică dacă aplicația rulează deja sau nu și acționează. în consecinţă. Dacă Outlook.exe nu rulează deja, atunci este lansat. Copiați. următoarele linii către Notepad și salvați ca "
msolaunch.vbs" (cu. ghilimele duble) pe Desktop. Apoi puteți programa acest script să ruleze la a. timp specificat.— Ramesh. Srinivasan - 13 decembrie 2005
Setați WshShell = WScript. CreateObject("WScript. Coajă")
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& „{impersonationLevel=impersonare}!\\” & strComputer & „\root\cimv2”)
Setați colProcesses = objWMIService. ExecQuery _
("SELECT * FROM Win32_Process WHERE Nume = 'outlook.exe'")
Dacă colProcese. Număr = 0 Atunci
WshShell. Run chr (34) & _
„%Programfiles%\Microsoft Office\Office10\Outlook.exe” și Chr (34)
Încheiați dacă
Codul de mai sus este adaptat pentru Outlook 2002. Dacă aveți o altă versiune. din Outlook, atunci calea aplicației variază. Notați valoarea implicită. locația executabilului Microsoft Outlook. Alegeți versiunea în consecință:
OL98 și OL2000
%Programfiles%\Microsoft Office\Office\outlook.exe
OL2002
%Programfiles%\Microsoft Office\Office10\Outlook.exe
OL2003
%Programfiles%\Microsoft Office\Office11\Outlook.exe