USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  MoveMax não funciona
BarraDois
OURINHOS
SP - BRASIL
ENUNCIADA !
Postada em 15/02/2009 17:23 hs            
É o seguinte, a função MOVEMax deveria mover o cursor para o último registro da tabela, porém, quando coloco rst!moveMax e a variável recebe o valor do campo VarCod = Rst!Cod, vai para o PENÚLTIMO registro e eu preciso do último registro, o campo não é chave primário. Como resolvo isso?
   
MURILO
não registrado
ENUNCIADA !
Postada em 16/02/2009 11:21 hs   
para ir para o ultimo registro tente utilizar o rst.EOF
 
   
BarraDois
não registrado
ENUNCIADA !
Postada em 17/02/2009 19:58 hs   
Murilo, como eu vou usar o eof nesta situação?
É o seguinte, na virada do ano o sistema reinicia a contagem dos código, ou seja,
Murilo, como eu vou usar o eof nesta situação?
É o seguinte, na virada do ano o sistema reinicia a contagem dos código, ou seja, "cod = 234", na mudança de ano deveria ser "cod =1".
Para isso é feito uma comparação entre os anos, se for igual, soma mais 1, se o ano atual for maior, então recebe 1, até ai está tranquilo.
O problema é que em sendo os anos iguais, por exemplo, ano anterior 2009 e atual 2009,  rst.moveMax cod = rst!cod + 1, ou seja, último registro mais 1. O problema é que está vindo o penúltimo registro.
   
Alexandre Patos
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
Postada em 18/02/2009 07:47 hs            
barradois nao é movemax, e sim rst.MoveMax
     
Álvaro
Pontos: 2843
GUARULHOS
SP - BRASIL
Postada em 25/02/2009 15:19 hs            
Barrasdois você está utilizando SQL para fazer a consulta?
caso sim, você pode utilizar - Select max(seu campo) from sua tabela - com isso ele seleciona o último registro, desde que ele seja númerico, caso não você utiliza, rst.move l a s t

Abraço e que DEUS te abençõe, espero poder ter te ajudado
Eu sou o Senhor, o DEUS de vocês;
eu os seguro pela mão e lhes digo;
Não fiquem com medo, pois eu os ajudo
Isaias 41:13
TÓPICO EDITADO
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página