Kaip suplanuoti programos paleidimą nurodytu laiku, bet tik tuo atveju, jei. programa dar neveikia?
Įvadas
Naudodami suplanuotas užduotis galite suplanuoti bet kokį scenarijų, programą ar dokumentą. bėgti jums patogiausiu laiku. Būna situacijų, kai tu. nenorite, kad programa būtų paleista, jei programos egzempliorius jau yra. bėgimas. Žiūrėkite žemiau esantį klausimą:
„Microsoft Outlook“ suplanavau veikti šiais laikais:
- Nurodytas laikas, pvz., 6 val
- „Windows“ paleidimas
Kaip sutvarkyti, kad jei programa jau paleista, sekundę. programos egzempliorius nebus paleistas. Pavyzdžiui, jei prisijungiu 5 val. programa paleidžiama. 6 val. ryto nereikalaučiau, kad jis vėl prasidėtų, nes taip yra. jau veikia. Kaip man atlikti šią užduotį?
Rezoliucija
Tai labai lengva padaryti naudojant „Windows Scripting“. Sekantis. scenarijus patikrina, ar programa jau veikia, ar ne, ir veikia. atitinkamai. Jei Outlook.exe dar neveikia, tada ji paleidžiama. Nukopijuokite. šias eilutes į Notepad ir išsaugokite kaip "msolaunch.vbs
" (su. dvigubos kabutės) į darbalaukį. Tada galite suplanuoti šio scenarijaus paleidimą adresu a. nurodytą laiką.'Ramešas. Šrinivasanas – 2005 m. gruodžio 13 d
Nustatykite WshShell = WScript. CreateObject ("WScript. Lukštas“)
strComputer = "."
Nustatyti objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Nustatyti colProcesses = objWMIService. ExecQuery_
("SELECT * FROM Win32_Process WHERE Name = "outlook.exe")
Jei colProcesai. Skaičiavimas = 0 Tada
WshShell. Vykdyti chr (34) ir _
„%Programfiles%\Microsoft Office\Office10\Outlook.exe“ ir Chr (34)
Pabaiga, jei
Aukščiau pateiktas kodas yra pritaikytas „Outlook 2002“. Jei turite kitokią versiją. „Outlook“, tada programos kelias skiriasi. Atkreipkite dėmesį į numatytąjį. „Microsoft Outlook“ vykdomojo failo vieta. Atitinkamai pasirinkite savo versiją:
OL98 ir OL2000
%Programfiles%\Microsoft Office\Office\outlook.exe
OL2002
%Programfiles%\Microsoft Office\Office10\Outlook.exe
OL2003
%Programos%\Microsoft Office\Office11\Outlook.exe