24/04/2011, 17:32
|
| | | Fecha de Ingreso: abril-2011 Ubicación: Salto
Mensajes: 437
Antigüedad: 13 años, 7 meses Puntos: 6 | |
borrar varios registros con delete sql Hola a todos, quiero pedirles ayuda para lo sgte:
Quiero eliminar varias filas de registros en un datagrid o truedbgrid acá les pongo el código fuente:
Private Sub cmdeliminarproveedor_Click()
multiopcion = MsgBox("¿Desea Eliminar el Proveedor Seleccionado?", vbExclamation + vbYesNo, "Advertencia")
If multiopcion = vbYes Then Sí le decís que sí al msgbox
Set rstproveedores = cnnADODB.Execute("Delete from proveedores where codigoproveedor=" + Me.tdbgrid_proveedores.Columns(0).Text + "")te eliminar mediante la columna la fila seleccionada
Set rstproveedores = cnnADODB.Execute("Select * from proveedores")muestra las tabla con los datos actualizados
Me.adodb_proveedor.Refreshy refresca la BD
End If
End Sub
Set rstproveedores = cnnADODB.Execute("Delete from proveedores where codigoproveedor=" + Me.tdbgrid_proveedores.Columns(0).Text + "")acá descubrí que puedo eliminar los proveedores directamente del datagrid sólo seleccionando la fila que yo quiera
también descubrí que el delete de sql tiene una propiedad llamada in:
Set rstproveedores = cnnADODB.Execute("Delete from proveedores where codigoproveedor in (1,4,5)")
acá podemos observar que puedo borrar más de una fila de registros, el truco está en concatenar las columnas del datagrid cómo acá:
" + Me.tdbgrid_proveedores.Columns(0).Text + "
acá es dónde necesito ayuda, ¿pueden ayudarme?, sí responden este mje se los agradezco. |