Hallo!
Ich hab mal wieder ein Problem, das
"Call doc.MakeResponse(doc2)"
geht nicht :(
Folgende Situation:
Mit
Dim agent As NotesAgent
Set agent = db.GetAgent("DatenÜbertragen")
agent.RunOnServer(pdoc.NoteID)
rufe ich einen Agenten auf, dies geht soweit. Der Agent ist so aufgebaut (unwichtiges weggelassen):
(Declarations)
Dim session As NotesSession
Dim db As NotesDatabase
Dim agent As NotesAgent
Dim cdoc As NotesDocument
Initialize
Set session = New NotesSession
Set db = session.CurrentDatabase
Set cdoc = db.GetDocumentByID(agent.ParameterDocID)
Call main
main
Dim doc As NotesDocument
Set doc = New NotesDocument(db)
Call doc.MakeResponse(cdoc)
Wenn nun der "Call doc.MakeResponse(cdoc)"-Aufruf kommt, dann bekomme ich ein "Fehlermeldung von Agent 'DatenÜbertragen': Type mismatch". Wenn ich selben Aufruf mit "Call doc.MakeResponse(db.GetDocumentByID(agent.ParameterDocID))" ausführe dann geht's. Andere Befehle in main kennen aber cdoc, warum kann MakeResponse damit nicht umgehen?
Danke! Ralph