Hi,
heute will ich auch mal wieder ein Problem haben.
Ich habe ein Datenbank, in der, in einem RTF-Feld Feedbacks von verschiedenen Personen (unterschiedliche Anzahl) eingetragen werden sollen. Damit das Ganze etwas übersichtlicher aussieht wollte ich mit den neuen RTF-Klassen eine dynamische Tabelle ertellen.
Das Erstellen klappt auch soweit, nur das Anhängen an eine bestehende Tabelle klappt nicht.
Das Vorhandensein einer Tabelle frage ich so ab:
...
Dim rti As NotesRichTextItem
Dim rtnav As NotesRichTextNavigator
Set rti = doc.GetFirstItem("Feedback")
Set rtnav = rti.CreateNavigator
If Not rtnav.FindFirstElement(RTELEM_TYPE_TABLE) Then
'Erstelle eine neue Tabelle
Else
'Hänge eine Zeile an
End If
...
Die IF-Abfrage liefert aber immer False zurück, egal ob es eine Tabelle gibt oder nicht.
Kennt einer das Problem? Das RTF-Feld selbst ist innerhalb des Maskendesigns in Tabellen untergebracht. Im Feld selbst ist dann nur eine Tabellen vorhanden, die auch nicht verschachtelt ist.
Axel