Hallo,
mein Problem sollte eigentlich nicht allzu groß sein... aber irgendwie steh ich grad aufm Schlauch. Hoffentlich könnt ihr mir helfen.
Dies hier ist das Grundszenario und mein Problem:
Ich habe genau zwei Sachen in meiner Testmaske: ein RichText-Feld und eine Schaltfläche. Mit einen Klick auf die Schaltfläche wird etwas in das Richtext-Feld geschrieben und anschließend noch ein Doc-Link hinzugefügt.
In dem Feld sollte jetzt also beispielsweise sowas drinstehen: "xyz yxz <Link>"
Allerdings macht es das nicht. Das Feld bleibt einfach leer. Im Debugger seh ich aber, dass das Valuefeld durchaus mit dem Wert gefüllt wird. Dieser wird aber nicht angezeigt.
Warum nicht bzw. was kann ich machen damit es angezeigt wird?
Vielen Dank für die Hilfe
Philipp
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim doc As Notesdocument
Dim rtitem As Variant
Set uidoc = workspace.CurrentDocument
Set doc = uidoc.Document
Set rtitem = doc.GetFirstItem("Test_Feld")
'oder etwa:
'Set rtitem = New NotesRichTextItem( doc, "Test_Feld" )
If rtitem.Type = RICHTEXT Then
Call rtitem.AppendText("Feld wurde erfolgreich gefüllt")
Call rtitem.AppendDocLink( doc, "Link zu CRM" )
End If
'oder (hier weiß ich aber keine möglichkeit einen Link hinzuzufügen):
'Call uidoc.FieldAppendText("Test_Feld", "Beispieltext")
End Sub
