Domino 9 und frühere Versionen > Entwicklung

Agent mit einem Agent deaktivieren

(1/2) > >>

Stephanie:
Hallo Zusammen

Ich muss einen Agenten mit einem anderen Agenten deaktivieren.

Hat da jemand vielleicht schon eine Lösung?

Danke und Gruss

Till_21:
aus der notes-hilfe :

Dim session As New NotesSession
Dim db As NotesDatabase
Dim agent As NotesAgent
Dim enabled As Variant
Set db = session.CurrentDatabase
Forall a In db.Agents
  If ( a.Name = "Sort incoming mail" ) Then
    Set agent = a
    agent.IsEnabled = False
    Call agent.Save
  End If
End Forall

es gibt jedoch eine elegantere loesung an den agenten zu kommen, immo nicht gefunden

gruss

Performance:
und der kurze Weg:

Dim Agent As NotesAgent
Set Agent = database.GetAgent("(CheckServers)")
    If Not(Agent Is Nothing) Then
        Call Agent.Run
     end if


cu

ata:
@Performance

... mit dem kurzen Weg meinst du sicherlich die Initialisierung des Agents. Mit dem Code startest du den Agent...

ata

Till_21:
@ata : ich glaube, dass weiss performance... :) hoff ich zumindest

@performance : das war das was ich meinte...

gruss

Navigation

[0] Themen-Index

[#] Nächste Seite