Ciao a tutti
ho una pagina che processa dei sondaggi

La pagina prende l'id del sondaggio e cicla tutte le domande con le possibili risposte (possono essere piu' di una) facevndo vedere di volta in volta i radio per scegliere la risposta relativa alla domanda in questione

Il problema è, che io posso avere inserito una domanda, ma NON aver messo le sue relative risposte

In questo caso va ovviamente in errore in quanto trova un record vuoto

Qualcuno che mi riesce ad aiutareper risolvere questo problema?

eccovi il codice
codice:
<%@ LANGUAGE="VBSCRIPT" %>
<%
Immaginiperfila=1      
NumeroImmagini=8
Scadenza=0        'MINUTI 

Registra=Request.Form("registra")  'VARIBILE DI CONTROLLO. DON'T TOUCH!!!!

Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open Application("DBConnSysPoll")

Iip=request.servervariables("REMOTE_ADDR")
FNome=request.form("Nome")
FCognome=request.form("Cognome")
FEmail=request.form("Email")
Fserie=request.form("valore")

ultimosort = Request.form("ultimosort")
if ultimosort = "" then ultimosort=0
ultimoid = Request.form("ultimoid")
if ultimoid = "" then ultimoid=0
progressivo = Request.form("progressivo")
if progressivo = "" then progressivo=0

Session("serie")=Fserie

set rsConteggio = conn.Execute("select vedirisultati,count(*) from V_domande where idserie = " & Fserie & " Group by vedirisultati")
quante = rsConteggio(1)
rsConteggio.close
set rsConteggio = nothing

If session("serie") = 0 then%>
         <html><body> 

         <TABLE height=100% width=100%>
         <TR>
         <TD valign=center align=center>
         <Font color=red size=+3>Attualmente non c'è alcuna serie da votare</Font>
         </TD>
         </TR>
         </TABLE>

         </body></html>
<%else%>
<%
	'VISUALIZZAZIONE DOMANDE
	sql = "SELECT Domande.id, Domande.titolo, Domande.descrizione, Domande.sort, Serie.titolo as titolo_serie, Serie.vedirisultati"
	sql = sql & " FROM Domande INNER JOIN Serie ON Serie.id = Domande.idserie"
	sql = sql & " WHERE idserie = " & FSerie
	sql = sql & " AND (Domande.sort > " & ultimosort
	sql = sql & " OR (Domande.sort = " & ultimosort & " AND Domande.id > " & ultimoid & "))"
	sql = sql & " ORDER BY Domande.sort, Domande.id"
	set rsDomande = conn.Execute(sql)

	if not rsDomande.EOF then

		progressivo = progressivo + 1
		
		set rs=conn.execute("select Nomefile,Didascalia,id,sort,simbolo from scelte where idserie=" & Fserie & " AND iddomanda =" & rsDomande("id") & " ORDER BY sort,id")
         rs.movefirst
%>
<script language=javascript>
function controllo_voto(form){
	Messaggio='';
	if (form.voto.length) {
		index = -1;
		for (i = 0; i < form.voto.length; i++) {		
			if (form.voto[i].checked) {
				index = i;
				break;
			}
		}
		if (index < 0){
			Messaggio=Messaggio+"Occorre effettuare una scelta!\n";
		} 
	}
	if (Messaggio != '')  {alert(Messaggio);return false;}
}
</script>
         <html><body>

         <center><h2><%=rsDomande("titolo_serie")%></h2></center>
         <center><h3>"<%=rsDomande("titolo")%>"(<%=progressivo%>/<%=quante%>)</h3></center>
         <center>
		<FORM ACTION="scheda_do.asp" METHOD=POST NAME="form" onsubmit="return controllo_voto(this);">
		<INPUT TYPE=HIDDEN NAME="Nome" VALUE=<%=Fnome%>>
		<INPUT TYPE=HIDDEN NAME="Cognome" VALUE=<%=Fcognome%>>
		<INPUT TYPE=HIDDEN NAME="Email" VALUE=<%=Femail%>>
		<INPUT TYPE=HIDDEN NAME="valore" VALUE=<%=Fserie%>>
		<INPUT TYPE=HIDDEN NAME="ultimosort" VALUE=<%=rsDomande("sort")%>>
		<INPUT TYPE=HIDDEN NAME="ultimoid" VALUE=<%=rsDomande("id")%>>
		<INPUT TYPE=HIDDEN NAME="progressivo" VALUE=<%=progressivo%>>
		<INPUT TYPE=HIDDEN NAME="iddomanda" VALUE=<%=rsDomande("id")%>>
         <TABLE WIDTH=200>
         <%
         n=0
         set root=conn.Execute("select cartella from admin where id in (select idadmin from serie where id="&session("serie")& ")")
         cartella = "http://syspoll.multimodo.com/" & root(0)& "/" & session("serie")&"/"
         for j=0 to (numeroimmagini/Immaginiperfila)
		%><TR><%
			for i=1 to Immaginiperfila
				n=n+1
				if ((not rs.eof) and (n<=numeroimmagini)) then
					Estensione=Right(Rs("Nomefile"),3)	
					%>
					<TD ALIGN=center title="<%=rs("didascalia")%>" width="15%">
					</td><TD ALIGN=left title="<%=rs("didascalia")%>">
					
					<input type="radio" name="voto" value=<%=rs.fields("id")%>>
					<%=rs("simbolo")%>
					<%'response.write(rs.fields("Didascalia"))%>
					</TD>
				<%else
					if rs.eof then exit for
				 end if

			     rs.movenext
			 next
			 %>  
			 </TR>
			<%
          next
			rsDomande.close
			set rsDomande=nothing
			rs.close
			set rs=nothing
          %>
		<tr><td colspan="<%=2*Immaginiperfila%>" align=center><input type="submit" value="Conferma"></td></tr>
        </table>
		</FORM>
          </center>
	<%
	else 'domande finite
		rsDomande.close
		set rsDomande=nothing
		conn.Close
		set conn=nothing
		session("registrato")=true
		if vedirisultati = 0 then
			Response.Redirect("grazie.asp?id=" & session("serie"))
		else
			Response.Redirect("grazie.asp?id=" & session("serie")) 'grafico.asp
		end if
	end if
%>	

</body></html>
<%
  End if

conn.Close
set conn=nothing
%>