Daten aus Excel auslesen und in MySQL einfügen

[jensw_2000]

Korrigierter Beitrag ...

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject); 
begin 
if box1.Text = 'Bitte auswählen' then 
begin 
Showmessage('Es muss eine Tabelle ausgewählt werden!') 
end 
else 
begin 
AdoTable1.Connection := AdoConnection1; 
// Der Name enthält ein $. Damit der Tabellenname trotz Sonderzeichnen 
// akzeptiert werden kann, muss er in eckigen Klammern stehen
AdoTable1.TableName := '['+Box1.items[Box1.itemindex]+']'; // <<<<
AdoTable1.Active := true; 
end; 
end;

Bei einer TAdoTable kann man das auch irgendwie anders hinbiegen.
Leider kann ich da grade nicht reinschauen. (denke das war TableDirect := true ...)