Exportação ADO gt;gt;gt; Excel

Delphi

04/04/2004

Depois de pesquisar por vários fontes sobre esta matéria cheguei ao código abaixo:

[b:ba683e0fd4]procedure TForm1.Button4Click(Sender: TObject);
Var
FileName: string;
SheetName: string;
IsamFormat: string;
begin
FileName:=´c:\teste.xls´;
SheetName:=´Plan1´;
IsamFormat:=´Excel 8.0´;

FADOCommand.CommandText := ´Select * INTO ´ + ´[´ +
SheetName + ´]´ + ´ IN ´ + ´´´ + FileName + ´´´ + ´[´ + IsamFormat +
´;]´ + ´ From ´ + ´turma´;


FADOCommand.Execute;
end;[/b:ba683e0fd4]

No entanto recebo a seguinte except:

´Incorect sintax near keyword IN´


Alguem sabe me dizer oque esta errado, ou outra forma????


Gustavo_sm

Gustavo_sm

Curtidas 0
POSTAR