Tanken var at koden skulle sættes sammen til flg.:
'------------------------------------------------ ' Gennemløb alle felter på formularen '------------------------------------------------ For Each field in Request.Form '------------------------------------------------ ' Hent indholdet af det aktuelle felt '------------------------------------------------ Tekst = Request.Form(field)
'------------------------------------------------ ' Opdel teksten fra feltet ved mellemrum, ' så hvert enkelt ord fylder en plads i et array '------------------------------------------------ ord = Split(Tekst, " ")
'------------------------------------------------ ' Gennemløb hvert ord for at se om det er længere end 25 tegn. ' Ubound finder antallet af ord (minus 1) i listen. '------------------------------------------------ for idx = 0 to ubound(ord) '------------------------------------------------ ' Hvis ordet er længere end 25 tegn, ' så skriv en besked i det svar der ' sendes til browseren fra serveren '------------------------------------------------ if len(ord(idx)) > 25 then Response.Write "Flg. ord er længere end 25 tegn: " & ord(idx) end if next Next
Som du kan se, så er idx en tæller der benyttes til at gennemløbe hvert enkelt ord i hvert felt i formularen.
Ubound finder den øvre grænse i en liste (den tekniske term er "array" hvis du vil søge efter det på nettet). Den kan bruges når man ikke på forhånd ved hvor stor en liste er, men f.eks. gerne vil gennemløbe alle elementer i listen.
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.