Das Notes Forum
Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: gfunkus am 20.10.04 - 15:05:50
-
Hallo,
Ich habe mir selber so eine Art Ausführungs Zeit logging gebastelt.
Weil ich mal loggen wollte wie lange die Agenten denn so brauchen.
Jetzt habe ich das Problem, wenn der Agent über den Server läuft, das das Logging immer nur ne null schreibt...
So hiert wird die Startzeit initilaized..
Dim starttime As New NotesDateTime("")
Dim endttime As New NotesDateTime("")
Dim laufzeit As Variant
Call starttime.SetNow
hier werden die unterscheidlichen sub abgearbeitet...
und am ende
Call endttime.SetNow
' Print Cstr(endttime)
laufzeit = endttime.TimeDifference(starttime)
laufzeit = Timenumber(0,0,laufzeit)
Wer weiss was?
-
Hallo,
das kannst Du auch einfache machen:
dim start as variant
dim ende as variant
start = now
...Code ohne Ende
Ende = now
print "Laufzeit: " & ende - start
Gruß von Ekki.