Domino 9 und frühere Versionen > Entwicklung

Agent via script starten

<< < (2/5) > >>

doliman:
Hi,

jo setzt ist es etwas verständlicher gewesen.
Das Body Field ist doch ein RTF Feld, oder?
Wir haben das an einer anderen Stelle so gelöst:
die Script Klassen des RTF benutzt. Das Feld ausgelesen in eine Variable bearbeitet und wieder zurückgeschrieben in das Feld. Wärend der Verarbeitung wird es dann formatiert, angehängt.
So viel ich weiss funktioniert die Formel in Macro nicht so wie Du sie verwenden möchtest (formatieren, fett usw.)
das ganze mußt Du wohl in Script machen.
Ich schaue mal nach dem Code und poste es später.

pipsxx:
haaallo!!

habe ich das richtig verstanden: du willst per button text in ein dokument einfuegen?

ich weiss nicht, ob ich das jetzt richtig verstanden habe. aber kann man im frontend nicht einfach mit @SetField arbeiten, auch wenn es sich um RT handelt?

in script geht das doch sicherlich auch. ich meine, ganz ohne agent, sondern direkt im script fuer den button. du musst nur das aktuelle dokument nehmen. fuer das fuellen des feldes gibst dann sowas wie body.replaceitemvalue oder so aehnlich an. koennte mir vorstellen, dass das klappt. da findet sich doch bestimmt was...

wenn ich voellig daneben liege... sorry!!  :)

pipsxx:
ach nochwas...

wenn du weisst, dass der agent gelaufen ist. liegt es dann vielleicht eher am quellcode des agenten? ich mein, vielleicht stimmt ja irgendwas bei der formelsprache nicht?  ::)

rar:
@doliman:
Ich habe keine Ahnung wie man das auslesen des Feldes bewerkstelligen kann... In dem feld kann alles stehen. (Fromartierter Text, Tebellen, Attachments,....) Und irgendwo, wo der Cursor steht, soll der Text eingefügt werden. Das Auslesen vom Inhalt eines rtfeldes geht meines wissens nicht. (Nur mit GetFormattedText, was aber nur einen String (ohne Anhänge und so) ergibt).

@pipsxx:
Mit @SetField kann man dem Feld nur ein Wert zuweisen. Ich muß zum bestehenden Inhalt was anhängen '[EditInsertText]' wäre es eigentlich.
Und der Quellcode vom Agent solle auch stimmen.
In der Zeile '@Command([EditInsertText];"Einzufügender Text")' ist eigentzlich kein Fehler.

-d

Axel:
Hi,

hier hab ich ein Script aus einem Aktionsbutton aus einer Ansicht, das zwei Textzeilen in das RTF-Feld "Datei" des markierten Dokuments schreibt.


Sub Click
     Dim session As New NotesSession
     Dim db As NotesDatabase
     Dim doc As NotesDocument
     Dim collection As NotesDocumentCollection
     Dim rtitem As Variant
     
     Set db = session.CurrentDatabase
     Set collection = db.UnprocessedDocuments
     Set doc = collection.GetFirstDocument
     
     Set rtitem = doc.GetFirstItem( "Datei" )
     If ( rtitem.Type = RICHTEXT ) Then
           Call rtitem.AppendText( "Text hinzufügen" )
           Call rtitem.AddNewLine( 1 )
           Call rtitem.AppendText("Noch mehr Text hinzufügen")
           Call doc.Save( False, True )
     End If
End Sub

Ich hoffe das hilft dir weiter.

Axel

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete