Domino 9 und frühere Versionen > Entwicklung

Eintrag aus Leserfeld löschen

(1/1)

dirk_2909:
@All

Ich will aus einem Leserfeld einen Eintrag löschen.
Ich habe dafür einen Agenten geschrieben. Hier ein Teil des Codes:

i=0
merk=-1
      '###################################
      Forall s In itemLeser.Values
         'Hier Feld ZGLeser nach der Person durchsuchen
         If s = strCNUser Then
            merk=i
         End If
         i=i+1
      End Forall
      If merk >= 0 Then
         'und Eintrag entfernen
         
         itemLeser.Values(merk)=""
      End If
......

Ich kann den Agenten aber nicht speichern. Er gibt mir immer hier einen Fehler aus => itemLeser.Values(merk)=""

Was habe ich falsch gemacht? Wie muß es richtig heißen?
Oder geht es einfacher??      

Axel:
Hi,

versuchs mal so:

Dim arrLeser() As String


i=0
      '###################################
      Forall s In itemLeser.Values
         'Hier Feld ZGLeser nach der Person durchsuchen
         If s <> strCNUser Then
            Redim Preserve arrLeser(i)
            arrLeser(i) = s
         End If
         i=i+1
      End Forall
     
      itemLeser.Values = arrLeser


Axel

dirk_2909:
@Axel

Super hat sofort gefunzt nachdem ich den Zähler in der Bedingung
hochgezählt habe  ;D ;D ;D

Navigation

[0] Themen-Index