Ver Mensaje Individual
  #1 (permalink)  
Antiguo 10/04/2006, 08:44
mparadas
Usuario no validado
 
Fecha de Ingreso: octubre-2005
Mensajes: 11
Antigüedad: 19 años, 6 meses
Puntos: 0
Pregunta problemas con insert

buenas logro insertar los datos de una tabla dinamica pero en lo que llenos los campos que tengo que cargar me toma los del primer dato y me los repite por todas los registros y obvia los demas este es el codigo que estoy utilizando

<%
w_total_reg = 0
do while not Rs.eof
%>
<tr bgcolor="#CCCCCC">
<td> <div align="center"><font size="-3" face="verdana">&nbsp;
<input name="codigo_actividad" type="text" id="codigo_actividad" value="<%= RS("codigo_actividad") %>" size="5" readonly="true">
</font></div></td>
<td><font size="1">&nbsp;<%= RS ("actividad_actividad") %></font></td>
<td> <div align="center"> <font size="1">
<input name="cantidad_gestion" type="text" id="cantidad_gestion" value="" size="10">
</font></div></td>
<td> <div align="center">
<input name="monto_gestion" type="text" id="monto_gestion" value="" size="15">
</div></td>
<%
w_total_reg = w_total_reg + 1
Rs.movenext
loop
' Rs.close
' con.close
rs.movefirst
end if
%>
</tr>
</table>
<p align="center">
<input type="submit" name="Submit" value="Guardar">
<%
Select Case request("submit")
Case "Guardar"
cantidad_gestion= request ("cantidad_gestion")
monto_gestion= request ("monto_gestion")
fecha=Now()
dia = Day(fecha)
mes = Month(fecha)
anno = Year(fecha)
hora = Hour(fecha)
min = Minute(fecha)
seg = Second(fecha)
fecha =anno & Right(Cstr(mes + 100),2) & Right(Cstr(dia + 100),2)& Right(Cstr(hora + 100),2) & Right(Cstr(min + 100),2) & Right(Cstr(seg + 100),2)

'codigo=request("codigo_actividad")
'do while rs.eof
for i=1 to w_total_reg
oConn.Execute "INSERT INTO sistemges_gestion (codigo_actividad_gestion, cantidad_gestion, monto_gestion, codigo_area_gestion, fecha_gestion) VALUES ("&rs("codigo_actividad")&",'"&cantidad_gestion&"' , '"&monto_gestion&"', '"&codigo_area&"', '"&fecha&"')"
rs.movenext
next