ciao
dopo avere estratto i dati da una query ho dei checkbox
vorrei far selezionare un solo di questi e poi passare i dati ad una pagina successiva .
non so se questo è il forum giusto .
posto la pagina
codice:
<script>
function controlla(){
.... 
if(c1 == false){
alert('Devi selezionare una opzione!');
}
else if(c2 == FALSE){
alert('Non puoi checkkare più di una opzione!');
}else{
f.action="Formprecorso.asp";
f.submit();
}
}
</script>
<%
cat2 = request.form("categ")
uoat = request.form("uoat")

'Stringa per la connessione
'cString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("./area_protetta/mdb/ife.mdb")
cString=Application("CNN")
'set connession to database 
Set objConn=Server.CreateObject("ADODB.Connection")

'open connession to database
objConn.Open cstring

'xxxxxxxx presentazione dati xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Set rs = Server.CreateObject("ADODB.Recordset")

nometabella="corsi"  ' inserisci qui il nome della tabella da vedere

sql = "SELECT  * from "&nometabella&" where id_anz="&cat2&" AND id_ruo="&uoat&" AND vis= -1"
'response.write sql:response.end
'apro il rs
rs.Open sql, objConn, 3, 3 'cursore dinamico

%>
<form name="form" method="post" action="Formprecorso.asp">
<%
	
	if rs.eof then
%>
<p align="center"><font color="#FF0000" face="Verdana" size="6">Nessun Dato disponibile.</font></p>
<%
	else
	
%>

  <table align="center" width="400" border="1" bordercolor="#ff0000">
    <tr> 
      <td colspan="5" align="center" bgcolor="#FF0000"><font color="#0000FF" size="3" face="Verdana">SELEZIONA 
        CORSO </font></td>
    </tr>
    <tr> 
      <td width="40%" align="center"><font face="Verdana" size="3" color="#0000FF">Corso</font></td>
      <td width="50%" align="center"><font face="Verdana" size="3" color="#0000FF">Ruolo</font></td>
      <td width="10%" align="CENTER"><font face="Verdana" size="3" color="#0000FF">Anzianita</font></td>
	   <td width="10%" align="CENTER"><font face="Verdana" size="3" color="#0000FF">Edizione</font></td>
      <td width="10%" align="CENTER"><font color="#0000FF" size="3" face="Verdana">Sel</font></td>
    </tr>
    <%
	while not rs.EOF
	%>
    <tr> 
      <td align="center"><font face="Verdana" size="3" color="#0000FF"><%=Trim(rs.fields("corso"))%></font></td>
      <td align="center"><font face="Verdana" size="3" color="#0000FF"><%=rs.fields("ruolo")%></font></td>
      <td align="center"><font face="Verdana" size="3" color="#0000FF"><%=rs.fields("anzianita")%></font></td>
	  <td align="center">
        <font face="Verdana, Arial, Helvetica, sans-serif"><font face="Arial, Helvetica, sans-serif">
			<select name="edizione">
          <option value=""selected>Seleziona</option>
          <%
Set rs1 = Server.CreateObject("ADODB.Recordset")

sql2 = "select * from edizioni where corso = '"& rs.fields("corso") &"' and vis = -1" 

rs1.open sql2, objconn
if not rs1.eof then 
do until rs1.eof 
%>
          <option	value="<%=rs1("edizioni")%>"><%= rs1("edizioni")%></option>
          <%
rs1.movenext 
loop
end if 

rs1.close 
%>
        </select></font></font>
        </td>
      <td align="center"><font face="Verdana" size="3" color="#0000FF"> 
        <input type="checkbox" name="check<%=rs("id")%>">
        </font></td>
    </tr>
    <%
	rs.MoveNext
	wend
	%>
    <tr> 
      <td colspan="5" align="center" bgcolor="#FF0000">[b]<font face="Verdana" size="3" color="#0000FF"> 
        <input type="submit" name="btn" value="Procedi" onClick=controlla();>