Solo Por Experimentar

[carminvampire]

TENGO UNA BASE DE DATOS HECHA EN ACCESS :-p ME HE CANSADO DE BUSCAR LA FORMA DE BORRAR UN REGISTRO ESPECIFICO DESPUES DE HACER UNA CONSULTA MI PREGUNTA ES PUEDO HACER ESA ELIMINACIÓN POR MEDIO DE VISUAL BASIC Y COMO ?

DE ANTEMANO GRACIAS POR SU AYUDA

[freegirl]

pues si tienes un botón dónde dice "borrar" y utilizas un Data para acceder a la BD, este código te va a funcionar:

data1.recordset.delete

if not data1.recordset.eof then
data1.recordset.movenext
elseif not data1.recordset.bof then
data1.recordset.moveprevious
else
msgbox "Estás en el ultimo registro"
end if


saludos!

[rsiles]

Bueno has lo siguiente cualquiera de estos

Si usas control data
Data1.Recordset.Delete
*******************************
si estas usasndo DAO
Dim a As Workspace
Dim data As Database
Dim rst As Recordset

Set a = CreateWorkspace("", "admin", "")
Set data = a.OpenDatabase("c:\db1.mdb", False, False)
Set rst = data.OpenRecordset("cli", dbOpenDynaset)
rst.Delete
**************************************

Lo unico es posicionarte en el registro que deseas eliminar y luego le das le instruccion al recordset para que este lo elimine.

[reel]

Para que sirve el Worksapace en DAO?

En otras palabras, que hace y para que sirve la siguietne línea?

Set a = CreateWorkspace("", "admin", "")

Lo pregunto porque nunca he programado con DAO.

Saludes

[carminvampire]

gracias voy a probar sus consejos y les escribo informandoles

estoyn pra servirles en lo que pueda ayudarles

atte. lestat

[voldemort]

undefinedundefinedundefined
gracias me han servido sus consejos a mi tb.GRACIAS.