Како заказати покретање апликације у одређено време, али само ако. апликација већ није покренута?

Како заказати покретање апликације у одређено време, али само ако. апликација већ није покренута?

Увод

Помоћу заказаних задатака можете заказати било коју скрипту, програм или документ. трчите у време које вам највише одговара. Постоје ситуације у којима сте. не желите да се програм покрене, ако инстанца програма већ постоји. трчање. Погледајте питање у наставку:

Заказао сам да се Мицрософт Оутлоок покрене у овим временима:

  • Одређено време као што је 6 ујутро
  • Виндовс покретање

Како да то уредим тако да ако је програм већ покренут, секунд. инстанца програма се неће покренути. На пример, ако се пријавим у 5 ујутро и. програм је покренут. У 6 ујутру не бих захтевао да почне поново јер јесте. већ покренут. Како да извршим овај задатак?

Резолуција

Ово се врло лако може постићи коришћењем Виндовс скриптова. Следеће. скрипта проверава да ли је апликација већ покренута или не и делује. према томе. Ако Оутлоок.еке већ није покренут, онда је покренут. Копирај. следеће редове у Нотепад и сачувајте као "мсолаунцх.вбс

“ (са. двоструки наводници) на радну површину. Затим можете заказати покретање ове скрипте на а. одређено време.

'Рамесх. Сринивасан - 13. децембар 2005

Поставите ВсхСхелл = ВСцрипт. ЦреатеОбјецт("ВСцрипт. Шкољка")

стрЦомпутер = "."

Поставите објВМИСервице = ГетОбјецт("винмгмтс:" _

 & "{имперсонатионЛевел=имперсонате}!\\" & стрЦомпутер & "\роот\цимв2")

Поставите цолПроцессес = објВМИСервице. ЕкецКуери _

 ("СЕЛЕЦТ * ФРОМ Вин32_Процесс ВХЕРЕ Наме = 'оутлоок.еке'")

Ако колПроцеси. Цоунт = 0 Затим

ВсхСхелл. Покрени цхр (34) & _

„%Програмфилес%\Мицрософт Оффице\Оффице10\Оутлоок.еке“ & Цхр (34)

Крај Ако

Горњи код је скројен за Оутлоок 2002. Ако имате другачију верзију. Оутлоок-а, онда се путања апликације разликује. Забележите подразумевану вредност. локација извршне датотеке Мицрософт Оутлоок-а. У складу са тим одаберите своју верзију:

ОЛ98 и ОЛ2000
%Програмфилес%\Мицрософт Оффице\Оффице\оутлоок.еке

ОЛ2002
%Програмфилес%\Мицрософт Оффице\Оффице10\Оутлоок.еке

ОЛ2003
%Програмфилес%\Мицрософт Оффице\Оффице11\Оутлоок.еке