Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: klaussal am 10.03.04 - 14:21:35

Titel: feldnamen zusammensetzen
Beitrag von: klaussal am 10.03.04 - 14:21:35

hi zusammen,

folgendes problem:

maske mit den feldern monat_01 monat_02 .... bis monat_12

bei einer plausi-prüfung möchte ich jetzt nicht 12 if-bedingungen basteln, sonder mit einer for-schleife arbeiten.

For i = 0 To 11
If Trim(doc.monat_01(0))<---- ????? = "" Then
  Msgbox "Feld " + monat(i) + "  ist leer" & Chr(13) , 16, "Achtung"
  Exit Sub
  End If
Next

frage: kann ich den feldnamen irgendwie dynamisch zusammensetzen ?

vilen dank für tipps und hinweise !

Titel: Re:feldnamen zusammensetzen
Beitrag von: koehlerbv am 10.03.04 - 14:25:55

NotesDocument.GetItemValue erwartet einen String für den Feldnamen. Hier kannst Du ansetzen.

Bernhard

Titel: Re:feldnamen zusammensetzen
Beitrag von: Glombi am 10.03.04 - 14:26:43

So:

dim feldnamesuffix as string
For i = 1 To 12
feldnamesuffix = Right$("0" & cstr(i),2)
If Trim(doc.GetItemValue("monat_" & feldnamesuffix)(0)) = "" Then
  Msgbox "Feld " + monat(i) + "  ist leer" & Chr(13) , 16, "Achtung"
  Exit Sub
  End If
Next

Andreas

Titel: Re:feldnamen zusammensetzen
Beitrag von: klaussal am 10.03.04 - 14:44:40

@andreas,

suuuuuper, DANKE !