Foros del Web » Programando para Internet » ASP Clásico »

Actualizar registros

Estas en el tema de Actualizar registros en el foro de ASP Clásico en Foros del Web. Os paso el siguiente código : <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Response.Buffer=true %> <!-- #include virtual ="Tot_and_Toys/include/adovbs.inc" --> <% if Request.QueryString("registrado") = "invitado" then session("usuario_actual") = "INVITADO" ...
  #1 (permalink)  
Antiguo 22/08/2005, 02:32
 
Fecha de Ingreso: agosto-2003
Ubicación: Barcelona
Mensajes: 83
Antigüedad: 20 años, 10 meses
Puntos: 0
Actualizar registros

Os paso el siguiente código :

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<% Response.Buffer=true %>
<!-- #include virtual ="Tot_and_Toys/include/adovbs.inc" -->
<%

if Request.QueryString("registrado") = "invitado" then
session("usuario_actual") = "INVITADO"
usuario = ucase(session("usuario_actual"))
session("nombreCliente") = ""
session("autorizacion") = 1
else
usuario = ucase(session("usuario_actual"))
end if

if session("autorizacion")<>1 then
response.redirect "cat_tt_login.asp"
end if


%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<html>
<head>
<title>Untitled</title>
<link href="include/estiloTT.css" rel="stylesheet" type="text/css">
</head>

<body>
<%
For each campoRevisado in request.Form
'codigoRevisado = Request.Form(1)
'response.write("<script>alert('" & Request.Form("actualizar") & "')</script>")
response.write(Request.Form("actualizar"))
Next

pedido = 50
SQL = "SELECT O.CODIGOPRODUCTO,A.DESCRIPCION,A.UNISUBEMB, O.CANTIDAD,O.PRECIO FROM TT_ORDERDETAILS O INNER JOIN ARTICULOS A ON O.CODIGOPRODUCTO = A.CODIGOPROPIO WHERE OrderId = "& pedido &";"
%>

<!-- #include File = "include\conexion.asp" -->
<form action="cat_tt_pedido_detallado.asp" method="post" name="formulario">
<table border="1" width="100%" align="center">
<tr>
<td>Codigo Producto</td>
<td>Descripción</td>
<td>Embalaje</td>
<td>Lotes</td>
<td>Cantidad</td>
<td>Precio</td>
<td>Actualizar</td>
</tr>

<%
For i = 1 to rs.recordcount
if (i mod 2) = 0 then
response.write("<tr bgcolor='#FFED63'>")
else
response.write("<tr>")
end if
%>
<td align="center"><%= rs("CodigoProducto") %></td>
<td align="left"><%= rs("Descripcion") %></td>
<td align="center"><%= rs("UnisubEmb") %></td>
<td align="center">
<%
if rs("Cantidad") = 1 then
%>
<input type="Text" size="5" maxlength="5" name="lote_<%=rs("CodigoProducto")%>" value="<%= rs("UniSubEmb")%>">
<%
'response.write(rs("UnisubEmb"))
else
lotes = rs("Cantidad") / rs ("UnisubEmb")
%>
<input type="Text" size="5" maxlength="5" name="lote_<%=rs("CodigoProducto")%>" value="<%= lotes%>">
<%
'response.write(lotes)
end if
%>
</td>
<td align="center"><%= rs("Cantidad") %></td>
<td align="right"><%= FormatCurrency(rs("Precio")) %></td>
<td align="center">
<input type="Checkbox" name="actualizar" name="lote_<%=rs("CodigoProducto")%>" value="<%=rs("CodigoProducto")%>">
</td>

<%
rs.movenext
Next
%>
</table>
<br>
<input type="Submit" name="bActualizar" value="Actualizar">
</form>
</body>
</html>


Necesito que el usuario cuando pulse sobre el botón de actualizar, recupere el codigo del producto siempre y cuando tengas el checkbox de actualizar seleccionado y el campo de la cantidad, solamente puedo conseguir el codigo del producto y sale repetido tantos registros como resultados tenga la consulta

gracias
jaime
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 00:01.