Funderingar kring quiz

ASP

2 svar · 225 visningar · startad av medialabs 30 jan. 2005

medialabsMedlem sedan mars 20023 686 inlägg

Frågan30 jan. 2005 21:08#1

Tjenare!

Tänkte göra en liten quiz i asp. Hade tänkt mig att använda ett par radiobuttons, 3 st till varje fråga.

Nu till mina funderingar. Hur "rättar" jag frågorna som användaren har svarat på?

hur markerar jag felaktiga svar och rätta?

Hur räknar jag ihop antalet rätta svar?

Hade tänkt att skriva ut en liten infotext under varje fråga efter att personen har rättat sina svar.

Är det så smart att använda sig av följande kod till varje fråga.

if request.querystring("quiz") = do then
response.write "Infotexten..."
end if

tänker inte spara ned något i databas eller så.

medialabsMedlem sedan mars 20023 686 inlägg

30 jan. 2005 21:53#2

Hoho, lyckade göra så att det kommer radiobuttons istället nu. Men nu är min fråga, hur gör jag så att när användaren klickar på en radioknapp så ska han komma till nästa fråga. Hur gör jag det..


Min med radioknappar!

	<%
	For I = LBound(aAnswers) to UBound(aAnswers)

	Response.Write " <INPUT TYPE=""radio"" name=""Quiz"" value=""quiz.asp?qid=" & iQuestionNumber & "&sa=" & I & """>" 
	Response.Write aAnswers(I) & "<br>" & vbCrLf
	
	Next 'I
	%>

Den gamla med textlänkar.

<STRONG>Var vänlig och välj ett av alternativen:</STRONG>

		<OL TYPE="A">
		<%
		For I = LBound(aAnswers) to UBound(aAnswers)
			Response.Write "<LI><A HREF=""" & Request.ServerVariables("URL")
			Response.Write "?qid=" & iQuestionNumber & "&sa=" & I & """>"
			Response.Write aAnswers(I) & "</A></LI>" & vbCrLf
		Next 'I
		%>
		</OL>

medialabsMedlem sedan mars 20023 686 inlägg

30 jan. 2005 23:03#3

Efter mycket sökande här och på google så lyckades jag få ordning på det! Är riktigt stolt över mig själv nu.

Vilket jävla pilljobb med att få ordning på alla "" -tecken.

Så här ser den ut nu.

	<%
	For I = LBound(aAnswers) to UBound(aAnswers)

	'Response.Write "<A HREF=""" & Request.ServerVariables("URL")
	Response.Write " <INPUT TYPE=""radio"" name=""Quiz"" value=""quiz2.asp?qid=" & iQuestionNumber & "&sa=" & I & """ onclick=window.location.href='quiz2.asp?qid=" & iQuestionNumber & "&sa=" & I & "'>"  & "&nbsp;"
	Response.Write aAnswers(I) & "<br>" & vbCrLf
	
	Next 'I
	%>