Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Fbaum am 24.10.02 - 11:44:42
-
Hallo...
hätte da noch eine ganz kurze Frage...
Wie starte ich einen Agenten in Lotus Script??
Stehe gerade auf dem Schlauch... In der Notes Hilfe habe ich auch nicht wirklich was gefunden.
100000 Dank an Euch...
Gruß FBaum
-
Hi,
das Beispiel hab ich in der Designer-Hilfe gefunden:
1. This agent runs the agent named "Agent to be run LotusScript."
Sub Initialize
Dim s As New NotesSession
Dim db As NotesDatabase
Dim agent As NotesAgent
Set db = s.CurrentDatabase
Set agent = db.GetAgent("Agent to be run LotusScript")
If agent.Run = 0 Then
Messagebox "Agent ran",, "Success"
Else
Messagebox "Agent did not run",, "Failure"
End If
End Sub
This is "Agent to be run LotusScript."
Sub Initialize
Dim s As New NotesSession
Dim agent As NotesAgent
Set agent = s.CurrentAgent
Dim db As NotesDatabase
Set db = s.CurrentDatabase
Dim memo As New NotesDocument(db)
memo.Form = "Memo"
memo.SendTo = s.UserName
memo.Subject = "Message from LotusScript agent"
memo.Body = "The agent is running as " & s.UserName
Call memo.Send(False)
End Sub
Axel
-
Hi,
genau das Ding habe ich auch gefunden. Funktioniert aber bei mir nicht so wirklich. Wenn ich meinen Agenten manuell starte geht´s. Nur nicht über das Script...
Gruß FBaum
-
was spuckt er denn für ne fehlermeldung aus ?
oder läuft er einfach nur nicht ?
-
Hi,
liegt der zu startende Agent in einer Datenbank auf dem gleichen Server?
Gruß
-
Hallo....
Asche über mein Haupt....
Ich bestreite alles und behaupte das Gegenteil...
Jetzt läuft er. Hatt was vergessen zu kopieren.
Vielen Dank für die Hilfe.
Gruß FBaum....