Ver Mensaje Individual
  #1  
Antiguo 09-09-2011
mellomda mellomda is offline
Miembro
 
Registrado: sep 2010
Ubicación: mar de ajo, partido de la costa, buenos aires, argentina
Posts: 16
Reputación: 0
mellomda Va por buen camino
Eliminar Registro Con ADODataSet

Hola Gente, espero me puedan ayudar. estuve buscando en el foro y encontre temas relacionados pero no la solucion a mi problema...

el Problema que tengo es el siguiente:
Estoy usando ADO para conectarme a una base de datos SQL con Delphi; Utilizo un ADOConection Para Establecer la conexion con la base de datos, y diferentes ADODataSets para mostrar los datos de las diferentes tablas y para realizar las consultas. el problema es cuando intento eliminar un registro... Hago lo siguiente:

1- Consulta: String;
2- Consulta := 'Delete From ' + Tabla + ' Where ' + Campo + ' = ' + Dato;
3- ADODataSet.Active := False;
4- ADODataSet.CommandText := SQL;
5- ADODataSet.Active := True;

1- Declaro Una Variable Auxiliar De Tipo String Para Asignarle la Consulta
2- Le Asigno la Consulta a la Variable Auxiliar
3- Desconecto el DataSet Para Poder Realizar La Consulta
4- Ingreso la Consulta Al DataSet
5- Vuelvo a Conectar el DataSet Para Realizar La Consulta y Reflejar Los Resultados

Teoricamente No hay errores, ya que luego de ultima instruccion el registro queda eliminado, el programa sigue andando y los resultados reflejados en el DBGrid son correctos, Pero me sale un cartel (Cada vez que elimino un registro) que dice lo siguiente:

'ADODataSet: CommandText Does Not Return A Result Set'

Analizando un poco lo que dice, suena logico, ya que la consulta realizada no devuelve ningun dato (o conjunto de datos), pero en fin, como le hago sino para eliminar un registro sin que aparezca ese molesto cartel cada vez que se realiza la operacion???
Responder Con Cita