Between

[shumi 0]

Galera,To tentando fazer o between aqui, mas não rola...Fiz assim:

data_inicio = Request.Form("data_inicio")data_fim = Request.Form("data_fim")dataa =  day(data_inicio) & "/" & month(data_inicio) & "/" & year(data_inicio)data_fimm =  day(data_fim) & "/" & month(data_fim) & "/" & year(data_fim)Sql3 = "Select Sum (dados_vendas.vendas) As vende, dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local From dados_vendas,nosso_produto Where dados_vendas.campanha="&campanha&" and data BETWEEN "&"#" & dataa & "#' AND '"&"#" & data_fimm & "# and dados_vendas.nosso_produto=nosso_produto.codnossoproduto and dados_vendas.local="&estabelecimento&" group by dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local"Set rs3 = Conexcao.Execute(Sql3)

e deu

Microsoft OLE DB Provider for ODBC Drivers error '80040e14' [Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'dados_vendas.campanha=72 and data BETWEEN #12/6/2006#' AND '#12/6/2006# and dados_vendas.nosso_produto=nosso_produto.codnossoproduto and dados_vendas.local=11'. /sis/relatorio_de_vendas_mesmo.asp, line 17

o que está errado???

[CassianoVix 0]

Galera,To tentando fazer o between aqui, mas não rola...Fiz assim:

data_inicio = Request.Form("data_inicio")data_fim = Request.Form("data_fim")dataa =  day(data_inicio) & "/" & month(data_inicio) & "/" & year(data_inicio)data_fimm =  day(data_fim) & "/" & month(data_fim) & "/" & year(data_fim)Sql3 = "Select Sum (dados_vendas.vendas) As vende, dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local From dados_vendas,nosso_produto Where dados_vendas.campanha="&campanha&" and data BETWEEN "&"#" & dataa & "#' AND '"&"#" & data_fimm & "# and dados_vendas.nosso_produto=nosso_produto.codnossoproduto and dados_vendas.local="&estabelecimento&" group by dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local"Set rs3 = Conexcao.Execute(Sql3)

e deu

Microsoft OLE DB Provider for ODBC Drivers error '80040e14' [Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'dados_vendas.campanha=72 and data BETWEEN #12/6/2006#' AND '#12/6/2006# and dados_vendas.nosso_produto=nosso_produto.codnossoproduto and dados_vendas.local=11'. /sis/relatorio_de_vendas_mesmo.asp, line 17

o que está errado???

Aparentemente está faltando colocar a aspas simples no início da primeira data e no final da segunda!

[shumi 0]

tentei assim:

Sql3 = "Select Sum (dados_vendas.vendas) As vende, dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local From dados_vendas,nosso_produto Where dados_vendas.campanha="&campanha&" and data BETWEEN '"&"#" & dataa & "#' AND '"&"#" & data_fimm & "#' and dados_vendas.nosso_produto=nosso_produto.codnossoproduto and dados_vendas.local="&estabelecimento&" group by dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local"Set rs3 = Conexcao.Execute(Sql3)

e deu o erro:

Microsoft OLE DB Provider for ODBC Drivers error '80040e07' [Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression. /sis/relatorio_de_vendas_mesmo.asp, line 17

[jrcardozo 4]

Galera,

To tentando fazer o between aqui, mas não rola...

 

Fiz assim:

 

data_inicio = Request.Form("data_inicio")data_fim = Request.Form("data_fim")dataa =  day(data_inicio) & "/" & month(data_inicio) & "/" & year(data_inicio)data_fimm =  day(data_fim) & "/" & month(data_fim) & "/" & year(data_fim)Sql3 = "Select Sum (dados_vendas.vendas) As vende, dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local From dados_vendas,nosso_produto Where dados_vendas.campanha="&campanha&" and data BETWEEN "&"#" & dataa & "#' AND '"&"#" & data_fimm & "# and dados_vendas.nosso_produto=nosso_produto.codnossoproduto and dados_vendas.local="&estabelecimento&" group by dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local"Set rs3 = Conexcao.Execute(Sql3)

e deu

 

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

 

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'dados_vendas.campanha=72 and data BETWEEN #12/6/2006#' AND '#12/6/2006# and dados_vendas.nosso_produto=nosso_produto.codnossoproduto and dados_vendas.local=11'.

 

/sis/relatorio_de_vendas_mesmo.asp, line 17

o que está errado???

 

Aqui está o erro, você colocou caracteres desnecessarios:

BETWEEN "&"#" & dataa & "#' AND '"&"#" & data_fimm & "#

 

tente assim:

Between (#" & dataa & "# And #" & data_fimm & "#)

[shumi 0]

então eu fiz assim:

 

Sql3 = "Select Sum (dados_vendas.vendas) As vende, dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local From dados_vendas,nosso_produto Where dados_vendas.campanha="&campanha&" and data Between #" & data_fimm & "# And #" & dataa & "# and dados_vendas.nosso_produto=nosso_produto.codnossoproduto and dados_vendas.local="&estabelecimento&" group by dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local"Set rs3 = Conexcao.Execute(Sql3)

ai ta estranho pq está vindo dados errados...

 

por exemplo se eu coloco pra achar o periodo de 12/06/2006 a 13/06/2006

deveria vir a quantidade 1 e esta vindo a quantidade 3.

E se tento o periodo 12/06/2006 a 15/06/2006 deveria vir a quantidade 3 e esta vindo a quantidade 1.

[ultra 0]

Talvez o tipo Data do seu BD não seja DD/MM/AAAA...........

[shumi 0]

exato ultra!

 

Valeu galera pela força!

 

resultado

dataa =   month(data_inicio)& "/" & day(data_inicio) & "/" & year(data_inicio)data_fimm =  month(data_fim) & "/" & day(data_fim) & "/" & year(data_fim)Sql2 = "Select * From campanha Where codcampanha ="&campanhaSet rs2 = Conexcao.Execute(Sql2)Sql3 = "Select Sum (dados_vendas.vendas) As vende, dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local From dados_vendas,nosso_produto Where dados_vendas.campanha="&campanha&" and data Between #" & data_fimm & "# And #" & dataa & "# and dados_vendas.nosso_produto=nosso_produto.codnossoproduto and dados_vendas.local="&estabelecimento&" group by dados_vendas.campanha,dados_vendas.nosso_produto,dados_vendas.unidade_medida,nosso_produto.codnossoproduto,nosso_produto.nosso_produto,dados_vendas.local"Set rs3 = Conexcao.Execute(Sql3)

Valeu galera!