Domino 9 und frühere Versionen > Entwicklung

Periodischer Agent mit EMail

<< < (2/2)

Aladdin Sane:
Wie haben hier nur einen Produktions-Domino-Server, auf dem auch entwcikelt wird.

Im Feld "Run unrestricted Lotus Script/Java Agents" bin ich eingetragen.
Und den Agenten habe ich erstellt und gespeichert.

ata:
Dein Code kann nicht funktionieren, die Initialisiserungen fehlen:

Dim session       As New NotesSession     
Dim db          As NotesDatabase
Dim doc_Mail      As Notesdocument   

Set db = session.CurrentDatabase ' # oder etwas in der Art
Set doc_Mail = db.CreateDocument

doc_Mail.SendTo                    = "Pascal Willsch"
doc_Mail.subject                   = "Test"
Call doc_Mail.send(False)

ata

koehlerbv:

--- Zitat von: Aladdin Sane am 07.04.05 - 15:41:51 ---Folgendes Log erscheint:
07.04.2005 15:32:58   AMgr: Agent ('PWI_SendMail' in 'AgentLab.nsf') error message: Notes error: You are not authorized to use the server

--- Ende Zitat ---

Anton hat schon vollkommen recht - der Agent kann so nicht funktionieren, wenn Du allen Code gepostet hast, Pascal. Aber der Agent läuft offensichtlich erst gar nicht an (und kann daher nicht über den fehlerhaften Code stolpern), da der Domino Server ein Rechteproblem bemängelt. Mir sieht das daher nach einem doppelten Problem (administrationsseitig und entwicklungsseitig) aus.

Bernhard

Aladdin Sane:
Sorry, ich habe nicht den gesamten Code gepostet.
Initialisiert werden DB und Document so:

Sub Initialize
   
   Dim session       As New NotesSession      
   Dim db          As NotesDatabase
   Dim doc_Mail      As Notesdocument   
   
   Set db          = session.currentdatabase
   Set doc_Mail      = New NotesDocument(db)
   doc_Mail.Form      = "Memo"   
   
   doc_Mail.SendTo    = "Pascal Willsch"
   doc_Mail.subject   = "Test"
   Call doc_Mail.send(False)
   
End Sub

Navigation

[0] Themen-Index

[*] Vorherige Sete