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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Select MAX(VAlor) from DATA
kalaricco
SÃO PAULO
SP - BRASIL
Postada em 08/10/2004 14:27 hs            

Caros amigos :

Tenho 2 caixas onde são digitada uma data inicial e uma data final, onde meu select busca dados neste intervalo de data.

Mas o problema é, que quando a data final é maior que a que existe no banco, o select traz mais registros do que deveria.

Então queria fazer um select onde traz a maior data do sistema e atribui-la a uma variavel, onde ela será comparada com a digitada para que acerte este erro.

Fiz assim: SELECT MAX(DATA) FROM CADASTRO, me parece que ele traz o registro, pq coloco rs.recordcount e mostra 1, mas não consigo atribuir a data a uma variavel. Tentei assim depois que faz o select faz:

Data_Acerto = rs("DATA")

Mas da erro dizendo que o item não corresponde ao ordinal .

Alguem tem uma ideia ???

     
Vila
não registrado
Postada em 08/10/2004 14:54 hs   
Eu acredito que vc. não precisa fazer uma Select para puxar a maior data.
Deve ter alguma coisa errada na sua select que faz a pesquisa da data inicial e final.
Num pequeno projeto que fiz "a título de aprendizado" faço isso que vc tá querendo e não dá erro. Posso digitar  uma data maior do que a que está no banco que me retorna tudo normal.
Vila
 
     
JDBasic
SIMÃO DIAS
SE - BRASIL
Postada em 08/10/2004 15:06 hs         
Kalaricco, tente com essa SQL:
SQL = "Select * From Cadastro Where Data>= #" & Format(Inicial.Value, "mm/dd/yyyy") & "# and Data<= #" & Format(Final.Value, "mm/dd/yyyy") & "# Order by Data"
 
Olha, eu uso essa sql, e ela não dá nenhum erro, mesmo que a data final seja maior que a do banco. Mesmo assim para atribuir a maior data a uma variável, faça isso:
 
SQL = "Select Max(Data) as Maior_Data From Cadastro"
VarData = Rs.Fields![Maior_Data]
Valeu!
 
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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