Array
(
)

Access e SQL (EXTRACT(MONHT...) Erro Indeterminado!

Microbios
   - 27 ago 2004

Olá a todos.

Uso o ADO com Delphi 6 e um MDB Criado no ACCESS 2003.
Tenho uma query para gerar um relatório por mês da data de nascimento.
Quando tento executá-la ocorre um erro.
MSG: ERRO INDETERMINADO. A
A query é a seguinte:

{Faz a Seleção da Query Para Dia e Mês como Selecionados}
DmBiblio.qryLeitores.Close;
DmBiblio.qryLeitores.SQL.Clear;
DmBiblio.qryLeitores.SQL.Add(´select * from db_leitores where extract(month from DataNascimento) = ´ + QuotedStr(txtMes.Text));
// DmBiblio.qryLeitores.Parameters.ParamByName(´pMes´).Value := StrToInt(txtMes.Text);
DmBiblio.qryLeitores.Open;


Det. Mesmo usando ParamByName.... Dá o mesmo erro.

Engraçado que usando a sentença SQL em um banco de dados MySql
direto pelo MySQL dá certinho....

O que há de errado?

Agradeço aos que puderem colaborar com uma dica.

Raphael
microbios@indinet.com.br





---------
:arrow: Título editado pelo moderador Nildo.
:arrow: Não utilize caixa alta nos títulos.
:idea: Leia as regras de conduta [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=6689]aqui[/url]


Thomaz_prg
   - 27 ago 2004

É que no Access não é aceito o comando Extract.
Tenta fazer assim:

#Código

DmBiblio.qryLeitores.Close; 
DmBiblio.qryLeitores.SQL.Clear;
DmBiblio.qryLeitores.SQL.Add(´select * from db_leitores where month(DataNascimento) = ´ + txtMes.Text);
DmBiblio.qryLeitores.Open;