To precisando de uma pequena dica.

Delphi

07/06/2004

:roll:
Amigos estou fazendo um siteminha com MySql e ZeosLib, e em um determinado momento eu tenho que esvasiar uma tabela, e quando eu executo os comando de SQL o sistema me retorna a segunte menssagem: ´Can not retrieve ResultSet data´.
O codigo esta da seguinte maneira :

   DModuloDados.QryProgramacaoAulas.SQL.Clear;
   DModuloDados.QryProgramacaoAulas.SQL.Add(´delete from programacao_aulas´);
   DModuloDados.QryProgramacaoAulas.SQL.Add(´where´);
   DModuloDados.QryProgramacaoAulas.SQL.Add(´codigo_turma=:pCodigoTurma´);
   DModuloDados.QryProgramacaoAulas.ParamByName(´pCodigoTurma´).AsString := DModuloDados.QryCadastroTurmassequencial.AsString;
   DModuloDados.QryProgramacaoAulas.Open;


Se alguem puder me dar uma ajudinha ficarei muito grato, um abraço a todos.


Targinosilveira

Targinosilveira

Curtidas 0

Respostas

Vinicius2k

Vinicius2k

07/06/2004

Colega,

O método Open só eh usado quando a instrução SQL é do tipo Select... para as instruções Insert, Update, Delete e as DML, usa-se o método ExecSQL :
DModuloDados.QryProgramacaoAulas.ExecSQL;


Espero ter ajudado...
T+


GOSTEI 0
Vinicius2k

Vinicius2k

07/06/2004

...e as DML

Desculpe amigo... o correto é DDL...


GOSTEI 0
POSTAR