RETORNAR REGISTRO ANTERIOR...
Bom dia!!! Por favor como poderia fazer p/a fazer uma função que retorno o registro anterior do informado na tela.Por exemplo o usuário informa
o registro 100 irá verificar o anterior ao 100 no BD, caso tenha o 99 retorna 99, e caso ñ tenha teria q pegar o anterior tipo 98,
97 etc...
Desde já Agradeço...
o registro 100 irá verificar o anterior ao 100 no BD, caso tenha o 99 retorna 99, e caso ñ tenha teria q pegar o anterior tipo 98,
97 etc...
Desde já Agradeço...
IVANVB,
Tenta assim
Dim rs As New ADODB.Recordset
rs.open [Ô]SELECT * FROM Tabela[Ô]
rs.MoveNext [ô] Muda para o proximo registro
rs.MovePrevious [ô] Muda para o registro anterior.
Thiago
Tenta assim
Dim rs As New ADODB.Recordset
rs.open [Ô]SELECT * FROM Tabela[Ô]
rs.MoveNext [ô] Muda para o proximo registro
rs.MovePrevious [ô] Muda para o registro anterior.
Thiago
seria ssim
Anterior
[Ô]SELECT MAX(id) as Codigo FROM tabela Where id < [Ô] & txtcod
proximo
[Ô]SELECT MAX(id) as Codigo FROM tabela Where id > [Ô] & txtcod
Anterior
[Ô]SELECT MAX(id) as Codigo FROM tabela Where id < [Ô] & txtcod
proximo
[Ô]SELECT MAX(id) as Codigo FROM tabela Where id > [Ô] & txtcod
Tópico encerrado , respostas não são mais permitidas