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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Erro na consulta com data!!!
Leolima
PORTO ALEGRE
RS - BRASIL
Postada em 05/11/2004 13:55 hs            
Boa Tarde a todos
O que ha de errado??
 
        rs.Open "SELECT * FROM tb_reserva WHERE data = #" & data & "#", conn, adOpenKeyset, adLockOptimistic
        BOF retorna True mesmo a data estando na tabela!!!
                                                Grato aguardo resposta!!
 

"A mente que se abre para novas idéias jamais volta ao seu tamanho original".
(Albert Einstein)

----------------------------------------------PII-450-256MB-GForceII-64-TV/out-Soyo----- ----Agora com Framework 1.1 + Visual Studio 2003 + WinXP.  Acredite se quiser!---- 
 Leonardo Cassuriaga                                                            Fone:(51) 96394735
 Tecnico Informática                              __o                              Programador VB6.0
 Programador Web                              _>/,                                          DBA Access
-------------------------------------------(+)/(+)__________P_o_r_t_o__A_l_e_g_r_e_RS__
Charles   Darwin :   As   espécies   que   sobrevivem   não   são   as   mais   fortes,    mas as que melhor conseguem se adaptar às mudanças!
-----------------------------------------------------------------------------------------------

     
X-Crow Original
Pontos: 2843
VITÓRIA
ES - BRASIL
Postada em 06/11/2004 10:31 hs         
Mannow, Por padrão a consulta SQL exige que a data seja fornecida no formato mm/dd/yyyy, se a variável "data" for string voce pode fazer da seguinte forma:
data = CStr(format(data, "mm/dd/yyyy"))
 
Espero ter ajudado... Abraços, Sidnei
     
Ismael_CPD
SAO PAULO
SP - BRASIL
Postada em 07/11/2004 09:05 hs            
Voce pode tambem formatar a data na propria select assim:
rs.open "Select * from Tb_reserva where data =  #" & Format (txtdata, "yy/mm/dd") & "#,conn, adOpenKeyset, adLockOptimistic
     
Fabio Rocha
SÃO PAULO
SP - BRASIL
Postada em 08/11/2004 07:11 hs            
Dim vardata as Date
 
vardata = TxtData.Text
vardata = CDate(vardata)
vardata = Format(vardata, "mm/dd/yyyy")
 
rs.Open "SELECT * FROM tb_reserva WHERE data = #" & data & "#", conn
     
Leolima
PORTO ALEGRE
RS - BRASIL
ENUNCIADA !
Postada em 08/11/2004 12:07 hs            
Valeu pela ajuda consegui resolver!!!

"A mente que se abre para novas idéias jamais volta ao seu tamanho original".
(Albert Einstein)

----------------------------------------------PII-450-256MB-GForceII-64-TV/out-Soyo----- ----Agora com Framework 1.1 + Visual Studio 2003 + WinXP.  Acredite se quiser!---- 
 Leonardo Cassuriaga                                                            Fone:(51) 96394735
 Tecnico Informática                              __o                              Programador VB6.0
 Programador Web                              _>/,                                          DBA Access
-------------------------------------------(+)/(+)__________P_o_r_t_o__A_l_e_g_r_e_RS__
Charles   Darwin :   As   espécies   que   sobrevivem   não   são   as   mais   fortes,    mas as que melhor conseguem se adaptar às mudanças!
-----------------------------------------------------------------------------------------------

   
Página(s): 1/1    

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