Domino 9 und frühere Versionen > ND6: Entwicklung

programatische Tabellenerstellung

<< < (2/4) > >>

m3:
ROTFL!

Hab ich schon erwähnt, dass der Morgen hier in Österrreich auch sehr schön ist?
Darf ich eigentlich antworten, auch wenn ich nicht in DE bin?

Wurscht, ich mach es trotzdem.  ;D


1) "Knopfdruck" - Buttons im Form, Actions des Forms, Toolbar-Buttons oder ganz was anderes?

2) Code "scheint richtig zu sein" gibts nicht. Entweder er ist korrekt, oder nicht.

3) Welcher Code? Formelsprache, LotusScript, Java, C# via COM oder was?

4) Ad RitchTextField: Auf RTF-Inhalte eines neuen Dokumentes kann üblicherweise man erst zugreifen, NACHDEM das Dokument gespeichert wurde.

DerAndre:
Wenn ich mir den Code so anschaue löscht Du erst das Feld Body und erzeugst Feld neu.
In welchen Feldern soll die Tabelle angelegt werden?

bikerboy:
@m3

Antworten werden unabhängig des Herkunftlandes entgegen genommen. :P

zu 1 . Knopfdruck

zu 2. er funktioniert ja

zu 3. LotusScript (( offensichtlich) wahrscheinlich meine ANtowrt noch nicht gesehen )

zu 4. Der Code ist nicht von mir, habe ihn von nem Kollegen und dann abgewandelt, damit er meine Inhalte richtig darstellt, was ihr hier seht ist der orginale.

@ DerAndre :

Die Tabellen werden im Feld Body abgelegt, dass er die alte Tabelle löscht ist so gewollt, da sich die Postionen aus denen die Tabelle sich erstellt ändern können.

DerAndre:
Er funktioniert ja offensichtlich nicht, da er nicht das tut was er soll.
Es sollen 2 Tabellen in 2 Felder gepackt werden.
Warum wird dann immer nur das eine gelöscht?
Welches Originale? Deins oder das vom Kollegen. Wenn es der Code vom Kollegen ist, ist das Käse, Dein Code funzt nicht, nicht der von Deinem Kollegen.

bikerboy:
So einen (Denk)-Fehler habe ich schon gefunden. Und zwar rufe ich die Tabellenerstellung so hinter einander auf :


--- Code: ---Sub Click(Source As Button)

Call Body

Call Body2

End Sub
--- Ende Code ---

benutze aber die selben Variablen nochmal also,


--- Code: --- Dim rtf As NotesRichTextItem
Dim rtsBold As NotesRichTextStyle
Dim rtsNormal As NotesRichTextStyle
Dim coHead As NotesColorObject
Dim coAlternate As NotesColorObject
Dim rtnPositions As NotesRichTextNavigator
Dim rtnTotal As NotesRichTextNavigator
Dim rtt As NotesRichTextTable

--- Ende Code ---

und überschreibe diese ja dann. Also bin ich los gegangen und habe den die ganzen Variablen mit einem "m" wie "meins" erweitert. Trotzdem geht der Fehler nicht weg.

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete