Domino 9 und frühere Versionen > ND8: Entwicklung

Protokoll nach Vergleich erstellen

(1/2) > >>

MarkusL:
Hallo zusammen,

ich mal wieder.......
Ich suche einen Lösung, für folgendes Problem:

In einer Maske sind 9 mal 2 Felder, die miteinander verglichen werden sollen und das Ergebnis soll in einem neuen Dokument gespeichert werden.
Die Felder sind Mehrfachfelder.
Vergleiche Feld 1.1 mit 1.2 per ArrayReplace
Vergleiche Feld 1.2 mit 1.1 per ArrayReplace
Vergleiche Feld 2.1 mit 2.1 per ArrayReplace
Vergleiche Feld 2.2 mit 2.1 per ArrayReplace
usw.

Die Vergleiche schreibe ich in ein Variant-Array (wobei man dies auch diskutieren könnte).

Ich erstelle ein neues Dokument, in dem sich ein RichTextFeld befindet.
In das Feld schreibe ich einige erläuternde Worte und will dann die einzelnen Array-Inhalte in das RichTextFeld einfügen. Und an dieser Stelle läuft der Agent auf einen Fehler.

Set rti = docProto.CreateRichtextItem("Protokoll_Text")
rti.AppendText(vArray(1,2))

Kann mir jemand einen besseren Ansatz nennen?
Oder mir sagen, warum das nicht funktioniert?

Danke schon einmal

Gruß
Markus

Klafu:
Hallo Markus,

prinzipiell gilt: wie lautet denn der Fehler? Ist "rti" und das Array "vArray" richtig deklariert?
Die Noteshilfe sagt zu AppendText übrigens:


--- Zitat ---Inserts text in a rich text item. The text is rendered with the current style of the item (such as bold or italics).
Defined in
NotesRichTextItem
Syntax
Call notesRichTextItem.AppendText( text$ )

--- Ende Zitat ---

Chris

Tode:
Deine zwei Zeilen Code sind syntaktisch korrekt, mit Deinen Informationen kann man also leider keine Hilfe geben.

Ob Dein "Vorgehen" sinnvoll ist, kann ich nicht beurteilen, aber "läuft der Agent auf einen Fehler" ist natürlich nicht wirklich eine hilfreiche Fehlerbeschreibung.

Das ist so, wie wenn Du in der Werkstatt anrufst und sagst "Mein Auto fährt nicht, können Sie mir sagen warum nicht?"

- Welcher Fehler kommt EXAKT
- Wie sind die Variablen deklariert
- Ist Dein vArray WIRKLICH 2- dimensional?
- Hast Du denn ein ErrorHandling (wenn nein: warum nicht?)

Mehr Input, mehr output...

Peter Klett:
NotesRichtextItem.AppendText erwartet als Parameter einen String, evtl. hilft schon ein

rti.AppendText(CStr (vArray(1,2)))

MarkusL:
Hallo Chris,

das Array ist als Variant deklariert: Dim vArray(1 To 9, 1 To 5) As Variant
Allerdings gibt es in einigen Bereichen des Array Mehrfachwerte - und die machen die Probleme.

Wenn ich das Array an das Feld übergeben, kommt der Fehler: Arrays of Arrays not supported

Dim vArray(1 To 9, 1 To 5) As Variant
Dim rti As NotesRichTextItem

...

vArray(1,1) = "Text"
vArray(1,2) = "Text 2"
vArray(1,3) = FullTrim(ArrayReplace(vFeldIst,vFeldSoll,vArray(1,3)))

....

docProto.Protokoll_Text = vArray

Fehler: Arrays of Arrays not supported

Wenn ich die Bereiche des Arrays einzeln übergebe, klappt das mit den einfachen Texten, aber nicht mehr mit den Mehrfach-Inhalten.

War das jetzt verständlich, oder benötigst du weitere Infos?

Gruß Markus

Navigation

[0] Themen-Index

[#] Nächste Seite