Hvordan laver man en Score?

Nu er det jo ikke til at se hvordan du har dem liggende.
Men hvis du kan lave dem som en kommasepereret streng sådan her så er det nok det nemmeste:
----
brugerSvar = 7a,1a,9a,14a,8a,10a,2a,4a,5a,11a,12a,13a,6a
databaseSvar = 1a,2b,3c,4d,5d,6d,7d,8d,9d,10d,11d,12d,13d,14
arrBruger = Split(brugerSvar,",")
for i=0 to ubound(arrBruger)
  if instr(arrBruger(i)&",",dabaseSvar) <> 0 then
    match = match + 1
  end if
next
response.write "Du har "&match&" rigtige ud af "&ubound(split(databaseSvar)&" mulige"

hov der kom den til at submitte før tid....så udskriften nederst skulle være
response.write "Du har "&match&" rigtige ud af "&ubound(split(databaseSvar,","))+1&" mulige"

og så manglede der også lige et komma, suk...sådan her og så er den vist på plads :o)
----
brugerSvar = 7a,1a,9a,14a,8a,10a,2a,4a,5a,11a,12a,13a,6a
databaseSvar = 1a,2b,3c,4d,5d,6d,7d,8d,9d,10d,11d,12d,13d,14
arrBruger = Split(brugerSvar,",")
for i=0 to ubound(arrBruger)
  if instr(arrBruger(i)&",",dabaseSvar) <> 0 then
    match = match + 1
  end if
next
brugerSvar = 7a,1a,9a,14a,8a,10a,2a,4a,5a,11a,12a,13a,6a
databaseSvar = 1a,2b,3c,4d,5d,6d,7d,8d,9d,10d,11d,12d,13d,14
arrBruger = Split(brugerSvar,",")
for i=0 to ubound(arrBruger)
  if instr(arrBruger(i)&",",dabaseSvar&",") <> 0 then
    match = match + 1
  end if
next
response.write "Du har "&match&" rigtige ud af "&ubound(split(databaseSvar)&" mulige"

what...crap.. nå og nu kom det dobbelt...det er sku for tidligt for ...godnat igen ;o)
---
brugerSvar = 7a,1a,9a,14a,8a,10a,2a,4a,5a,11a,12a,13a,6a
databaseSvar = 1a,2b,3c,4d,5d,6d,7d,8d,9d,10d,11d,12d,13d,14
arrBruger = Split(brugerSvar,",")
for i=0 to ubound(arrBruger)
  if instr(arrBruger(i)&",",dabaseSvar&",") <> 0 then
    match = match + 1
  end if
next
response.write "Du har "&match&" rigtige ud af "&ubound(split(databaseSvar,","))+1&" mulige"