Jump to content
Fórum Script Brasil
  • 0

Datas E Bd - Dúvidas


fertel

Question

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...

Link to comment
Share on other sites

5 answers to this question

Recommended Posts

  • 0

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á

Link to comment
Share on other sites

  • 0

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 

Link to comment
Share on other sites

  • 0

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

Link to comment
Share on other sites

Guest
This topic is now closed to further replies.


  • Forum Statistics

    • Total Topics
      152.2k
    • Total Posts
      651.8k
×
×
  • Create New...