Datas E Bd - Dúvidas

[fertel]

O seguinte código:

ComandoSQL = "SELECT * FROM OS WHERE DATA > " & Cdate(Request.Form("DATA1")) & " AND DATA < " & Cdate(Request.Form("DATA2")) & " AND ESPECIE LIKE '%" + Replace(Request.Form("ESPECIE"), "'", "''") + "%' ORDER BY DATA ASC"
Set bd = Conexao.Execute(ComandoSQL)

Dá o seguinte erro:

Error Type:

Microsoft VBScript runtime (0x800A000D)

Type mismatch: '[string: "18/05/2005"]'

Por favor me ajudem...

[bareta]

utilize o between para buscar datas.... da uma buscada aqui no forum que não lembro aonde vi....

[fertel]

Fiz assim:

ComandoSQL = "SELECT * FROM OS WHERE DATA BETWEEN " & Request.Form("DATA1") & " AND " & Request.Form("DATA2") & " ORDER BY DATA ASC"
Set bd = Conexao.Execute(ComandoSQL)

Mas não retornou nenhum resultado. sendo que há um registro na data de hoje (16/06/2005).

Obrigado pela ajuda desde já

[cyberalexxx]

Uma coisa muito comum que percebo é o seguinte:

O SQL só fala ingles e o Access fala português, já tive problemas com faixa de datas e consegui solucionar assim:

anoi=year(Request.Form("DATA1"))
mesi=month(Request.Form("DATA1"))
diai=day(Request.Form("DATA1"))
anof=year(Request.Form("DATA2"))
mesf=month(Request.Form("DATA2"))
diaf=day(Request.Form("DATA2"))
Session.LCID=1033 
ComandoSQL = "SELECT * FROM OS WHERE DATA BETWEEN #" & DateSerial(anoi,mesi,diai) & "# and #" & DateSerial(anof,mesf,diaf) & "# ORDER BY DATA ASC"
Set bd = Conexao.Execute(ComandoSQL)
Session.LCID=1046 

[fertel]

Gênio!!! Consegui, CyberAlex.

Só um detalhe... Aqui no meu caso (trabalho) tanto windows quanto Access estão em inglês. Mas tudo bem, valeu por ter funcionado. Obrigado pelo esforço de todos

[cyberalexxx]

Gênio!!! Consegui, CyberAlex.

Só um detalhe... Aqui no meu caso (trabalho) tanto windows quanto Access estão em inglês. Mas tudo bem, valeu por ter funcionado. Obrigado pelo esforço de todos

beleza!!!

To fechando o tópico!!!