Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   ADO Query error (https://www.clubdelphi.com/foros/showthread.php?t=55247)

FerCastro 11-04-2008 06:17:19

ADO Query error
 
Hola al foro,

Tengo un problema con un ADO y un query.

D2007
WXP SP2
ADO
Access 2003


Este es mi código:

Código Delphi [-]
          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 11-04-2008 06:55:46

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
Código Delphi [-]
 
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 11-04-2008 06:57:22

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 11-04-2008 15:12:21

Agradezco la ayuda de ambos.

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

Saludos

Fer Castro


La franja horaria es GMT +2. Ahora son las 17:10:17.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi