
22/06/2003, 14:30
|
| | Fecha de Ingreso: abril-2003
Mensajes: 606
Antigüedad: 22 años, 2 meses Puntos: 2 | |
Segun el post.
primer paso:
<html>
<head>
<title>Prueba Hotmail</title>
</head>
<body>
<form method=post action=Recibir.asp>
<table> <tr> <td> Id Pedido </td> <td> Usuario </td> <td> Total </td> </tr>
<%
Option Explicit
Dim oConn, Rs,SQL
Set oConn=Server.CreateObject("ADODB.Connection")
oConn.Open "DSN"
SQL="SELECT * FROM PEDIDOS"
Set Rs=oConn.Execute(SQL)
Do While Not Rs.EOF %>
<tr> <td> <input type="checkbox" name="Id" value="<%=Rs("Id_Pedido")%>"> </td> <td> <%=Rs("Usuario")%> </td> <td> <%=Rs("Total")%> </td> </tr>
<% Rs.MoveNext Loop %>
</table>
<input type=submit>
</form>
</body>
</html>
Supongo que ya pintaste los checkboxes no?
Segundo paso, eliminar:
SQL="DELETE * FROM PEDIDOS WHERE ID_PEDIDO IN("&Request.Form("Id")&")"
Set Rs=oConn.Execute(SQL) |