Einzelnen Beitrag anzeigen

Benutzerbild von turboPASCAL
turboPASCAL

Registriert seit: 8. Mai 2005
Ort: Sondershausen
4.274 Beiträge
 
Delphi 6 Personal
 
#13

Re: Dauer von Code in Batch-Datei

  Alt 24. Mai 2009, 11:43
So ist es.

Bei dem Script aus Post #5 gibt es bei der Zeitberechnung Fehler zB.
wenn "10:00:00 - 09:55:02" berechnet wird.

Ich habe mal was zusammengeklöppelt ohne eine Temp-.Datei zu benötigen:
Code:
@ECHO OFF

REM --- Start der Zeitmessung ------------------------------------------------
FOR /F "eol=; tokens=1,2,3,4,5* delims=:;, " %%i IN ("%TIME%") DO (
SET /A sDezTime= %%i * 3600 + %%j * 60 + %%k
)
FOR /F "eol=; tokens=1,2,3,4,5* delims=:;,. " %%i IN ("%DATE%") DO (
SET sDateDay= %%i%%j%%k
)

REM === Zu messende Action ===================================================
REM

pause

REM
REM ==========================================================================

REM --- Ende der Zeitmessung -------------------------------------------------
FOR /F "eol=; tokens=1,2,3,4,5* delims=:;, " %%i in ("%TIME%") DO (
SET /A eDezTime= %%i * 3600 + %%j*60 + %%k
)

FOR /F "eol=; tokens=1,2,3,4,5* delims=:;,. " %%i IN ("%DATE%") DO (
SET eDateDay= %%i%%j%%k
)

REM --- Datumdifferenz berechnen ---------------------------------------------
SET /A DateDif= (%eDateDay% - %sDateDay%)

REM --- Zeitdifferenz berechnen ----------------------------------------------
SET /A TimeDif= (%eDezTime% - %sDezTime%)
SET /A Hour= %TimeDif% / 3600
SET /A TimeDif= %TimeDif% %% 3600
SET /A Minut= %TimeDif% / 60
SET /A TimeDif= %TimeDif% %% 60
SET /A Secund= %TimeDif%

REM --- Zeitausgabe ----------------------------------------------------------
ECHO.
ECHO Tage: %DateDif% (Fehlerbehafted !)
ECHO Die Laufzeit betrug %Hour%:%Minut%:%Secund% h
ECHO.

REM --- Variablen zurueckdetzen -----------------------------------------------
REM --- "SETLOCAL" währe wol auch eine Moeglichkeit ;-)
SET sDateDay=
SET eDezDate=
SET DateDif=
SET sDezTime=
SET eDezTime=
SET TimeDif=
SET Hour=
SET Minut=
SET Secund=
Jetzt müsste man nur noch das Datumsgedöns und den Tegeswechsel mit einbeziehen.
Das ist mir aber zu komplex.
Matti
Meine Software-Projekte - Homepage - Grüße vom Rüsselmops -Mops Mopser
  Mit Zitat antworten Zitat