Domino 9 und frühere Versionen > ND8: Entwicklung

Liste in Textfeld eintragen

(1/1)

MarkusL:
Hallo zusammen,

ich habe eine Textliste, die ich über ein Array in ein Feld eintragen möchte, welches Mehrfachwerte zulässt.
Die Textliste und das Array sehen im Debugger gut aus.
Der Eintrag im Feld besteht allerding nur aus einigen lustigen "Strichmännchen".
Kann mir jemand helfen?

Code:
Dim lProtoText List As String
Dim vArray As Variant

Füllen der Textliste.......

vArray = lProtoText
docProto.Protokoll_Text = vArray

Danke an alle.
Gruß Markus

Mitch:
Hallo du,


--- Zitat von: MarkusL am 03.02.15 - 14:05:56 ---Der Eintrag im Feld besteht allerding nur aus einigen lustigen "Strichmännchen".
--- Ende Zitat ---

Was heißt das?


--- Zitat von: MarkusL am 03.02.15 - 14:05:56 ---Dim lProtoText List As String
Dim vArray As Variant

Füllen der Textliste.......

vArray = lProtoText
docProto.Protokoll_Text = vArray

--- Ende Zitat ---

Wo ist da der Array? Ich sehe nur, dass du eine Liste in einen Variant steckst. Der Variant mag vArray heißen, aber das tut ja nix zur Sache. ;)

Das wird auch dein Problem sein, denn grundsätzlich ist "Array in Item stecken" der richtige Weg. Aber muss eben auch ein Array sein...

Gruß,

Mitch

MarkusL:
Hi Mitch,

ich habe solange Fehler gesucht und probiert, bis ich auch einige wichtige Zeilen gelöscht habe.
Jetzt habe ich es.   :)
Ich danke dir.

Dim strArrayToAppendTo (0) As String
Dim vArrayResult
.....weiter Dims

Set doc = view.GetFirstDocument()
vArrayResult = ArrayAppend(strArrayToAppendTo, "")

While Not(doc Is Nothing)
   Set nextdoc = view.GetNextDocument(doc)
   vArrayResult = ArrayAppend(vArrayResult, doc.Nachname(0))
   Set doc = nextdoc
Wend
   
vArrayResult = FullTrim(vArrayResult)

docNew.Text = vArrayResult

Navigation

[0] Themen-Index