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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Consulta SQL
Pedim
não registrado
Postada em 07/02/2005 14:26 hs   
    Alguem pode me dizer porque esta linha de código não dá certo:
 
    DataDe = Format(DI, "'yyyy/mm/dd'")
    DataAte = Format(DF, "'yyyy/mm/dd'")
    PlacaVeiculo = Format(Nome, "'AAA####'")
     adoCalcDiaria.RecordSource = "select sum(Valor_Diaria) AS CalcDiaria, sum(Valor_Despesa) AS CalcDespesas from tbldiarias_ta where Placa " & " = " & PlacaVeiculo & " and Data_Diaria between " & DataDe & " and " & DataAte
     adoCalcDiaria.Refresh
 
     Esta linha abaixo esta funcionado, quando eu coloco a placa diretamente no código. Seria a forma que estou passando o parametro.     

     adoCalcDiaria.RecordSource = "select sum(Valor_Diaria) AS CalcDiaria, sum(Valor_Despesa) AS CalcDespesas from tbldiarias_ta where Placa=" & "'AFC0649'" & " and Data_Diaria between " & DataDe & " and " & DataAte
     adoCalcDiaria.Refresh
 
     
ghost_jlp
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 07/02/2005 17:26 hs            

Tente fazer a sua consulta deste jeito:

"select sum(Valor_Diaria) AS CalcDiaria, sum(Valor_Despesa) AS CalcDespesas from tbldiarias_ta where Placa = " & PlacaVeiculo & " and Data_Diaria between #" & DataDe & "# and #" & DataAte & "#"

O símbolo "#" é para ser usado com as datas ... pode ser q seja isso...

qq coisa é só postar novamente.

t+

     
Martini
Pontos: 2843 Pontos: 2843
PAROBÉ
RS - BRASIL
Postada em 09/02/2005 08:03 hs         
***aspas simples no where da placa, formato da data e # no where da data
 
 DataDe = Format(DI, "mm/dd/yyyy")
    DataAte = Format(DF, "mm/dd/yyyy")
 adoCalcDiaria.RecordSource = "select sum(Valor_Diaria) AS CalcDiaria, sum(Valor_Despesa) AS CalcDespesas from tbldiarias_ta where Placa = '" & PlacaVeiculo & "' and Data_Diaria between #" & DataDe & "# and #" & DataAte & "#"
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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