Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Tablas planas
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #8  
Antiguo 04-05-2005
Toñico Toñico is offline
Miembro
 
Registrado: ene 2005
Posts: 56
Poder: 22
Toñico Va por buen camino
Hola hgiacobone,

para lanzar la instrucción SQL uso un componente TADOCommand. La rutina que uso es la siguiente:

Código:
 
Código Delphi [-]
 
 
Procedure ...
var
cSQL: String;
... Begin
..... Try
MyAdoCommand.Connection := MyAdoConnection; MyAdoConnection.BeginTrans; cSQL := 'INSERT INTO {Tabla} ' + 'SELECT * FROM {TablaDBF} ' + 'IN ' + #39 + {directorio de la tablaDBF} + #39 + ' ' + #39 + 'dBASE IV;' + #39; MyAdoCommand.CommandText := cSQL; MyAdoCommand.Execute; MyAdoConnection.CommitTrans;
Except
MyAdoConnection.RollbackTrans;
end; ....
end;
La tabla dentro de Access tiene que existir previamente y tener la misma estructura.

Un saludo.
Responder Con Cita
 



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 17:39:05.


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