Hvorfor ikke blot lade systemet generere dit array? Jeg mener at reDim er ret dyr at bruge.
Dim BookingListe, OversigtNr X=stMax_bookninger
BookingListe = "False" For i = 1 to st_maxbookninger BookingListe = BookingListe & ",False" Next OversigtNr = Split(BookingListe,",")
OversigtNr er nu dit array, bemærk at første element er OversigtNr(0) (lig LBOUND(OversigtNr) og sidste element er OversigtNr(X-1) = UBOUND(OversigtNr). Skal arrayet først starte i 1 indleder man blot med at sætte Booklingliste = ",False" for løkken.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
