Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 02-08-2004
hook hook is offline
Miembro
 
Registrado: abr 2004
Posts: 67
Poder: 21
hook Va por buen camino
Borrar tablas

Hola, mi pregunta:

Como puedo borrar todos los datos de una tabla de access desde mi aplicacion en delphi???

Gracias.
Responder Con Cita
  #2  
Antiguo 02-08-2004
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.298
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por hook
Como puedo borrar todos los datos de una tabla de access desde mi aplicacion en delphi???
Puedes probar un TQuery o un TADOQuery/TADOCommand con la propiedad SQL a:

DELETE FROM nombretabla
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
  #3  
Antiguo 02-08-2004
hook hook is offline
Miembro
 
Registrado: abr 2004
Posts: 67
Poder: 21
hook Va por buen camino
Gracias, pero no me funciona bien del todo...

Tengo que borrar 12 tablas cada una pertenece a un mes del año y hepuesto 12 AdoQuery con la sentencia que me has puesto pero solo me borra la primera tabla y me da este error ---> " tabla_enero: CommandText does not return a result set "

En el form he puesto el siguiente codigo:

tabla_enero.Close;
tabla_enero.Open;

tabla_febrero.Close;
tabla_febrero.Open;

tabla_marzo.Close;
tabla_marzo.Open;

......

Que pasa????
Responder Con Cita
  #4  
Antiguo 02-08-2004
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.298
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por hook
(1) Tengo que borrar 12 tablas cada una pertenece a un mes del año y hepuesto 12 AdoQuery...

...
(2)
tabla_enero.Close;
tabla_enero.Open;
...
(1) Puedes usar un único objeto cambiando la sentencia SQL, no hace falta que crees 12.

Código Delphi [-]
...
 
Query.SQL.Clear;
Query.SQL.Add('DELETE FROM Tabla1');
Query.Exec;
 
Query.SQL.Clear;
Query.SQL.Add('DELETE FROM Tabla2');
Query.Exec;
 
...

(2) Como aparece en el ejemplo, prueba con el método Exec o ExecuteSQL (no lo recuerdo ahora) en lugar del Open;
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 14:23:49.


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
Copyright 1996-2007 Club Delphi