BOTAO EXCLUIR VB6

MARCELO.TREZE 28/11/2013 12:02:43
#431568
colega comenta esta linha

rsSelecaoBanco.MovePrevious

ps: comentar é colocar um apostrofo antes da linha

[txt-color=#007100][ô] rsSelecaoBanco.MovePrevious[/txt-color]
ROGERCSANTOS 28/11/2013 12:45:13
#431572
Marcelo,

Mesmo comentando a linha que você ainda deu o mesmo erro.
O debug para em:

IdCodigo = rsSelecaoBanco!CODIGO

Tem mais alguma idéia do que possa ser?

MARCELO.TREZE 28/11/2013 13:44:25
#431577
Roger s situação é a seguinte o erro indica que código da sql não foi encontrado, então vamos a lógica:

a variavel idcódigo de inicio estará vazia, e se fizer uma consulta baseado nesta variavel vai gerar o erro que você vê, então qual é a solução, a solução está na estrutura no código.

ou seja primeiro você tem que preencher a variavel idcódigo, ou seja vamos supor que ao abrir o código você de um select max e grave a posição no idcódigo, um exemplo suponha que o ultimo código seja 10, com a posição gravada no idcódigo você poderá fazer a navegação da seguinte maneira:

como no POG que te passei, select * form tabela where codigo = idcodigo -1, traduzindo será feito um select para buscar o codigo 9 e encontrado este código ele será gravado na variavel idcodigo, proporcionando a impressão de navegação ou seja sempre um para trás..

ok até ai é minha idéa de proximo e anterior usando apenas query's, só que alguns tratamentos devem ser feitos tipo.

se você clicar em anterior, verificar se a variavel idcodigo está preenchida se não estiver, então coloque o menor codigo na mesma ou seja 1, o mesmo deverá ser feito para o botao proximo se clicar e a variavel idcódigo nao estiver preenchida, ai você deverá fazer outra query com select max para preencher com o ultimo código.

outra coisa se você clicar e proximo e estiver no ultimo registro vc deverá fazer um select para o primeiro registro, e para anteiror também deverá se feito esta comparação para jogar para o ultimo registro.

Página 2 de 2 [13 registro(s)]
Faça seu login para responder