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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Buscar registos entre duas datas
Pinho
PORTO
22 - PORTUGAL
ENUNCIADA !
Postada em 13/06/2006 20:49 hs            
Boas,
Este bocado de codigo está a dar erro na linha a negrito alguem me explica porquê?
 
Dim Rs As ADODB.Recordset
Dim Cnn As ADODB.Connection
 
    Set Cnn = New ADODB.Connection
    Set Rs = New ADODB.Recordset
    DATAI = Format(txtDataInicio.Text, "MM/DD/YYYY")
    DATAF = Format(txtDataFim.Text, "MM/DD/YYYY")
    Cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:VipSisd1.mdb"
   
    Rs.CursorLocation = adUseClient
    Rs.Open "SELECT * FROM ClientesGlobal WHERE Data between '" & DATAI & "' AND '" & DATAF & "'", Cnn
  
ERRO: Tipo de dados incorrecto na expressao de creditos
 

Obrigado, Pinho
   
ghost_jlp
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 13/06/2006 21:12 hs            

coloca "#" no lugar de aspas simples amigo...

qq dúvida é só postar

t+

   
Pinho
PORTO
22 - PORTUGAL
ENUNCIADA !
Postada em 14/06/2006 07:04 hs            
Blz,
Já ta funcionando, mas juro que nao consigo perceber quando devo usar aspas simples ou # (cardinal).
 

Obrigado, Pinho
   
Cardoso G
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
ENUNCIADA !
Postada em 14/06/2006 07:23 hs            
use o cardinal so para datas
   
Pinho
PORTO
22 - PORTUGAL
ENUNCIADA !
Postada em 14/06/2006 07:41 hs            
Vou-me apercebendo disso pouco a pouco, as instruccoes do select pra mim ainda me fazem alguma confusao, mas com o tempo vou la.

Obrigado, Pinho
   
kerplunk
Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 14/06/2006 08:19 hs         
Pessoalmente, nunca gostei do uso do "#" prefiro mesmo usar os famigerados CvDate:
Rs.Open "SELECT * FROM ClientesGlobal WHERE Data >= CvDate('" & DATAI & "') AND  Data<= CvDate('" & DATAF & "')", Cnn
   
Página(s): 1/2      PRÓXIMA »


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