Hej

Jag håller på och bygga ett formulär med cirka 10 frågor och har sätt att många enkäter på nätet är byggda på så sätt att man svarar på en fråga i taget och sidan klickar på vidare för att komma till nästa fråga. Är det någon som vet hur man kodar ett sådan formulär? Jag har inga problem att bygga en sida med frågor och stoppa ner svaren i en databas.

Jag har tidigare byggt ett liknande, och jag skall försöka att visa dig grundprincipen.
Det mesta ligger i subbar!!!
<code>
<%
Sub Starta
'här lägger du in vad som först skall vissas, lägg det gärna i en tabel för bättre formatering t ex
Response.Write "<CENTER><table border=""3"" bgcolor=BEIGE cellspacing=0 cellpading=0 width=610
bordercolordark=#9370DB bordercolorlight=#E6E6FA>"&_
"<TR>"&_
'osv
Response.Write"<form method=POST action=""Default.asp"" id=fraga name=fraga>"&_
'måste vara med
"<INPUT type=hidden name=NextPage value=2><BR>"&_
"<p><small><font face=""Verdana""><INPUT type=""submit"" value=""Next ->"" id=NextButton
name=NextButton></font></small></p>"&_
'osv
End Sub

Sub Applikation
'gör första frågan lägg till kryssrutor el dyl
"<INPUT type=hidden name=NextPage value=3><BR>"&_
"<p><small><font face=""Verdana""><input type=""submit"" value=""Nästa-->"" id=NextButton
name=NextButton></font></small></p>"&_
End Sub
' Fortsätt med att lägga till alla subbarna för varje sub måste du lägga till
'<INPUT type=hidden name=NextPage value=4><BR>"& och öka value med +1

Sub StoreUsersDataInSessionObject
Dim FormKey

For Each FormKey in Request.Form
Session(FormKey) = Request.Form.Item (FormKey)
NEXT
End Sub

Dim CurrentPage
If Request.Form.Item("NextPage")="" Then
CurrentPage = 1
Else
CurrentPage = Request.Form.Item("NextPage")
End If

Call StoreUsersDataInSessionObject

Select Case CurrentPage

Case 1 :Call Starta

Case 2 : 'osv
End Select %>
</code>

Någonting så här borde vara en bra fingervisning tror jag.