como se podria evitar q se borre el ultimo registro de una tabla dentro de un programa vb?, esto para obtener el ultimo consecutivo y no perder la numeracion del folio, Gracias

Depende de cómo borres los registros; si es mediante una consulta de acción "Delete From Tabla", mucho me temo que no se pueda controlar, pero si lo haces a través de código sí.

Mira si te sirve el siguiente ejemplo:

Código:

 If rs.AbsolutePosition = rs.RecordCount Then
 MsgBox "El último registro no se puede borrar"
 Else
 rs.Delete
 rs.Requery
 End If

Saludos

q bien anibal, me parece buena opcion la q señalas, ahora, se podra hacer algo si se hace una consulta doble, la pimera para establecer cual es el ultimo folio y la segunda para eliminar los archivos hasta el valor de la primera consulta? ya sea q se controle mediante un do while o un for, tal vez se pueda hacer algo... gracias