NECESITO SABER SI ES POSIBLE
HOLA NECESITO SABER SI ES POSIBLE HACER QUE MEDIANTE UN BOTON QUE ESTÁ REALIZANDO LA FUNCIÓN DE MOSTRAR EL REGISTRO SIGUIENTE DE UNA BASE DE DATOS CONECTADA CON UN CONTROL DATA DECLARARLE MEDIATE CÓDIGO EN EL PROCEDIMIENTO DEL BOTON SIGUIENTE QUE CUANDO LLEGUE AL FINAL DE LA TABLA MUESTRE UN MENSAGE QUE DIGA QUE SE ACABARON LOS RECORDS.
SALUDOS
LLANES
SALUDOS
LLANES
Nada más tienes que preguntar si el registro actual es el último registro:
If adodc1.Recordset.AbsolutePosition=adodc1.Recordset.RecordCount then
msgbox "Es el último registro"
end if
If adodc1.Recordset.AbsolutePosition=adodc1.Recordset.RecordCount then
msgbox "Es el último registro"
end if
este es un ejemplo del boton siguiente con una tabla llamada clientes y una funcion llamada mostrar_clientes
dentro del boton:
clientes.movenext
if clientes.eof then
msgbox "Este es el ultimo registro, se acavaron los records"
clientes.movelast
else
call mostrar_clientes
end if
end sub
dentro del boton:
clientes.movenext
if clientes.eof then
msgbox "Este es el ultimo registro, se acavaron los records"
clientes.movelast
else
call mostrar_clientes
end if
end sub