Mehrere hierarchischen Namen in einer var in common name per LotusScript umsetz

[sja]

Hallo @All,
In meiner Script habe eine var
Dim an() As String
Als Ergebnis enthält diese var mehrere hierarchischen Namen.
Ich brauche diese Namen als common name.
In der Notes-Hilfe habe ich die Beispiele nur für var, die nur einen Name enthält,  gefunden und weiß nicht weiter.
Kann jemand mir helfen?
Vielen Dank im Voraus
Liebe Grüße
Sofia

[Klafu]

Hallo Sofia,

wo kommen denn die Namen her? wäre es nicht besser die in einem Array zu haben ?
Dann könntest du mit einer Schleife an die Common Names ran kommen

Chris

[Axel]

Nur mal so als Denkanstoß:

Du musst mit UBound(an) die maximale Anzahl der Elemente die das Array enthält ermitteln und dann mit einer For ... Next - Schleife die Einträge durchlaufen und den Common - Name ermitteln.

Als Alternative kannst du auch mit ForAll arbeiten.

Axel
 

[sja]

Vielen Dank für die schnelle Hilfe!

Die var an() wird bei der Analyse verschiedenen Namens-Feldern in einem Dokument ermittelt und zusammengestellt.
Als Ergebnis dieser Analyse habe ich eine array-variable an() mit hierarchischen Namen und eine variable count, die Anzahl der Namen in der an() enthält. In zwischen habe ich ein sehr guten Beitrag betreffen diese Thema in atnotes gefunden und probiere entsprechen bei mir. Ergebnisse werde ich mitteilen
http://atnotes.de/index.php/topic,51928.0.html

Noch mal vielen Dank
Sofia

[koehlerbv]

Set namPerson = New NotesName (an (intLoop))
an (intLoop) = namPerson.Common

HTH,
Bernhard

[dnotes]

Bernhard, mit dem vorherigen Link steht doch die Lösung schon drin... von Dir so gar vorgeschlagen.

Dim an() As String
an() füllen und dann

Set doc = uidoc.Document
doc.temp = an
Ergebnis = Evaluate({@name([cn];temp)},doc)

[koehlerbv]

Wollt ja nur eine Alternative "pure LotusScript" anbieten, sonst wird es doch langweilig 

Bernhard

[sja]

Vilen Dank an Bernhard, @dnotes und allen, die bei diesem Beitrag teilgenommen haben!

Für Evaluate habe ich mich entschieden, weil in meinem Fall wirklich die Performance sehr wichtig ist und natürlich will ich auch nicht kontraproduktiv arbeiten :-) und wenn Bernhard über Evaluate so sagte, dann vertraue ich ihm vollkommen!
Mit der Evaluate-Lösung funktionierte bei mir alles perfekt und es war sehr produktiv zu programmieren :-)

Noch mal herzlichen Dank. ich liebe atNotes, es wurde mir hier schon viel Mal sehr geholfen!

Sofia