Как запретить запуск двух и более копий 1С8

[ragnar40]

C:\Program files\1cv8\bin\1cv8.exe

[Petya V4sechkin]

ragnar40, тогда строчку в скрипте исправьте:



Код:

Код: Выделить всё

  objShell.Run """" + objEnv("ProgramFiles") + "\1cv8\bin\1cv8.exe"""

[ragnar40]

Цитата ragnar40:



Вот так прямо выложить на рабочий стол и им запускать?

Как запретить запуск двух и более копий 1С8

и иконку на рабочем столе смени на 1С 8.х, чтобы ваши "грамотеи" думали что всё-таки запускают 1С 8.х.

[ragnar40]

Спасибо огромное, скриптик подошел прекрасно, проблема решена.

[ragnar40]

Спасибо огромное, скриптик подошел прекрасно, проблема решена.

[ragnar40]

Мне нужно решить такую же задачу с 1c, но я что-то не пойму куда копировать этот скрипт в свойствах ярлыка. Ткните пальцем куда скопировать его!

[Petya V4sechkin]

sergant138, скрипт сохранить в файле с расширением .vbs

В свойствах ярлыка указать путь к этому файлу.

[sergant138]

Спасибо!Все Работает!

[sergant138]

Во как! Не у меня одного такая проблема.

[ragnar40]

Цитата Coutty:



Создайте .cmd (.bat)-файл с таким содержимым:

Цитата:

SET SEARCH=notepad.exe

tasklist /fi "imagename eq %SEARCH%" /fo table /nh | find /c /i "%SEARCH%"

if %ERRORLEVEL%==1 start notepad.exe

Где вместо notepad.exe нужно указать имя вашей программы. И, видимо, во втором вхождении (там, где start) - полный путь к файлу. И пусть запускают этой cmd'шкой.

Как запретить запуск двух и более копий 1С8

А как изменить условие, нужно что бы запускалось 2 копии программы но НЕ 3 ?