Relatório Simples ...
Socorro !!!
Tenho um formulario Configurar Relatorio de Aniversariantes, Nele eu tenho um combobox1 com os meses do ano e um botao visualizar ... neste botao esta o seguinte codigo:
Rel_aniver.Query1.sql.clear;
Rel_aniver.Query1.sql.add(´Select Nome, DataNasc, Telefone´+
´From Clientes´+
´where extract(month from DataNasc) = :MesAniver´+
´Order By Cod´);
Rel_aniver.query1.close;
Rel_aniver.query1.parambyname(´MesAniver´).AsInteger := combobox1.itemindex+1;
Rel_aniver.query1.open;
Rel_aniver.QuickRep1.Preview;
Esta dando erro: Param MesAniver not found ...
Socorro !!
No quickreport no outro formulario tenho um Query1 com o SQL Select * From Clientes Order By Cod .. Com os campos a serem mostrados Nome, DataNasc e Telefone ...
Ajudem-me !! Vida ou morte!!!
Estou no MSN !!!! diegonunesmeira2@hotmail.com
Obrigado!
Tenho um formulario Configurar Relatorio de Aniversariantes, Nele eu tenho um combobox1 com os meses do ano e um botao visualizar ... neste botao esta o seguinte codigo:
Rel_aniver.Query1.sql.clear;
Rel_aniver.Query1.sql.add(´Select Nome, DataNasc, Telefone´+
´From Clientes´+
´where extract(month from DataNasc) = :MesAniver´+
´Order By Cod´);
Rel_aniver.query1.close;
Rel_aniver.query1.parambyname(´MesAniver´).AsInteger := combobox1.itemindex+1;
Rel_aniver.query1.open;
Rel_aniver.QuickRep1.Preview;
Esta dando erro: Param MesAniver not found ...
Socorro !!
No quickreport no outro formulario tenho um Query1 com o SQL Select * From Clientes Order By Cod .. Com os campos a serem mostrados Nome, DataNasc e Telefone ...
Ajudem-me !! Vida ou morte!!!
Estou no MSN !!!! diegonunesmeira2@hotmail.com
Obrigado!
Diegus
Curtidas 0
Respostas
Fabio.hc
06/01/2004
´where extract(month from DataNasc) = :MesAniver´+ ´Order By Cod´);
Coloque um espaço após MesAniver:
´where extract(month from DataNasc) = :MesAniver ´+ ´Order By Cod´);
GOSTEI 0