Sintax error

G

Guest

Hi group
There´s an error "Too few paramenters" on this query.... but i don´t know where... does anyone

Set rst = dbs.OpenRecordset("SELECT [T Requisicoes_Internas].Cod_Reduzido, [T Requisicoes_Internas].Data, [T Produtos_Itens].Descricao, [T Produtos_Itens].[Part#F], [T Requisicoes_Internas_Det].Obs, [T Funcionarios].Email "
& " FROM ([T Funcionarios] INNER JOIN [T Requisicoes_Internas] ON [T Funcionarios].Codigo = [T Requisicoes_Internas].Cod_Requisitante) INNER JOIN ([T Produtos_Itens] INNER JOIN ([T Requisicoes_Internas_Det] LEFT JOIN [C Requisicao_Interna_Email_aux] ON ([T Requisicoes_Internas_Det].Obs = [C Requisicao_Interna_Email_aux].Obs) AND ([T Requisicoes_Internas_Det].CodProd = [C Requisicao_Interna_Email_aux].CodProd) AND ([T Requisicoes_Internas_Det].Cod_Req = [C Requisicao_Interna_Email_aux].Cod_Req)) ON [T Produtos_Itens].CodProd = [T Requisicoes_Internas_Det].CodProd) ON [T Requisicoes_Internas].Cod_Req = [T Requisicoes_Internas_Det].Cod_Req "
& " GROUP BY [T Requisicoes_Internas].Cod_Reduzido, [T Requisicoes_Internas_Det].E_S, [C Requisicao_Interna_Email_aux].Cod_Req, [T Requisicoes_Internas].Encerrado, [T Requisicoes_Internas].Data, NZ([T Funcionarios].), datediff(cstr('d'),Date(),[T Requisicoes_Internas].[Data]), [T Produtos_Itens].Descricao, [T Produtos_Itens].[Part#F], [T Requisicoes_Internas_Det].Obs, [T Funcionarios].Email "
& " HAVING ((([T Requisicoes_Internas_Det].E_S)='S') AND (([C Requisicao_Interna_Email_aux].Cod_Req) Is Null) AND (([T Requisicoes_Internas].Encerrado)=False) AND ((NZ([T Funcionarios].[Email])) Is Not Null) AND ((Datediff(cstr('d'),Date(),[T Requisicoes_Internas].[Data]))>" & Val(Me.txt_dias) & ") AND (([T Funcionarios].Email) Is Not Null)) "
& " ORDER BY [T Requisicoes_Internas].Cod_Reduzido;"

Thanks
Rodolfo Fontes
 
M

MGFoster

Rodolfo said:
Hi group,
There´s an error "Too few paramenters" on this query.... but i don´t know where... does anyone?

Set rst = dbs.OpenRecordset("SELECT [T Requisicoes_Internas].Cod_Reduzido, [T Requisicoes_Internas].Data, [T Produtos_Itens].Descricao, [T Produtos_Itens].[Part#F], [T Requisicoes_Internas_Det].Obs, [T Funcionarios].Email " _
& " FROM ([T Funcionarios] INNER JOIN [T Requisicoes_Internas] ON [T Funcionarios].Codigo = [T Requisicoes_Internas].Cod_Requisitante) INNER JOIN ([T Produtos_Itens] INNER JOIN ([T Requisicoes_Internas_Det] LEFT JOIN [C Requisicao_Interna_Email_aux] ON ([T Requisicoes_Internas_Det].Obs = [C Requisicao_Interna_Email_aux].Obs) AND ([T Requisicoes_Internas_Det].CodProd = [C Requisicao_Interna_Email_aux].CodProd) AND ([T Requisicoes_Internas_Det].Cod_Req = [C Requisicao_Interna_Email_aux].Cod_Req)) ON [T Produtos_Itens].CodProd = [T Requisicoes_Internas_Det].CodProd) ON [T Requisicoes_Internas].Cod_Req = [T Requisicoes_Internas_Det].Cod_Req " _
& " GROUP BY [T Requisicoes_Internas].Cod_Reduzido, [T Requisicoes_Internas_Det].E_S, [C Requisicao_Interna_Email_aux].Cod_Req, [T Requisicoes_Internas].Encerrado, [T Requisicoes_Internas].Data, NZ([T Funcionarios].), datediff(cstr('d'),Date(),[T Requisicoes_Internas].[Data]), [T Produtos_Itens].Descricao, [T Produtos_Itens].[Part#F], [T Requisicoes_Internas_Det].Obs, [T Funcionarios].Email " _
& " HAVING ((([T Requisicoes_Internas_Det].E_S)='S') AND (([C Requisicao_Interna_Email_aux].Cod_Req) Is Null) AND (([T Requisicoes_Internas].Encerrado)=False) AND ((NZ([T Funcionarios].[Email])) Is Not Null) AND ((Datediff(cstr('d'),Date(),[T Requisicoes_Internas].[Data]))>" & Val(Me.txt_dias) & ") AND (([T Funcionarios].Email) Is Not Null)) " _
& " ORDER BY [T Requisicoes_Internas].Cod_Reduzido;")[/QUOTE]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

My guess is that the use of CStr('d') in the DateDiff() function is
causing the problem. Try changing the DateDiff() function to this:

((Datediff(""d"",Date(),[T Requisicoes_Internas].[Data]))

Using 2 double-quotes in a double quoted text produces one double-quote.
E.g.:

"This is an ""example"" of doubling the quotes"

Will evaluate to this:

This is an "example" of doubling the quotes

- --
MGFoster:::mgf00 <at> earthlink <decimal-point> net
Oakland, CA (USA)

-----BEGIN PGP SIGNATURE-----
Version: PGP for Personal Privacy 5.0
Charset: noconv

iQA/AwUBQHWR/oechKqOuFEgEQJoGgCffThv59rPKV8TSvippEVPPQi9ArEAnjqY
2JHdZP38eOe3IY4vkZ6wiB0Q
=7Tyn
-----END PGP SIGNATURE-----
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads


Top