Programmüberwachung und wenn nötig Neustart

#16 _d4rkn3ss4ev3r_

Gruppe: Gäste

geschrieben 14. November 2010 - 15:17

Hmm komisch. Was hast du denn wo eingetragen?

Nach oben
Nach oben of the page up there ^

#17 _The Grim Reaper_

Gruppe: Gäste

geschrieben 14. November 2010 - 17:35

Ich hab lediglich ProgrammExe und ProgrammPfad geändert. Ich hab auch keine enter.vbs auf dem PC.

Nach oben
Nach oben of the page up there ^

#18 _d4rkn3ss4ev3r_

Gruppe: Gäste

geschrieben 14. November 2010 - 17:48

Ja und was hast du da genau eingetragen? Vielleicht ist da ein Fehler

Die enter.vbs wird aus der Batch im Selben Verzeichnis erstellt, in der dein Programm liegt

Nach oben
Nach oben of the page up there ^

#19 _The Grim Reaper_

Gruppe: Gäste

geschrieben 14. November 2010 - 17:50

Dann braucht die Batch Admin Rechte.

EDIT: Das wars

- mit Adminrechten läuft es

.

Danke dir vielmals für deine Mühe.

Dieser Beitrag wurde von The Grim Reaper bearbeitet: 14. November 2010 - 17:51

Nach oben
Nach oben of the page up there ^

#20 _d4rkn3ss4ev3r_

Gruppe: Gäste

geschrieben 14. November 2010 - 18:16

Na es geht auch ohne Admin Rechte

Hier:

CODE

@echo off
set ProgrammExe=notepad++.exe
set ProgrammPfad=E:\Notepad++
set zeitSek=300
set vbsPfad=%~dp0enter.vbs
:vbs
echo Set ws = CreateObject("WScript.Shell")>%vbsPfad%
echo Wscript.Sleep 5000>>%vbsPfad%
echo ws.SendKeys "{ENTER}">>%vbsPfad%
cd /d "%ProgrammPfad%"
:refresh
set /a zeitMins=%zeitSek%/60
cls
tasklist|find "%ProgrammExe%">nul
if not errorlevel 1 echo Programm l„uft noch&goto :time
echo Programm wird gestartet...&start %ProgrammExe%&start %vbsPfad%
:time
echo Warte %zeitMins% Minuten...
ping localhost -n 60>nul
set /a zeitMins=%zeitMins%-1
if "%zeitMins%"=="0" goto :refresh
cls&goto :time

Nun wird die vbs Datei im Ordner erstellt wo die cmd gestartet wird. Die "alte" vbs Datei in deinem Programmordner kannst du löschen.

Nach oben
Nach oben of the page up there ^

#21 _The Grim Reaper_

Gruppe: Gäste

geschrieben 14. November 2010 - 18:53

Danke. So wär es jedoch auch gegangen. Es wird aber kein Enter zwangsläufig an der exe ausgeführt? Wenn ich die cmd starte und dann das Fenster mit der Bestätigung kommt und ich auf den Desktop klicke, sodass es nichtmehr aktiv ist, passiert nix.

Nach oben
Nach oben of the page up there ^

#22 _d4rkn3ss4ev3r_

Gruppe: Gäste

geschrieben 14. November 2010 - 19:08

Richtig. Wenn du gleich aufm Desktop klickst, nachdem das Programm gestartet wurde, wird kein Enter eingefügt. Das muss aber vor den 5 Sekunden passieren. Ansonsten setz einfach die Zeit hoch. (Die 5000) in ms

Nach oben
Nach oben of the page up there ^

#23 _The Grim Reaper_

Gruppe: Gäste

geschrieben 14. November 2010 - 19:10

Ich denke mal das passt so - kann also nur hoffen, dass in den 5 Sekunden sich kein anderes Programm automatisch auf aktiv setzt

.

Das Programm braucht auch kurz um gestartet zu werden, daher meinte ich so 5sec.

Nach oben
Nach oben of the page up there ^

#24 _The Grim Reaper_

Gruppe: Gäste

geschrieben 16. November 2010 - 17:30

Leider funktioniert es doch nicht so ganz. Wenn die cmd schon läuft, ist sie nicht aktiv und das Programm, welches dann gestartet wird, auch nicht. Daher wirkt das Enter dann leider nicht ^_^

Nach oben
Nach oben of the page up there ^

#25 _d4rkn3ss4ev3r_

Gruppe: Gäste

geschrieben 16. November 2010 - 18:54

Kein Problem, dann wird halt die Cmd nach 5 Minuten wieder gestartet.

CODE

@echo off
set ProgrammExe=notepad++.exe
set ProgrammPfad=E:\Notepad++
set zeitSek=300
set vbsPfad=%~dp0enter.vbs
:vbs
echo Set ws = CreateObject("WScript.Shell")>%vbsPfad%
echo Wscript.Sleep 5000>>%vbsPfad%
echo ws.SendKeys "{ENTER}">>%vbsPfad%
cd /d "%ProgrammPfad%"
set /a zeitMins=%zeitSek%/60
tasklist|find "%ProgrammExe%">nul
if not errorlevel 1 echo Programm l„uft noch&goto :time
echo Programm wird gestartet...&start %ProgrammExe%&start %vbsPfad%
:time
echo Warte %zeitMins% Minuten...
ping localhost -n 60>nul
set /a zeitMins=%zeitMins%-1
if "%zeitMins%"=="0" cls&start %~dp0programmcheck.cmd&exit
cls&goto :time