Ver Mensaje Individual
  #14 (permalink)  
Antiguo 15/03/2007, 12:37
Pelao
 
Fecha de Ingreso: abril-2003
Mensajes: 260
Antigüedad: 22 años
Puntos: 1
Re: Ayuda con Guardar,Modificar,Eliminar datos de una base de datos

no se hacerlo
estoy al horno

este es mi form
Código:
<FORM METHOD="post" ACTION="update.asp">
<%
for i = 0 to 30
%>
  <p>
    <input name="bme<% = i %>" type="text" value="" />
  </p>
    <br />
    <%next%>
      <INPUT TYPE="hidden" value="<% = i %>" name="cantidad"> 
      <INPUT TYPE="SUBMIT" value="Insertar">
  </p>
</FORM>
y aqui proceso

Código:
<%
'Recogemos los valores del formulario
cantidad = Request.Form("cantidad")

'Instanciamos y abrimos nuestro objeto conexion 
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "circulacion", "sa", ""
set objRS = CreateObject("ADODB.Recordset")


for i = 0 to cantidad
bme_actual = request.form("bme" & i)
'Ahora creamos 30 sentencias SQL

if bme_actual<>"" or bme<>0 then
   sSQL="UPDATE costos_maxirest (bme) values ('" & bme_actual & "')"
   'y Ejecutamos la orden 30 veces
   set objRS = Conn.Execute (sSQL)
end if

next
%>

<h1><div align="center"><% = i %> registros Insertados</div></h1>
<div align="center"><a href="lectura.asp">Visualizar el contenido de la base</a></div>

<%
'Cerramos el sistema de conexion
Conn.Close
%>
__________________
Bye!