Load de um Arquivo XLS
Ola Pessoal,
Estou com a seguinte dúvida, estou tentando carregar um arquivo xls.
Preciso carrega-lo e depois inserir os dados numa tabela...alguem sabe como fazer isso??
Aaahh....a tabela no BD e no Excel, estão na mesma estrutura!
Desde já agradeço.
Eduardo Buffara
Estou com a seguinte dúvida, estou tentando carregar um arquivo xls.
Preciso carrega-lo e depois inserir os dados numa tabela...alguem sabe como fazer isso??
Aaahh....a tabela no BD e no Excel, estão na mesma estrutura!
Desde já agradeço.
Eduardo Buffara
Eduardobuffara
Curtidas 0
Respostas
Marcelo_mileris
05/05/2006
Uma vez eu precisei fazer isso e fiz desta forma:
Criei uma nova fonte de dados (Painel de Controle > Ferramentas Administrativas > Fontes de Dados (ODBC)) com o tipo Driver do Microsoft Excel.
Informei o Nome e a Pasta de Trabalho.
Agora no Delphi, usando o ADO, é só criar uma conexao utilizando Microsoft OLE DB Provider for ODBC Drivers e informar o Driver criado e a base de dados e pronto, vc terá acesso a tabela excel podendo aterá-la a vontade
Espero ter ajudado
Criei uma nova fonte de dados (Painel de Controle > Ferramentas Administrativas > Fontes de Dados (ODBC)) com o tipo Driver do Microsoft Excel.
Informei o Nome e a Pasta de Trabalho.
Agora no Delphi, usando o ADO, é só criar uma conexao utilizando Microsoft OLE DB Provider for ODBC Drivers e informar o Driver criado e a base de dados e pronto, vc terá acesso a tabela excel podendo aterá-la a vontade
Espero ter ajudado
GOSTEI 0
Joaoshi
05/05/2006
Ilustrando:
AdoTable.Close;
AdoTable.ConnectionString :=
´Provider=Microsoft.Jet.OLEDB.4.0;´ +
´Data Source=NomeDoSeuArquivo.XLS + ´;´ +
´Extended Properties=Excel 8.0;´ +
´Persist Security Info=False´;
AdoTable.Open;
Espero ter ajudado.
AdoTable.Close;
AdoTable.ConnectionString :=
´Provider=Microsoft.Jet.OLEDB.4.0;´ +
´Data Source=NomeDoSeuArquivo.XLS + ´;´ +
´Extended Properties=Excel 8.0;´ +
´Persist Security Info=False´;
AdoTable.Open;
Espero ter ajudado.
GOSTEI 0
Eduardobuffara
05/05/2006
Mais como q eu faço referencia a tabela??
GOSTEI 0
Joaoshi
05/05/2006
Colega, penso que apos utilizar a tabela do Excel você faria um While not Eof e tomaria as providencias para a tabela do banco de dados.
Espero ter ajudado.
Espero ter ajudado.
GOSTEI 0
Eduardobuffara
05/05/2006
Desculpe...
não tinha reparado, que as tabelas eram carregadas automaticamente :D
Obrigado
deu certo
não tinha reparado, que as tabelas eram carregadas automaticamente :D
Obrigado
deu certo
GOSTEI 0