Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 16-05-2003
FRANKER FRANKER is offline
Miembro
 
Registrado: may 2003
Ubicación: Elche
Posts: 71
Poder: 24
FRANKER Va por buen camino
Question

¿Por qué no importas directamente desde la hoja de Excel?
De paso que importas los datos desde excel, puedes pasarlos directamente a interbase. La Forma de hacerlo seria mas o menos esta:

Código:
Var
  Actual : Integer;
begin
...
Articulos.QInsert.SQL.Clear;
Articulos.QInsert.SQL.('insert into TABLA(FLD1,FLD2,FLD3) values(:CAMPO1,:CAMPO2,:CAMPO3');
For Actual := 1 To 30 Do
Begin
with Articulos.QInsert do
    begin
      Params.ByName('CAMPO1').value:=Excel.Cells[Actual,1].Value;
      Params.ByName('CAMPO2').value:=Excel.Cells[Actual,2].Value;
      Params.ByName('CAMPO3').value:=Excel.Cells[Actual,3].Value;
      ExecQuery;
    end; 
end;
...
La Forma de Hacerlo desde El StrinGrid seria muy similar.

Saludos y Suerte!!!
__________________
.:.::FRANKER::.:.
Responder Con Cita
 


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 19:21:52.


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