Domino 9 und frühere Versionen > Entwicklung

Leserfeld füllen

<< < (2/3) > >>

Axel:
Hi,

ach so, du willst das mit Script machen. Eine der möglichen Alternativen ist ein Array.

Dim strLeser(1) As String

strLeser(0) = "Lesername1"
strLeser(1) = "Lesername2"

Set item = doc.ReplaceItemValue( "Name des Leserfeldes", strLeser )


Axel

nieke:
... geht nicht!
Er sagt mir "arrays of arrays are not supported"
Woran liegt das?

Axel:
Hi,

die Fehlermeldung sagt mir erstmal nix. Kannst du mal den Code posten. Vielleicht sieht man dann mehr.


Axel

nieke:
... ja klar!
ub Click(Source As Button)
   ...
   Dim profileDoc As NotesDocument
   Dim myAuthors As Variant
   Dim doc As Variant
   Dim creater As Variant
   Dim leser As Variant
   Dim myleser (1) As Variant
   ...
      
   myleser(0)=uidoc.fieldgettext("Ersteller")
   myleser(1)=profileDoc.GetItemValue("Leser")
   ...   
   doc.Autor = profileDoc.GetItemValue("Authors")
   Call doc.replaceItemValue("Leser", myleser)
   ...

Das Feld "Leser" ist ein Leserfeld und es sind Mehrfachwerte zugelassen. Ich habe das Script "debugged", der bekommt erst beim ReplaceItemValue ein Problem. Der Rest läuft einwandfrei.
Kannst Du damit mehr anfangen?

Axel:
Hi,

yoo, jetzt ist das Ganze klarer. Das geht so nicht, denn profileDoc.GetItemValue("Leser") liefert, da Mehrfachwerte, ein Array. Daher die Fehlermeldung.

Alternative wäre folgendes:

Set item As NotesItem
...
     
doc.Autor = profileDoc.GetItemValue("Authors")

Set item = doc.replaceItemValue("Leser", profileDoc.GetItemValue("Leser"))
Call item.AppendToTextList(uidoc.fieldgettext("Ersteller"))  
...
   
Axel

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete