entrando en el mundo ADO

[__cadetill]

Empezado por weke

.....ahora me gustaría eliminar tablas.

Has probado con una sentencia SQL?

Código SQL [-]
drop table MiTabla

PD: no aseguro que funcione, no he trabajado con ADO, pero por probar......

[__marcsc]

Hola,

yo creo que lo único que tienes que hacer es poner un ADOCommand que envie a la conexión el Drop Table que te comenta cadetill.

Saludos!

[weke]

Gracias por contestar tan rápido. Es justo lo que estaba probando antes de leer vuestros mensajes.

El código que he puesto es el siguiente:

Código Delphi [-]
    try
      ADOCommand1.CommandText:='DROP TABLE ' + tabla_eliminar;
      ADOCommand1.Execute;
      borrada:=true;
    except
      ShowMessage('La tabla no se ha podido eliminar correctamente.');
    end;

Pero no me la elimina, me salta del 'Execute' al 'except'.

Es lo primero que he probado, porque al crear la tabla lo he hecho con 'CREATE TABLE nombre_tabla' y si que me ha funcionado.

Gracias.

[__cadetill]

Hola Weke

Sin responder a tu pregunta, te daré un consejo. En el manejo de errores, es conveniente saber el error que realmente te da Delphi. Es más fácil capturar los posibles fallos del programa. Para ello, puedes hacer algo así:

Código Delphi [-]
try
  ADOCommand1.CommandText:='DROP TABLE ' + tabla_eliminar;
  ADOCommand1.Execute;
  borrada:=true;
except
  on E: Exception do
    ShowMessage('La tabla no se ha podido eliminar correctamente.'#13#13 + 
                     'Mensaje de error: '#13 + E.Message);
end;

Es una buena costumbre

[weke]

Gracias por el consejo cadetill.
Ya he conseguido que me borre correctamente la tabla.

Ahora, todo lo que crean que sea interesante saber acerca de ADO, me vendrá bien. Si me sale alguna dudas más os la haré llegar.

Muchas gracias otra vez a todos.

Saludos.

[weke]

He colocado un 'ADOConnection' en el formulario principal. Lo he declarado como publico para que todos los componentes se conecten a él.
He asignado los datos que tenía en la propiedad "ConnecionString" del 'ADOCommand'.
Pero cuando ejecuto la aplicación, me da el error siguiente:

Class TADO Connection not found.

La propiedad "LoginPrompt" la he puesto a false para que no me pida clave.
Ya no he tocado ninguna propiedad más.

¿Debería hacer algo más o así ya debería funcionar?

Muchas gracias y un saludo.

[__marcsc]

La conexión te funciona en tiempo de diseño y te da error al ejecutar? O la creas por código?

[FNADALO]

Fijate en la propiedad Active debes ponersela a True,
yo al contrario que tú he trabajado siempre con Ado frente a
Access o Sql Server, muy buena elección Ado, Te felicito
ahora dejate darte unos consejos, pon un Datamodule donde
solo tendrás el AdoConnection y pasasela a todo formulario que
crees, no hace falta de este modo crearla como Public, ya lo
será, el segundo tema a plantearte es el siguiente trabajara tus aplicaciones
Cliente/Servidor, con muchos registros, supongamos que me respondes que si
entonces el proximo paso será un AdoQuery donde lo conectaras al AdoConnection y pondrás tus propios Selects, Agregaras un DataSouce
y asi ya tienes un Recodset Actualizable,,,, empieza por aqui Saludos.