Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: MadMetzger am 10.04.03 - 14:29:25

Titel: Unique & Elements in Script
Beitrag von: MadMetzger am 10.04.03 - 14:29:25

Gibt es Pendants zu den beiden in Script?

Wenn nicht, was gibt es für Alternativen?

Titel: Re:Unique & Elements in Script
Beitrag von: Rob Green am 10.04.03 - 14:48:21

das zu Unique:
http://www-10.lotus.com/ldd/46dom.nsf/55c38d716d632d9b8525689b005ba1c0/3f2a2471f0ac8a5785256cda0068f2e3?OpenDocument

und das zu Elements:
http://www-10.lotus.com/ldd/46dom.nsf/55c38d716d632d9b8525689b005ba1c0/2ed5bbea6394e39185256cf40052b234?OpenDocument

und das aus Martin Scotts Code Gemenge:
Function ContainerNumVals(containerVar As Variant) As Long
   
    ' Counts the number of elements in the container passed
    ' to it as containerVar
   
    On Error Goto ErrorHandler
    ContainerNumVals = 0
    If IsEmpty(containerVar) Then Goto TheEnd
    Forall X In containerVar
         ContainerNumVals = ContainerNumVals + 1
    End Forall
   
TheEnd:
    Exit Function
   
ErrorHandler:
    ContainerNumVals = -1
    Resume TheEnd
   
End Function

Titel: Re:Unique & Elements in Script
Beitrag von: MadMetzger am 10.04.03 - 16:07:54

Klappt!

Danke!