Domino 9 und frühere Versionen > Entwicklung

Im Backend Mehrfachwerte in ein Textfeld schreiben

(1/4) > >>

Gruenkohl:
Moin, moin,

also ich habe eine schon fast peinliche Frage.
Und zwar wie kann im Backend in ein Textfeld Mehrfachwerte schreiben, so das sie auch als Mehrfachwerte erkannt werden?

Ich habe in den Feldeigenschaften folgendes eingestellt:

- Mehrfachwerte zulassen
- Trennen bei Komma, Semikolon und Leerzeichen
- Anzeigen mit Semikolon

Wenn aber nun mit einem Agenten in dieses Feld etwas schreibe wird es nur als ein Wert genommen. Ein ComputeWithForm hat nichts gebracht.

Der eingefügte Text sieht z.B. wie folgt aus:  aaa, bbb, ccc, ...

Kann mir da jemand helfen???


Danke und Gruss

Andreas

koehlerbv:
Du brauchst hierfür ein Array.

Wenn es hardcoded geht:
Dim aMultiValue (0 to 2) as String
aMultiValue (0) = "Wert 1"
aMultiValue (1) = "Wert 2"
aMultiValue (2) = "Wert 3"
NotesDocument.MyMultiValueField = aMultiValue

Wenn Du mit bekannten Strings arbeiten kannst, kannst Du das Evaluate-Statement verwenden (siehe DesignerHelp) und mit den aus @functions bekannten Verfahren das Feld füllen:
NotesDocument.MyMultiValueField = Evaluate ({"Wert 1" : "Wert 2" : "Wert 3"})

Sonst brauchst Du ein dynamisches Array (Stichwort: Redim) oder
ArrayAppend auf ein bestehendes Array (was das Feld in Deinem backend-Doc immer ist).

HTH,
Bernhard

Gruenkohl:
Habe ich auch schon probiert aber bringt nix.
Wird auch wie ein Wert gesehen.
Ich probiere es aber noch mal aus.
Danke

Glombi:
Sieh Dir mal in der Designer Hilfe folgendes an:

Call notesItem.AppendToTextList( newValue )

Bsp:
Dim doc As NotesDocument
Dim item As NotesItem
Dim newVals( 1 To 3 ) As String
'...set value of doc...
Set item = doc.GetFirstItem( "Categories" )
newVals( 1 ) = "Girls"
newVals( 2 ) = "Boys"
newVals( 3 ) = "Toys"
Call item.AppendToTextList( newVals )
Call doc.Save( False, True )

Andreas

Gruenkohl:
Ja wunderbar. Das hat gezogen.
Danke und schönen Feierabend.

Andreas

Navigation

[0] Themen-Index

[#] Nächste Seite