Любой язык - Перезапуск проги без запроса пароля

[sergeypele]

Доброго дня . Ситуация - на предприятии стоит 1С, прогеры сделали так , что при бездействии пользователя она выключается через 10 мин(рабочее место кассира), требуется скрипт,

что-то типа этого:



strComputer = "."

Set objWMIService = GetObject("winmgmts:" _

& "{impersonationLevel=impersonate}!\\" _

& strComputer & "\root\cimv2")



Set colProcesses = objWMIService.ExecQuery( _

"Select Name From Win32_Process " _

& "Where Name = "1cv8.exe")



If colProcesses.Count = 0 Then

Set objShell = Wscript.CreateObject("Wscript.Shell")

objShell.Run "1cv8.exe"

End If



но продолжал бы запуск вводя пароль пользователя допустим из из pass.txt

За ранее спасибо

[Iska]

Цитата sergeypele:



но продолжал бы запуск вводя пароль пользователя допустим из из pass.txt

Любой язык - Перезапуск проги без запроса пароля

sergeypele, тогда теряется весь смысл:


Цитата sergeypele:



прогеры сделали так , что при бездействии пользователя она выключается через 10 мин(рабочее место кассира)

Любой язык - Перезапуск проги без запроса пароля

[sergeypele]

долго грузится 1С, на кассе собираться очередь, дело в том, в обязанности кассира входит консультация в торговом зале, за это время 1 с закрывается, подходит покупатель и кассир заново открывает 1С , на открытие уходит до 3 мин

[sergeypele]

Цитата sergeypele:



долго грузится 1С, … на открытие уходит до 3 мин

Любой язык - Перезапуск проги без запроса пароля

sergeypele, тем более. Копать надо со стороны 1С. Простой блокировки по тайм-ауту самой машины разве было недостаточно для решения тех же целей?!