DataModule1.SQLDataSet1.CommandText ??????

Delphi

27/12/2004

Boa Tarde a Todos! :lol:

Eu comprei um livro e tem um codigo que assim

DataModule1.SqlDataSete1.CommantText:=´Select * From Tabela´+´Where Codigo= :Cod and Senha= :Senha´;

Ai , em tempo de Execução da a seguinte menssagem:

Mais ou menos isto...

SqlSDataSet1 Error - Token line1 caracter 40 =

Acho que é o sinal de =, mas o codigo esta igual ao livro!

Sera que o Livro esta errado, o eu ?

Obrigado pela Informção e um Feliz ano novo a Todos. :lol:


Marcelo_j.

Marcelo_j.

Curtidas 0

Respostas

Vinicius2k

Vinicius2k

27/12/2004

Colega,

Não haveria necessidade de utilizar a concatenação... poderia ser simplesmente :
...CommandText := ´select * from <TABELA> where CODIGO = :cod and SENHA = :senha´;


Mas já que foi utilizada, deve acrescentar um espaço após TABELA ou antes do WHERE :
...CommandText := ´select * from <TABELA> ´ + ´where CODIGO = :cod and SENHA = :senha´;
// ou
...CommandText := ´select * from <TABELA>´ + ´ where CODIGO = :cod and SENHA = :senha´;


Se o espaço não for acrescentado o componente está recebendo uma string assim, o que causa o erro :
select * from TABELAwhere CODIGO = :cod and SENHA = :senha


Espero ter ajudado...
T+


GOSTEI 0
POSTAR