Quiz

Ännu en tråd angående quiz
Finns det någon möjlighet att göra det så här;

<%
dim resultat,fraga1,fraga2,fraga3
fraga1 = request.form("fraga1")
fraga2 = request.form("fraga2")
fraga3 = request.form("fraga3")
resultat = 0

if not fraga1 = a then
resultat = (cint(resultat) + cint(10))
else
resultat = resultat
end if

if not fraga2 = c then
resultat = (cint(resultat) + cint(10))
else
resultat = resultat 
end if

if not fraga3 = b then
resultat = (cint(resultat) + cint(10))
else
resultat = resultat 
end if

Response.write("resultat:" & resultat)
%>

Den ska alltså addera 10 till resultat-variablen om man valt rätt checkbox på sidan med formuläret och stanna kvar på samma resultat som innan om man svarat fel.
När jag testar så får man 30p (dvs maxpoäng) oavsett hur man svarar