Domino 9 und frühere Versionen > ND7: Entwicklung

"Type mismatch" bei Agenten

<< < (3/8) > >>

dirk_2909:
Ändere Deinen Code mal folgendermaßen ab (Die Schleifenvariable ist für Notes ein Variant und
kennt die jeweiligen Methoden nicht):


--- Code: ---'Namen der Agenten auslesen und im Array "agname" speichern
Dim c as NotesAgent
Forall ctmp In sdbs.Agents
        Set c = ctmp   
If c.trigger = 1 Then
If c.IsEnabled = True Then
Redim Preserve agname(count)
agname(count) = c.name
count = count + 1
End If
End If
End Forall
--- Ende Code ---

jBubbleBoy:
@Dirk: Das löst aber nicht das Problem

Das Debuggen war eigentlich Sinnlos, denn lokal geht es ja nur beim Server läuft er gegen die Wand, um ein ordentliches Errorhandling kommst du nicht drum herum.
Hast Du so etwas im Einsatz?

ascabg:
@dirk_2909

--- Zitat ---Ändere Deinen Code mal folgendermaßen ab (Die Schleifenvariable ist für Notes ein Variant und
kennt die jeweiligen Methoden nicht)

--- Ende Zitat ---
 ???

Der folgende Code funktioniert bei mir ohne Probleme. Und agt ist nicht definiert und kennt alles aus der Klasse "NotesAgent".

--- Code: --- Dim ses As New NotesSession
Dim db As NotesDatabase

Set db = ses.CurrentDatabase
Forall agt In db.Agents
'Msgbox agt.Name
Print agt.Name
End Forall

--- Ende Code ---

@Jens_1
Was sind denn das fuer Agenten?
Wenn Du mit dem Debugger arbeitest, dann hast Du ihn ja manuell gestartet.

Was passiert, wenn Du Deinen Agenten wie gewollt "periodisch" startest und einmal mit einem Print-Befehl "protokollierst".

Andreas

jBubbleBoy:

--- Zitat von: ascabg am 07.07.09 - 15:38:42 ---Was passiert, wenn Du Deinen Agenten wie gewollt "periodisch" startest und einmal mit einem Print-Befehl "protokollierst".

--- Ende Zitat ---

Print ist aber ein unsauberes und ungenaues Errorhandling, würde ich nicht empfehlen.
Arbeite mit on error und err, erl, error und resume, bei Fragen dazu helfen wir dir gern.

Jens_1:
Hallo,

den Fehler fange ich ab wie folgt:


--- Code: ---On Error Goto ErrHandler

[...]

ErrHandler:
' Eintrag in's Log machen
Call currentLog.LogError( 0, "Der Fehler mit der Nummer" & Str(Err) & " und der Meldung " & Chr$(34) & Error$ & Chr$(34) & " ist bei Zeile " & Str(Erl) & " aufgetreten.")
Exit Sub

--- Ende Code ---

Daher weiss ich, daß das Script genau in der Zeile mit der Schleife abbricht.

Die Agenten in der Datenbank sind diverse Agenten deren Funktion mir nicht im Detail bekannt ist.
Imho ist das aber auch nicht relevant um deren Namen auszulesen?

Gruß
 Jens

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete