Domino 9 und frühere Versionen > Entwicklung

Agent via script starten

<< < (3/5) > >>

pipsxx:
huhu!!

ich haette auch noch nen kleines skript fuer nen button. das schreibt den text in ein RT-feld. der text wird dabei angefuegt.

vielleicht kannst du damit was anfangen?  ;)

Sub Click(Source As Button)
     
     Dim session As New NotesSession
     Dim db As NotesDatabase
     Dim workspace As New NotesUIWorkspace
     Dim uidoc As NotesUIDocument
     Dim Agnet As NotesAgent
     Dim rtitem As Variant
     
     Set db = session.CurrentDataBase
     Set uidoc = workspace.CurrentDocument
     
     Call uidoc. gotofield("Inhalt")
     Call uidoc.FieldAppendText( "Inhalt", "hallo" )
     
End Sub

rar:
Danke für die scripts, aber sie helfen leider nicht. :'(
AppendText fügt den Text am Ende des Feldes ein. Ich brauche den Text aber an der aktuellen Cursorposition....

Ich bekomme das Gefühl, daß ich langsam am verzweifeln bin.

pipsxx:
hm...

wenns weiter nix is ;)

siehe designer-hilfe:

Inserts a text value at the current cursor position on a document.
Defined in
NotesUIDocument
Syntax
Call notesUIDocument.InsertText( textValue$ )

wars vielleicht das??  :D

rar:
Wäre fein.
Aber der Text soll, wie bereits oben erwähnt, formatiert sein. (siehe 5. Statement) in diesem Thread
-dani

pipsxx:
sorry, das hab ich wohl bei den ganzen eintraegen uebersehen...

dann weiss ich leider auch nicht weiter. hm...  :-/

aber vielleicht findet sich ja doch nochwas

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete