hilfe bei Protokoll-Erstellung nötig

Lottich

Hey dudes,

der DAU hier

Folgendes Problem:
Laufende Prozesse werden von meinem Programm gestoppt --> Dateien werden gelöscht/umbenannt --> Programm wird gestartet, dass einen Prozess startet

Das will ich in einem Protokoll genau festhalten mit Zeit und so.

Bisheriger Source

Spoiler anzeigen

[autoit]

FileMove($namealt, $nameneu)

[/autoit] [autoit][/autoit] [autoit]

FileWrite($logfile, "[ " & @HOUR & ":" & @MIN & ":" & @SEC & "." & @MSEC & " ] --> " & $mamname & @TAB & "Dateien chronologisch umbenannt" & @LF)
FileWrite($logfile, "[ " & @HOUR & ":" & @MIN & ":" & @SEC & "." & @MSEC & " ] --> " & $mamname & @TAB & "der Watcher wird den Prozess neu starten" & @LF)

[/autoit] [autoit][/autoit] [autoit]

ShellExecute($programm,"",$pfad, "", @SW_MINIMIZE)
; Das Programm (der "Watcher"), was zuerst wieder gestartet wird, startet den Prozess immer wieder, falls er abschmiert.

[/autoit] [autoit][/autoit] [autoit]

;hier müsste dann der benötigte Code hin...

[/autoit]

wie müsste ich das schreiben, dass das aktuelle Script mir den genauen Zeitpunkt des Prozess-starts wiedergibt?

[autoit]

If Not ProcessExists ($prozess1)
Sleep(200)
If Not ProcessExists ($prozess1)
Sleep(200)
If Not ProcessExists ($prozess1)
Sleep(200)
If Not ProcessExists ($prozess1)
Sleep(200)
EndIf
EndIf
EndIf
EndIf

[/autoit]

Das kann ja nicht die Lösung sein.
Habt ihr Vorschläge für mich?

Lottich

Okay, habs selbst lösen können...

[autoit]

For $prozess1 = False To True
Sleep(10)
Next

FileWrite($logfile, "[ " & @HOUR & ":" & @MIN & ":" & @SEC & "." & @MSEC & " ] --> " & $mamname & @TAB & "der Prozess wurde erfolgreich neu gestartet" & @LF)

[/autoit]

Danke trotzdem

**water**

Vorausgesetzt, dass das Dein ganzes Script ist:
~~Aus Deiner Schleife kommst Du nie raus, weil der Wert von $prozess1 nie geändert wird.~~
RapIt hat natürlich Recht: Die Schleife wird 2x durchlaufen (mit den Werten False (also 0) und 1) und dann beendet.
Um das Log mit Datum und Uhrzeit zu schreiben kannst Du auch _FileWriteLog verwenden - kürzt das ganze etwas.

RapIt

Hi,Ich versteh deine Lösung jetzt auch nicht so recht...

Zitat von water

Aus Deiner Schleife kommst Du nie raus, weil der Wert von $prozess1 nie geändert wird.

Ist ja eine For-Schleife, dh. er müsste sofort wieder raus kommen, weil $process von 0 bis 1 höchzählt und die Schleife dann fertig ist... Ist meiner Meinung nach ne sinnlose Schleife
Naja, wenn dir geholfen ist, ist es ja gut...
RapIt

Lottich

ähhhm....

[autoit]

For $prozess1 = False To True
Sleep(10)
Next

FileWrite($logfile, "[ " & @HOUR & ":" & @MIN & ":" & @SEC & "." & ......

[/autoit]

Ich gehe davon aus, dass ich mit der Schleife abfrage, ob der Prozess vorhanden ist oder nicht.
Und solange er nicht vorhanden ist soll die Schleife 10ms schlafen und wieder abfragen und erst mit dem Script weitermachen,
bis der Prozess tatsächlich existiert.

Wie könnte ich das sonst realisieren wenn nicht mit true und false?!

Edit:
so sollte es aber nun korrekt sein....

[autoit]

For $i = 1 To 999999
If ProcessExists($prozess1) Then
ExitLoop
Else
Sleep(10)
EndIf

Next
_FileWriteLog($logfile,$mamname & @TAB & "der Prozess wurde erfolgreich neu gestartet")

[/autoit]

**water**

Eigentlich verwendet man dafür While:

[autoit]

While ProcessExists($prozess1) = False
Sleep(100)
Wend
_FileWriteLog($logfile,$mamname & @TAB & "der Prozess wurde erfolgreich neu gestartet")

[/autoit]

Den Sleep Wert würde ich erhöhen, da er in 1/1000 Sekunden angegeben wird. 100 prüft also immer 10x pro Sekunde. Sonst ist der CPU Verbrauch zu hoch.

Lottich

Aha!!!!
Danke für diesen Tip!!!

Ich dachte bisher immer, dass man diese While-Schleife nur mit 1 und nur ein mal am Ende eines Scripts verwenden kann :wacko:
Weil ich das sooo noch nirgends gesehen hab. Werde das gleich mal testen

**water**

Wenn Du Zweifel über die Funktion von Autoit hast, dann würde ich dringend einen Blick in die Hilfe empfehlen!

Lottich

Zitat von water

Wenn Du Zweifel über die Funktion von Autoit hast, dann würde ich dringend einen Blick in die Hilfe empfehlen!

Die Hilfe ist mein ständiger Begleiter
Allerdings ist die ja sowas von umfangreich und komplex, dass sie einen fast erschlägt

Und nebenbei bemerkt, bin ich nicht mehr ganz so ein blutiger Anfänger und hab mir tatsächlich schon die eine oder andere Funktion erfolgreich geschrieben...
Das einzige wo ich mich noch nicht wirklich ran traue sind Arrays und diese DLLcalls

**water**

Zitat

Ich dachte bisher immer, dass man diese While-Schleife nur mit 1 und nur ein mal am Ende eines Scripts verwenden kann

Da dachte ich doch, dass sich ein Blick in die Hilfe lohnen würde
Schliesslich gehören While und Do Until zu den Basiskonzepten beinahe jeder Programmiersprache.