Buscar por:

Importar para o banco de dados atraves do excel

Código

VOCE PODERA IMPORTAR DADOS DO EXCEL PARA SEU BANCO DE DADOS.

SUPONHA QUE VC RECEBA UM EXTRATO BANCÁRIO EM TEXTO PELA INTERNET. TRABALHE O EXTRATO E CONVERTA PARA ARQUIVO EXCEL.

AGORA VOCE QUER TRANSFERIR OS DADOS DO EXCEL PARA O BANCO DE DADOS DE SEU PROGRAMA.

O PRIMEIRO PASSO PARA NÃO TER PROBLEMA DE CONFLITO COM SEU BANCO DE DADOS É O EXCEL ESTAR PARAMETRADO COM A TABELA DE SEU BANCO DE DADOS. PARA TANTO ABRA SUA TABELA ONDE VC VAI IMPORTAR OS DADOS NO EXCEL USANDO ABRIR ARQUIVOS DBASENO EXCEL. OBS. SUA TABELA DEVERÁ ESTAR COM A EXTENSÃO dbf.(DBASE).

NA PASTA DO EXCEL ONDE VC TRABALHOU OS DADOS DE TEXTO COPIE E COLE NAS RESPECTIVAS COLUNAS DO BANCO DE DADOS QUE VOCE ABRIU NO EXCEL(extensão dbf). FEITO ISSO SALVE O ARQUIVO NO EXCEL EM DBASE.

AGORA NO FORMULARIO DO PROGRAMA CRIAMOS UM BUTTON PARA FAZER A EXPORTAÇÃO, COM O SEGUINTE COMANDO.

procedure TFORMINSERIR.BitBtn1Click(Sender: TObject);

begin

     TRY

     WITH ATUALIZAR DO

     BEGIN

          CLOSE;

          sql.Clear;

          sql.Add('INSERT INTO "C:conciBANCOtabela.dbf"');

          sql.Add('SELECT *');

          sql.Add(' FROM "transr.dbf"');

          Prepare;

          ExecSQL;

     END

     FINALLY

     Application.MessageBox('IMPORTAÇÃO CONCLUIDA COM SUCESSO!', 'MENSAGEM', MB_ICONINFORMATION);

   END;

SE VOCE EXECUTOU OS PASSOS CORRETAMENTE SEUS DADOS DO EXCEL ESTARÃO EM SUA TABELA DO BANCO DE DADOS.

ESTANDO NA EXTENSÃO .dbf VOCE PODERA USAR O MESMO MÉTODO, ATRAVÉS DE SQL PARAR TRANSFORMAR EM OUTRAS  EXTENSÕES