Consulta entre duas datas

[kabessa 0]

Ola galera, blzera!?

 

To com o seguinte problema, tenho uma tabela promocao e tenho 2 campos no formato data data_inicial e data_final

eu preciso pegar a data atual e ver se existe algum registro entre essa data!

 

to tentando dessa forma mais nao ta dando certo

 

x_data = date()

Set RS = Server.CreateObject("ADODB.Recordset")
RS.CursorType = adOpenKeyset
RS.Open "SELECT * FROM tab_promocao WHERE datai_promocao <= "&x_data&" AND dataf_promocao >= "&x_data&" ORDER BY datai_promocao DESC" , Conexao

Alguem saberia me dizer onde esta o erro?

 

Desde ja agradeço!

[mibnetweb 0]

Dê uma olhada neste tópico:

 

http://forum.imasters.com.br/index.php?showtopic=173705

 

Talvez ajude !!!!

[Mário Monteiro 179]

se o db for acess experiemente colocar as datas no formato mm/dd/aaaa

[Web Design Valdeci 0]

Para formatar a data:

 

Function FormataData(Data)
   If Data <> "" Then FormataData =  Right("0" & DatePart("d", Data),2) & "/" & Right("0" & DatePart("m", Data),2) & "/" & DatePart("yyyy", Data)
End Function

data = FormataData(request.form("data"))
[code]

Cara não testei não mas tenta aí:

[code]"SELECT * FROM tab_promocao WHERE (datai_promocao <= #"&x_data&" # AND dataf_promocao >= #"&x_data&"#) ORDER BY datai_promocao DESC" , Conexao