Aktualisierung von Autorenfeldern

In einem Dokument wird ein Autorenfeld per LScript mit einem neuen Array beschrieben und das Dokument dann gespeichert.
Trotzdem wird in den Dokumenteigenschaften der Inhalt dieses Feldes nicht als Feld mit mehreren Werten, sondern mit einem Text (der aus der Aneinanderreihung der Einzelwerte besteht) angezeigt.
Erst wenn ich das Dokument einmal im Editmode öffne und speichere, dann werden die Werte auch als Textliste gespeichert.

Was kann man dagegen tun?

Ich versuch' das mal zusammenzustellen...

sAutorgr = uidoc.FieldGetText("Beschreibung")

NamenListe = ArrayBilden(sAutorgr,",") 's.u.

Redim Preserve BenutzerlisteAutor(Ubound(NamenListe))

For i = Lbound(Namenliste) To Ubound(NamenListe)
Set BenutzerName = New NotesName(NamenListe(i))
sBenutzerName = BenutzerName.Canonical
BenutzerListeAutor(i) = sBenutzerName
Next i

doc.AllgAutor = BenutzerListeAutor
Call doc.Save(False,False)

Function ArrayBilden(Text As String, Teilzeichen As String) As Variant
Dim Zeichenlaenge As Integer
Dim k As Integer
Dim i As Integer
Dim Zeichenfolge As String
Dim Zeichen As String
Dim Array() As String

Zeichenlaenge = Len(Text)

k=0
For i = 1 To Zeichenlaenge + 1
Zeichen = Mid(Text,i,1) '1 Zeichen prüfen
If Zeichen = Teilzeichen Or i = Zeichenlaenge + 1 Then
Redim Preserve Array(k)
Array(k) = Trim(Zeichenfolge)
k=k+1
Zeichenfolge = ""
Else
Zeichenfolge = Zeichenfolge + Zeichen
End If
Next
ArrayBilden = Array
End Function

OK!

Da das Script nicht von mir ist, habe ich es mir jetzt doch mal genauer angesehen.
1) Das Array ist immernoch eine aneinandergepappte Liste.
2) Das Feld direkt als Array auszulesen macht Sinn. Muß mal probieren, ob das auch bei einem neuen Dokument geht. Allerdings müßte es, weil das Ganze im Postsave-Event angesiedelt ist...