Between

[Ronaldo Bueno 23]

Pessoal boa tarde.

 

Alguém saberia me dizer o que está acontecendo com o código abaixo: banco Access

 

SQL = "select * FROM caixa_livre where data BETWEEN #" & dataini & "# and #" & datafim & "# and tipo = 'D' and despesa LIKE '%" & nomec & "%' order by data DESC"

 

onde dataini e datafim vem do form.

 

dataini	= CDate(Request.form("dataini"))
datafim	= CDate(Request.form("datafim"))

 

Não está dando erro, mas ele simplesmente lista tudo o que tem como o "nomec" não respeitando datas, ou seja se eu digito no form dataini = "01/08/2012" e datafim "12/08/2012" ele pega tudo inclusive com data de 28/06/2012.

 

O que fazer ? Obrigado

[xanburzum 169]

ele gera algume rro ?

 

olha este exemplo:

 

<%
session.LCID = 1046
datai = Request.Form("datai")
dataf = Request.Form("dataf")
pago  = Request.Form("pago")
relc  = Request.Form("relc")

datai = CDate(datai)
dataf = CDate(dataf)

if (IsDate(datai) = true) and (IsDate(dataf) = true) then
datai = datai
dataf = dataf
else
datai = ""
dataf = ""
end if

if (datai = "") or (dataf = "") then
Response.Write = "Data inicial ou final não são validas"
Response.End
Else

datai = Month(datai) & "/" & Day(datai) & "/" & Year(datai)
dataf = Month(dataf) & "/" & Day(dataf) & "/" & Year(dataf)

Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open Conectar

Set rs = Server.CreateObject("ADODB.RecordSet")
lin = "Select pedidofabrica.id_pedidofabrica, clientes.nome, pedidofabrica.pedido, pedidofabrica.pedido, pedidofabrica.valor, pedidofabrica.comissao "
lin = lin & "From pedidofabrica, clientes Where pedidofabrica.user_id = clientes.user_id and "
lin = lin & "pedidofabrica.data between #"& datai &"# and #" & dataf & "# and pedidofabrica.pago=" & pago & " and pedidofabrica.relatoriocomissao=" & relc