Delphi Problem mit Excelexport

Thema durchsuchen

Ansicht

Themen-Optionen

Problem mit Excelexport

Ein Thema von Borschti · begonnen am 18. Jul 2008 · letzter Beitrag vom 24. Jul 2008

Vorheriger Beitrag

Nächster Beitrag

ralfschwalbe

Registriert seit: 19. Jul 2007
Ort: Lichtenstein/Sachsen
133 Beiträge

Delphi XE3 Professional

Re: Problem mit Excelexport

18. Jul 2008, 14:25

Hi,

wenn's hilft: Jet kann von naturaus EXCEL Dateien schreiben:

zusammenfalten · markieren

Delphi-Quellcode:

			adoconn := TADOConnection.Create(Application);

try

  adoconn.ConnectionString := ('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + temp);

  adoconn.CursorLocation := clUseClient;

  adoconn.LoginPrompt := false;

  adoconn.Connected := true;

  adoconn.Execute('SELECT * INTO TestTabelle IN "' + FileName + '" "Excel 8.0; HDR=Yes;" FROM ' + TableName, 1);

  adoconn.Connected := false;

finally

  adoconn.Free;

end;