Text zu Mehrfachwerten hinzufügen?

  • Hallo,


    bin ein Newbie was LotusScript angeht. :)


    Ich habe folgendes Problem: Ich habe ein Feld mit Mehrfachwerten und möchte einen zusätzlichen Wert hinzufügen, unabhängig davon, wieviele Einträge das Feld bereits enthält.


    Wie mache ich das am besten? Gibt es eine Funktion, die mir sagt wieviele Werte das Feld enthält? Oder eine Art append Funktion, die mir die ganze Arbeit abnimmt?


    Vielen Dank im Voraus


    Worker79

    • Offizieller Beitrag

    Werte in eine Liste einlesen, neuen Wert hinzufügen und in das Dokument zurückschreiben.

    Code
    dim liste() as String
    Redim liste(Ubound(doc.Feld) + 1)
    for i = 0 to ubound(doc.Feld) ' Mehrfachfeld in Liste einlesen
     liste(i) = doc.Feld(i)
    Next
    liste(Ubound(Liste)) = ''neuerWert''  ' neuen Wert der Liste hinzufügen
    
    
    doc.Feld = liste  ' Liste in Feld zurückschreiben
    doc.Save true, true, true   ' dokument speichern


    Gruß
    Dirk

    Rein logisches Denken verschafft uns keine Erkenntnis über die wirkliche Welt.
    Alle Erkenntnis der Wirklichkeit beginnt mit der Erfahrung und endet mit ihr.
    Alle Aussagen, zu denen man auf rein logischen Wegen kommt, sind, was die Realität angeht, vollkommen leer.
    Albert Einstein