da una select estraggo un serie di valori e insieme a degli altri valori inseriti in un campo di testo devo inseririli su un db .

- estraggo un recordset dalla prima select e lo metto all'interno di una form
-faccio inserire per ogni record dei dati aggiuntivi e poi faccio il post ad un file che dovrebbe fare la insert .

ma non riesco a far inserire i dati del recordset estratto mi dice troppi dati ...capisco quale è l'errore ma non so come fare ..



codice:
codice del form 
cString=Application("CMM")
Set objConn=Server.CreateObject("ADODB.Connection")
objConn.Open cstring

%>
<form name="form" method="post" action="ins_exe.asp">
  <% 

set rs = Server.CreateObject("ADODB.Recordset") 
Set RsT = objconn.OpenSchema(20)
NomeTabella = rsT("TABLE_NAME")
rs.Open "SELECT [CENTRO DI COSTO],[CENTRO LAVORO], [REPARTO] FROM [" & NomeTabella & "] where [CENTRO DI COSTO] = '"&codice&"' GROUP BY [CENTRO DI COSTO],[CENTRO LAVORO], [REPARTO]" , objconn 
	
if rs.eof then 
%>
  Non ci sono dati
<%
else
%>
  centro   lavoro
   reparto 
email segr reparto
    <%
	while not rs.EOF 
	%>
        <input name="cr" type="text" value="<%=rs.Fields.Item("CENTRO DI COSTO").Value%>" >     
          <input name="ente" type="text" value="<%=rs.Fields.Item("CENTRO LAVORO").Value%>" >
                        <input type="text" name="settore" value="<%=rs.Fields.Item("REPARTO").Value%>">
          
<input name="mail_seg_settore" type="text" >
         
     
    <%
  rs.MoveNext
	wend
  %>
              <input type="submit" name="Submit" value="Invia">
   
</form>
<%
.......
%>
</body>
......

codice della pagina dove fare la insert

cr=request.form("cr")
ente=request.form("ente")
settore=request.form("settore")
mail_seg_settore=request.form("mail_seg_settore")
	
	CNN=Application("CNN")

	set conn=Server.CreateObject("ADODB.Connection")
	conn.open CNN 
	
	qryx ="INSERT INTO autorita (cr, ente, settore, mail_dir_ente, mail_seg_ente, mail_dir_settore, mail_seg_settore )"&_
	"VALUES  ('"&cr&"' , '"&ente&"', '"&settore&"', '"&mail_dir_ente&"', '"&mail_seg_ente&"', '"&mail_dir_settore&"', '"&mail_seg_settore&"') "
response.write(qryx)
'response.End()
	conn.execute(qryx)