---

Jeg har en asp der via en løkke henter spørgsmål og valgmuligher
fra en pool fra tabellen T_Vote
Jeg vil kun have en submit knap, men kan ikke få det til at
virker pga. lykken.

'**Henter spørgsmål
<%
Sql = "Select * from T_Vote"
Set Record = RsVote.Execute(Sql)

Do
response.write "<form action='Modtag.asp' method='post'>"
response.write "<b>" & Record("id") & ": &nbsp" &
Record("spoergsmål") & "</b><br>"

'****Henter valgmuligheder
If Record("Valg1") <> "" then
response.write "<input type='radio' value='" &
Record("Valg1") & "' name='R1'>" & Record("Valg1") & "<br>"
end if

If Record("Valg2") <> "" then
response.write "<input type='radio' value='" &
Record("Valg2") & "' name='R1'>" & Record("Valg2") & "<br>"
end if

Record.MoveNext
Loop While Not Record.EOF

response.write "<p><input type='submit' value='Gem'></p>"
response.write "</form>"

RsVote.Close
Set RsVote = Nothing
%>



Svarne bliver sent til modtag.asp hvor koden er følegende:

Sql = "Insert into T_Voteresult (Vote) values('" &
Request("R1") & "')"
RsVote.Execute(Sql)


Kan I hjælpe mig
Hilsen John

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

John Hertz skrev:

> Do
> response.write "<form action='Modtag.asp' method='post'>"

Du skriver en ny form for hver post.


> Record.MoveNext
> Loop While Not Record.EOF
>
> response.write "<p><input type='submit' value='Gem'></p>"
> response.write "</form>"

- mens du kun afslutter én form (udenfor løkken).

Hvis du kun vil have én form, skal du flytte din form-start-kode op før
løkken.

--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

Hej
Det har jeg prøvet, men så kan jeg kun afkrydse valgmulighederne i
forbindelse med et sæt radioknapper og ikke i den næste sæt eller omvendt.

Jeg har prøvet følgende:

<%
Sql = "Select * from T_Vote"
Set Record = RsVote.Execute(Sql)

response.write "<form action='Modtag.asp' method='post'>"

Do
response.write "<b>" & Record("id") & ": &nbsp" & Record("spoergsmål")
& "</b><br>"

If Record("Valg1") <> "" then
response.write "<input type='radio' value='" & Record("Valg1") &
"' name='R1'>" & Record("Valg1") & "<br>"
end if

If Record("Valg2") <> "" then
response.write "<input type='radio' value='" & Record("Valg2") &
"' name='R1'>" & Record("Valg2") & "<br>"
end if


Record.MoveNext
Loop While Not Record.EOF


response.write "<p><input type='submit' value='Gem'></p>"
response.write "</form>"

RsVote.Close
Set RsVote = Nothing
%>

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

John Hertz skrev:

> Det har jeg prøvet, men så kan jeg kun afkrydse valgmulighederne i
> forbindelse med et sæt radioknapper og ikke i den næste sæt eller omvendt.

Det er fordi du bruger samme navn til alle knapperne - så kommer de i
samme gruppe.


Prøv at bruge name="R<%= Record("id") %>" i stedet - altså læg
id-nummeret ind i name-parameteren.

Fx:
response.write "<input type='radio' value='" & Record("Valg1") &
"' name='R" & Record("id") & "'>" & Record("Valg1") & "<br>"

--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

Tak for det
Det virker fint, men nu medsender den kun svaret på det føste spørgsmål.
Hvordan løses det? - med en løkke?


Hilsen John

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

John Hertz skrev:

> Det virker fint, men nu medsender den kun svaret på det føste
> spørgsmål. Hvordan løses det? - med en løkke?

Er du sikker på at problemet ikke bare er at du kun læser værdien
fra første spørgsmål?

Hvis du i din form genererer radioknapper med navnene R1, R2, R3,
...., Rn, skal du tilsvarende have en Request.Form("R1"),
Request.Form("R2) etc.

Evt. kan du lave et fuldt formrequest (Request.Form()) og så selv
trævle det igennem for værdier.

NB: Læs gerne min signatur.
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

Undskyld, jeg var ikke præcis nok før.

****************
Den asp der henter spørgsmålene ser ud som følger
(ps. beskrivelse = spørgsmål)
*******************

Sql = "Select * from T_Vote"
Set Record = RsVote.Execute(Sql)

response.write "<form action='Modtag.asp' method='post'>"

Do

response.write "<b>" & Record("id") & ": &nbsp" &
Record("beskrivelse") & "</b><br>"

If Record("Valg1") <> "" then
response.write "<input type='radio' value='" &
Record("Valg1") & "' name='R" & Record("id") & "'>" &
Record("Valg1") & "<br>"
end if

If Record("Valg2") <> "" then
response.write "<input type='radio' value='" &
Record("Valg2") & "' name='R" & Record("id") & "'>" &
Record("Valg2") & "<br>"
end if


Record.MoveNext
Loop While Not Record.EOF

response.write "<p><input type='submit' value='Gem'></p>"
response.write "</form>"


*********************
Det modtagende asp ser ud som følger:


If Request("R1") <> "" then
Sql = "Insert into T_Voteresult (Vote) values('" & Request("R1")
& "')"
RsVote.Execute(Sql)
else
Response.Write "<h1><center>Tak for dit svar</center></h1>"
end if

******************
Hvordan får jeg den modtagende asp til at registrere resultaterne
fra mere end det første spørgsmål på en smart måde. Jeg har prøvet
forskellige løkke modeler uden held.


Mvh John


--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials