excel e ADO
28/12/2005
0
ou pode ser usando odbc também... pra que serve esses drivers de excel dentre os drivers odbc??
obrigadaum!!!
Vitor Rubio
Posts
29/12/2005
Bon Jovi
procedure TDataModule1.ADOConnection1BeforeConnect(Sender: TObject); begin ADOConnection1.ConnectionString := ´Provider=Microsoft.Jet.OLEDB.4.0;´ + ´Data Source=C:\Pasta1.xls;´ + ´Extended Properties=Excel 8.0;´ + ´Persist Security Info=False´; end; procedure TDataModule1.FormCreate(Sender: TObject); begin ADODataSet1.Close; ADODataSet1.CommandText := ´select coluna1, coluna2 from [Plan1$]´; ADODataSet1.Open; end; procedure TDataModule1.FormDestroy(Sender: TObject); begin ADODataSet1.Close; ADOConnection1.Connected := False; end;
29/12/2005
Bon Jovi
29/12/2005
Vitor Rubio
Valeu!
Clique aqui para fazer login e interagir na Comunidade :)