select

Question

Ol� pessoal estou fazendo um select na minha tabela:
work.SQL.Text := �Select count(*) � +
� from � +
��C:\PesquisaOrg\dbPesquisaOrg.DB�� +
� where Q1 = F � ;
work.Open;
mas est� dando o seguinte erro: �Invalid field name: F�

Rjun · Answer

Ele n�o esta encontrando o campo F. O que seria F no seu caso ?...

Gandalf.nho · Answer

O que � o F? Um campo ou um valor de par�metro?...

Daia · Answer

O �F� tenho gravado na tabela quer dizer que � do sexo �Feminino�, mas s� gravei F na tabela......

Rjun · Answer

Voc� tem q colocar o F entre aspas simples.

work.SQL.Text := �Select count(*) � + � from � + ��C:\PesquisaOrg\dbPesquisaOrg.DB�� + � where Q1 = ��F�� ;

Gandalf.nho · Answer

Vc tem que p�r o F entre aspas ou ap�strofos, dependendo do banco de dados e n�o como est� no seu c�digo. Se for aspas, tente assim:

work.SQL.Text := �Select count(*) from � + 
�"C:\PesquisaOrg\dbPesquisaOrg.DB"� + 
� where Q1 = � + QuotedStr(�F�); 
work.Open;

Daia · Answer

work.SQL.Text := �Select count(*) � +
� from � +
��C:\PesquisaOrg\dbPesquisaOrg.DB�� +
� where Q1 = � + �F� ;
work.Open;

acabei de fazer isso, mas deu o mesmo erro...

Rjun · Answer

O jeito que voc� fez � id�ntico ao seu primeiro post. Fa�a como eu ou o Gandalf.nho....

Daia · Answer

Usando o �QuotedStr� deu certo... Valeu...Mais uma perguntinha como fa�o para exibir este resultado em um qrLabel??...

Gandalf.nho · Answer

Fa�a uma pequena altera��o no seu c�digo assim:

work.SQL.Text := �Select count(*) as Contador from � + 
�"C:\PesquisaOrg\dbPesquisaOrg.DB"� + 
� where Q1 = � + QuotedStr(�F�); 
work.Open;

E depois para atribuir ao QrLabel fa�a assim:

QRLabel1.Caption := work.FieldByName(�Contador�).AsString;

Daia · Answer

Valeu, funcionou certinho......

F�rum select #279748