Autor Thema: Agent Logging Problem ...  (Gelesen 989 mal)

Offline gfunkus

  • Aktives Mitglied
  • ***
  • Beiträge: 224
  • Geschlecht: Männlich
  • www.atnotes.de! Hier werden sie geholfen.
Agent Logging Problem ...
« 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?

elajen

  • Gast
Re: Agent Logging Problem ...
« Antwort #1 am: 21.10.04 - 08:21:49 »
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.

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz