Resultat skal gemmes i session?

session.contents("svar1") = request("answer")

gemmer svaret hele sessionen igennem

Ja okay. Som sagt så er jeg nybegynder.
Forklar lige lidt mere detaljeret. Det ville være rart med et eksempel?

så vis mig din kode til siden, det er nemmest at bygge videre på det

Du kan lave en struktur i en streng, som f.eks. indeholder skiftevis id på spørgsmål og svar på det spørgsmål. Noget i stil med dette:

"10|3|4|2|7|2|2|3|5|1"

Når et nyt svar ruller ind fra en form tilføjer du bare ID hhv. svar-værdien i enden af den streng således:

Session("brugersvar") = Session("brugersvar") + Request.Form("ID") + "|" + Request.Form("Svar")

Til slut kan du så splitte strengen op vha. funktionen Split(Session("brugersvar"), "|") - den resulterer i et array - og derefter gennemløbe dette array og slå på i databasen for hvert enkelt svar. Noget i stil med:

Dim SvarArray
Dim Svar
Dim SvarIndex

SvarArray = Split(Session("brugersvar"), "|")

SvarIndex = 0
Do While SvarIdx < UBound(SvarArray)
  Spoergsmaal = SvarArray(SvarIndex)
  Svar = SvarArray(SvarIndex + 1)
 
  'TO DO: Slå op i databasen og sammenlign svar på spørgsmål med korrekt svar

  'TO DO: Evt. tilbagemelding til brugeren om resultatet af besvarelsen

  ' Spring 2 frem i listen
  SvarIndex = SvarIndex + 2
Loop

Håber det hjælper, ellers må du lige rette mig ind på sporet igen :)

Sorry, havde ikke lige fået opdateret mine variabelnavne. Det skal se således ud:

Dim SvarArray
Dim Svar
Dim SvarIndex

SvarArray = Split(Session("brugersvar"), "|")

SvarIndex = 0
Do While SvarIndex < UBound(SvarArray)
  Spoergsmaal = SvarArray(SvarIndex)
  Svar = SvarArray(SvarIndex + 1)
 
  'TO DO: Slå op i databasen og sammenlign svar på spørgsmål med korrekt svar

  'TO DO: Evt. tilbagemelding til brugeren om resultatet af besvarelsen

  ' Spring 2 frem i listen
  SvarIndex = SvarIndex + 2
Loop

Softspot -> Jeg kan godt se din ide med den streng struktur.

I DB ligger

Rs(0)  = ID
Rs(1)  = Spg
Rs(2)  = svar a
Rs(3)  = svar b
Rs(4)  = svar c
Rs(5)  = svar d
Rs(6)  = svar

Og i formen er der:

<%
Response.write rs(1) & "<br><br>"
Response.write "<input type=""radio"" name=""V1"" value=""a"" checked> " & rs(2) & "<br>" & "<br>"
Response.write "<input type=""radio"" name=""V1"" value=""b"">" & rs(3) & "<br>" & "<br>"
Response.write "<input type=""radio"" name=""V1"" value=""c"">" & rs(4) & "<br>" & "<br>"
Response.write "<input type=""radio"" name=""V1"" value=""d"">" & rs(5) & "<br>" & "<br>"
%>

Jeg vil gerne selv forstå det..så hvis man nu har lavet sit vlag og har trykket svar...skal jeg så lave en ny side der f.eks. hedder nextquestion.asp som formen går til? Og denne siden laver så en session hvor den gemmer request.form?

Eller er jeg helt væk? Hav venligst lidt tålmodighed...er NY til ASP!

Og hvordan ville dette:

Session("brugersvar") = Session("brugersvar") + Request.Form("ID") + "|" + Request.Form("Svar")

Se ud, hvis jeg gik ud fra ovenstående?

i formen laver du en
<input type="hidden" name="indsend" value="ok">


<% if request("indsend")="ok" then
session.contents(rs(spg))=request("V1")
end if
%>
rs(spg) ændrer sig jo så i takt med spgm

Prøver lige at se på det. Giv mig lige 5 min!

Hvordan laver jeg så en Response.Write "udskrive den session.contents jeg lige har lavet for at se hvad den gemmer?

Hvis jeg tager udgangspunkt i mit eget forslag, så skal du tilføje en (skjult) kontrol som indeholder ID for det aktuelle spørgsmål, dvs. noget i stil med:

<%
Response.write rs(1) & "<br><br>"
Response.write "<input type=""hidden"" name=""ID"" value=""" & rs(0) & """>"
Response.write "<input type=""radio"" name=""V1"" value=""a"" checked> " & rs(2) & "<br>" & "<br>"
Response.write "<input type=""radio"" name=""V1"" value=""b"">" & rs(3) & "<br>" & "<br>"
Response.write "<input type=""radio"" name=""V1"" value=""c"">" & rs(4) & "<br>" & "<br>"
Response.write "<input type=""radio"" name=""V1"" value=""d"">" & rs(5) & "<br>" & "<br>"
%>

...og så kan jeg se at der har sneget sig en fejl ind i flg. sætning:

Session("brugersvar") = Session("brugersvar") + Request.Form("ID") + "|" + Request.Form("Svar")

Det skal naturligvis være.

Session("brugersvar") = Session("brugersvar") + "|" + Request.Form("ID") + "|" + Request.Form("Svar")

ellers bliver de nye ID ikke adskilt fra det tidligere svar :| - my bad...

response.write session.contents("spgm som det lyder i db'en")

Response.Write Session.Contents("brugersvar")

Nu må jeg vist hellere tage mig sammen! :)

Det skal naturligvis se således ud med dine kontroller på formularen:

Session("brugersvar") = Session("brugersvar") + "|" + Request.Form("ID") + "|" + Request.Form("V1")

Softspot -> Jeg forstår ikke hvor du får Request.Form("Svar")
Jeg har ingen form der hedder svar? Mener du ikke + rs("0") ???

Hehe. Der fik du den lihe rettet!
Prøv at se: http://www.2mwebdesign.dk/atpl/random2.asp

Den udskriver da ikke værdierne som er blevet indtastet når jeg laver en <%Response.Write Session.Contents("brugersvar")%>

???

ARRGHH!! DOHHH!!! det virker..sorry! Men når man loader siden med første spørgsmål viser den jo ingen værdi? Og det spørgsmål kan jo ikke komme to gange? Forstår du mig? Så vil man jo hele tiden have et svar forkert?

Jeps (tror jeg nok :))...

Du skal ikke lægge noget i Session("brugersvar") inden du har postet formularen for første gang. Det betyder at du skal checke om svarknap er trykket inden du lægger noget i Session("brugersvar"). Det kan du gøre som vist herunder:

If Request.Form("svarknap") = "svar" Then

  If Session("brugersvar") <> "" Then
    Session("brugersvar") = Session("brugersvar") + "|" + Request.Form("ID") + "|" + Request.Form("V1")
  Else
    Session("brugersvar") = Request.Form("ID") + "|" + Request.Form("V1")
  End If

End If

Jeg har også lige lagt et check på om der er noget indhold i Session("brugersvar") for at afgøre om der skal en pipe foran det første ID. Det har betydning for "alignment" af ID og svar...