@Sir Rufo: die
DB liegt auf meiner Homepage.
@Gollum:
Hab das mal so probiert und mir den
mySQL ODBC Treiber aus'm Netz besorgt.
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
StrConnection='
Driver={MySQL ODBC 3.51 Driver};Server=%s;Database=%s;'+
'
User=%s; Password=%s;Option=3;';
var
Command: TADOCommand;
begin
DateiName := '
/DB-Export.csv';
Command := TADOCommand.Create(
nil);
with Command
do
try
with Online^
do
ConnectionString := Format(StrConnection,[Servername,Datenbank,Username,Passwort]);
CommandText := Format(qryImportCSV, [DateiName, '
Person']);
Execute;
finally
Free;
end;
Anscheinend lässt der mich der Server aber nicht rein, da ich die Fehlermeldung "[
MySQL][
ODBC 3.51 Driver] Can't connect to
MySQL server on 'rdbms.strato.de' (10061)" bekomme.
Was muss ich da denn noch zusätzlich festlegen!?