Перейти к содержанию

Рекомендуемые сообщения

Опубликовано

Закрывается программа team viwer, без ошибки, просто закрывается. Надо чтобы прога все время работала. Как можно сделать чтобы программа сама запускалась ?

Опубликовано
Ищите причину почему закрывается

Вот и непонятно почему, нету никакой ошибк, самопроизвольно закрывается.Вообщем то вопрос в другом. Как можно чтобы прога сама запускалась ?

Опубликовано
Вот и непонятно почему, нету никакой ошибк, самопроизвольно закрывается.Вообщем то вопрос в другом. Как можно чтобы прога сама запускалась ?

а что в журналах Виндовс?

Опубликовано

а когда закрывается? в какие моменты? и почему?

Опубликовано (изменено)
а что в журналах Виндовс?

Нету ничего.

а когда закрывается? в какие моменты? и почему?

Обычно раза 3 в день,бывает чаще,просто вылетатет, причина не понятна

Изменено пользователем Gangster
Опубликовано

Gangster хм.. пробовал переустанавлитвать? или у тебя портайбл?

Опубликовано

Универсальный совет для таких случаев: DEP (предотвращение выполнения данных) включена?

Если да, ее необходимо оставить только для системных файлов/служб

Опубликовано (изменено)
Gangster хм.. пробовал переустанавлитвать? или у тебя портайбл?

Первым делом и переустановил.Но увы не помогает. Не портайбл

 

Универсальный совет для таких случаев: DEP (предотвращение выполнения данных) включена?

Если да, ее необходимо оставить только для системных файлов/служб

Попробую,если поможет отпишусь

Изменено пользователем Gangster
Опубликовано (изменено)
Как можно чтобы прога сама запускалась ?

 

 strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

'Set colMonitoredProcesses = objWMIService. _		
'	ExecNotificationQuery("select * from __InstanceCreationEvent" _ 
'		& " within 1 where TargetInstance isa 'Win32_Process'")

Set colMonitorProcessesd = objWMIService.ExecNotificationQuery _
("SELECT * FROM __InstanceDeletionEvent " & _ 
"WITHIN 1 WHERE TargetInstance ISA 'Win32_Process' ")

i = 0

Do While i = 0

Set objLatestProcessd = colMonitorProcessesd.NextEvent

If objLatestProcessd.TargetInstance.Name = "TeamViewer.exe" Then


Dim objWsShell
Set objWsShell = CreateObject("WScript.Shell")
objWsShell.Run "f:\Internet\TeamViewer_Setup.exe"
Set objWsShell = Nothing

End If

Loop

 

пойдет? скрипт на VB. открываем блокнот, копируем текст, меняем f:\Internet\TeamViewer_Setup.exe на ваш путь к запуску программы. сохраняем файл с расширением VBS. Запускаем ваш teamviewer. Запускаем скрипт. Все если teamviewer закроется, скрипт запустит его снова.

 

Чтобы остановить процесс, убейте wscript.exe в диспетчере задач.

Изменено пользователем Omnividente

Пожалуйста, войдите, чтобы комментировать

Вы сможете оставить комментарий после входа в



Войти
×
×
  • Создать...