
17/07/2006, 13:26
|
| | Fecha de Ingreso: octubre-2003 Ubicación: Lima
Mensajes: 319
Antigüedad: 21 años, 6 meses Puntos: 2 | |
Gracias a todos, aqui les copio el codigo. Primero hacen una pagina que muestre asi como en hotmail un checkbox por cada item dentro de un form por supuesto, luego lo envian a unapagina que los borrara dela sgrte. forma:
Dim strDeleteList
´esta linea recupera los checkbox marcados en el formulario
strDeleteList = Request("borrar")
if strDeleteList = "" then
'No items to delete
Response.Write "You did not select any items to delete!"
Else
'Open a connection to the database
Dim conn2, SQL2, rs2
set conn2=Server.CreateObject("ADODB.Connection")
conn2.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("tubasedadadtos.mdb"))
SQL2 = "DELETE FROM tutabla " & _
"WHERE id IN (" & strDeleteList & ")"
conn2.Execute SQL2
'Clean up
conn2.Close
Set conn2 = Nothing
'Display to the user that the product have been deleted.
Response.Write Request("Delete").Count & " entries were deleted..."
End If
Espero les sirva |