ADO Query error

[FerCastro]

Hola al foro,

Tengo un problema con un ADO y un query.

D2007
WXP SP2
ADO
Access 2003


Este es mi código:


DM1.QEDispositivos.SQL.Text := '';
DM1.QEDispositivos.SQL.Text := ' DELETE FROM Dispositivos WHERE IDDispositivo = '+ cIDDispositivo;
DM1.QEDispositivos.Active := true;
DM1.QEDispositivos.ExecSQL;


Al ejecutar me devuelve el siguiente error:

Command text does not return a result set.

He buscado en la web pero no he hallado nada.

Alguien me pueda tirar un cable?

Agradezco la información.

Fernando Castro

[BlueSteel]

Hola

bueno, por que mejor no aclaras de donde sacas el cIDDispositivo, puede que tu problema sea ese... si bien trabajas con sentencia sql, la forma de interpretar es diferente desdel Delphi... y debes seguir siertos parametros... lo puedes hacer de varias formas

por que no pruebas con esto

DM1.QEDispositivos.SQL.Text := '';
DM1.QEDispositivos.SQL.Text := ' DELETE FROM Dispositivos WHERE IDDispositivo :=Var1'
DM1.QEDispositovos.Parameters[0].Value := valor_cIDDispositivo;
DM1.QEDispositivos.Active := true;
DM1.QEDispositivos.ExecSQL;


otra forma es con QuoteStr...aunque no me se muy bien la sentencia...

Salu2:p:D

[jachguate]

Activas o abres un AdoQuery si la sentencia que contiene devuelve un cursor (un result set, en la jerga de ADO). Si no lo hace, simplemente invocas el método ExecSQL, que lanza la sentencia al servidor, pero no espera un cursor como resultado de la misma.

Hasta luego.

;)

[FerCastro]

Agradezco la ayuda de ambos.

El problema está resuelto, solo eliminé el Active y listo.

Saludos

Fer Castro