Meldung Agent Done im Web

Domino 9 und frühere Versionen > Entwicklung

(1/1)

mahonri:
Wenn ich einen Agenten im Web vom Anwender starten lasse, bekomme ich die Meldung Agent Done, Beim Übertragen von Masken kann ich das abfangen, aber wie geht das bei Agents (Lotus Script)?

harkpabst_meliantrop:
This is a LotusScript version of "Change Status to Closed." It runs on "All documents in database" and uses UnprocessedDocuments to get the documents to be processed. The Print statement replaces the "Agent done" page with its text.

--- Code: ---
Sub Initialize
Dim s As New NotesSession
Dim db As NotesDatabase
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Set db = s.CurrentDatabase
Set dc = db.UnprocessedDocuments
Set doc = dc.GetFirstDocument
Do While Not(doc Is Nothing)
doc.Status = "Closed"
Call doc.Save(False, True)
Set doc = dc.GetNextDocument(doc)
Loop
Print "<B>All Status fields set to 'Closed'</b>"
End Sub

--- Ende Code ---

Ich denke, man kann auch direkt einen Link aufrufen (bin mir aber nicht ganz sicher, ich benutze solche Agenten eigentlich nicht)

Notfalls gibts du mit Print eine HTML-Seite mit einem META-Tag Refresh aus. Auf dieser Seite kann man dann auch die Erfolgsmeldung unterbringen.

zaphod:
Hi

ich verwende zwei varianten

- per print eine html seite ausgeben also:
print "<html><head><titel>titel</titel></head>"
print "<body>Danke für irgendwas... "
print "<a href=""ansicht?openview"">hier</a> gehts zurück"

- oder einfacher eine url-aufrufen:
print "[www.atnotes.de]"

bye bye z

Navigation

[0] Themen-Index

Zur normalen Ansicht wechseln