Einzelnen Beitrag anzeigen

Benutzerbild von Gollum
Gollum

Registriert seit: 14. Jan 2003
Ort: Boxberg
456 Beiträge
 
Delphi 10.1 Berlin Professional
 
#2

AW: csv Datei in mysql DB einlesen

  Alt 18. Okt 2012, 12:19
Hallo,

am besten mit einem ADOCommand- oder wenn Du du MyDAC besitzt mit einem TMyCommand-Objekt:

Delphi-Quellcode:
const
  qryImportCSV=
    'LOAD DATA LOCAL INFILE ''%s'' '+
    'INTO TABLE %s '+
    'FIELDS TERMINATED BY '';'' '+
    'IGNORE 1 LINES'; // falls 1. Zeile Spaltenüberschriften enthält


...
var DateiName:String;
...
  DateiName:=StringReplace('X:\EinVerzeichnis\Meinedatei.csv', '\', '/', [rfReplaceAll]);
// MyDAC
  MyCommand.SQL.Text:=Format(qryImportCSV, [DateiName, 'MeineTabelle']);
  MyCommand.Execute();

// oder mit ADO
  MyCommand.CommandText:=Format(qryImportCSV, [DateiName, 'MeineTabelle']);
  MyCommand.Execute();
...
  Mit Zitat antworten Zitat