Das Notes Forum
Domino 9 und frühere Versionen => Administration & Userprobleme => Thema gestartet von: v_haderer am 30.04.12 - 11:17:14
-
Hallo Zusammen!
Ich wollte heute Früh "schnell" einen neue Funktionalität in einem meiner Serveragents einbauen,...leider nähern wir uns bereits der Mittagshitze und ich komm irgendwie nicht weiter. Ich wäre sehr dankbar wenn mir jemand einen heißen Tip oder sogar die Lösung veraten könnte ;-)
Mein Serveragent soll ein RTI von Dokument A and Dokument B anhängen,...eben mit Befehl "AppendRTItem"...soweit so gut... dies funktioniert nur solange ich kein Attachment drinnen habe.
Obwohl das Zielitem bereits als Richtextitem auf dem Zieldokument exisitiert, erhalte ich folgenden Fehler:
Agent printing: Der Agent ActivateStep ist fehlgeschlagen.
( 4000: Notes error: One or more of the source document's attachment are missing. Run Fixup to delete the document in the source database. (Line: 136)
??
liebe Grüße
V
-
Ein bisschen Code wäre nicht schlecht.
Unsere Kristallkugeln haben sich heute einen Brückentag genommen und siond schon auf dem Maiausflug. ;)
Axel
-
....oh ja mit einen kühlen Bierchen ... :)
If doc.HasItem("instBasisDaten_Read") Then
Call doc.RemoveItem("instBasisDaten_Read")
End If
Set rtZiel = doc.CreateRichTextItem("instBasisDaten_Read")
If prevDoc.aufType(0) <> "START" And prevDoc.aufType(0) <> "ENDE" Then
Set rtQuelleREA = prevDoc.GetFirstItem("instBasisDaten_Read")
If Not rtQuelleREA Is Nothing Then
If rtQuelleREA.Type <> TEXT Then
Call rtZiel.AppendRTItem(rtQuelleREA)
call doc.Save(true,false) ' und tschüss
End If
End If
End If
-
Hmm...
Auf den ersten Blick sieht das Ganze eigentlich richtig aus. Was mit auf den zweiten Blick etwas ungewöhnlich aussieht ist die Zeile
If rtQuelleREA.Type <> TEXT Then
Ich kenne das bisher nur so:
...
If rtQuelleREA.Type <> RICHTEXT Then
Call rtZiel.AppendRTItem(rtQuelleREA)
call doc.Save(true,false) ' und tschüss
End If
...
Axel