AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi Datenimport von zB .xls zu mysql

Datenimport von zB .xls zu mysql

Ein Thema von freddiiii · begonnen am 3. Sep 2007 · letzter Beitrag vom 4. Sep 2007
Antwort Antwort
freddiiii

Registriert seit: 22. Nov 2006
Ort: Bad Hersfeld
25 Beiträge
 
Delphi 2007 Enterprise
 
#1

Datenimport von zB .xls zu mysql

  Alt 3. Sep 2007, 13:54
Datenbank: MYSQL/MSSQL • Zugriff über: ADO
Hallo erstmal!
Ich würde (vorerst) gerne die Daten aus einer .xls Datei in eine MySQL-DB importieren.
Der Transfer von Excel zu MS-SQL geht ganz einfach automatisch über folgende zeile:

SELECT * INTO Tabelle FROM OPENROWSET('MSDASQL', 'Driver=Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb); DBQ=C:\text.xls, 'Select * from [$Tabelle]') Nun ist meine Frage ob es ähnlich einfache Umsetzungsmöglichkeiten auch für MySQL gibt oder ob ich wirklich diesen riesigen Umweg machen muss(Tabellen der xls auslesen, typen überprüfen, eine entsprechende Clontabelle auf der MySQL-DB anlegen, die xls in ne Textdatei und dann mit load infile)?

Bin über jede Antwort diesbezüglich glücklich

fred
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.353 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#2

Re: Datenimport von zB .xls zu mysql

  Alt 3. Sep 2007, 13:55
So wird es nur mit Excel/MSSQL gehen.
Markus Kinzler
  Mit Zitat antworten Zitat
freddiiii

Registriert seit: 22. Nov 2006
Ort: Bad Hersfeld
25 Beiträge
 
Delphi 2007 Enterprise
 
#3

Re: Datenimport von zB .xls zu mysql

  Alt 4. Sep 2007, 13:15
also nur ueber diesen enormen umweg? ;/
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.353 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#4

Re: Datenimport von zB .xls zu mysql

  Alt 4. Sep 2007, 13:30
Du kannst natürlich auch selber ein tool schreiben, bzw. ein Admintool für MySQL verwenden, welches das kann.
Markus Kinzler
  Mit Zitat antworten Zitat
Matt

Registriert seit: 13. Nov 2003
Ort: Hamburg
212 Beiträge
 
#5

Re: Datenimport von zB .xls zu mysql

  Alt 4. Sep 2007, 17:45
Hallo Fred,

ich hab das so gelöst, das ich mir die Daten aus der XLS in ein Dataset lade, das in einem Gríd anzeige und das anschließend durchlaufe und Zeile für Zeile in ein Memo schreibe.

Delphi-Quellcode:
  
col := ds_im.DataSet.FieldCount;

cs:='CREATE TABLE 'Tabelle1'(`ID` int(11) NOT NULL auto_increment,';

for z := 0 to col-1 do begin
  cs := cs + '`' + ds_im.DataSet.Fields[z].FieldName + '` varchar(255),';
  next;
end;

  cs := cs + ' PRIMARY KEY (`ID`)) TYPE=MyISAM;';

  textablage.Lines.Add(cs);
  textablage.Lines.Add('');

  ds_im.DataSet.First;
  ad := ds_im.DataSet.RecordCount;
  
  //pb = statusbar
  pb.Visible := true;
  pb.Max := ad;
  pb.Position := 0;

while not ds_im.DataSet.Eof do begin
  pb.StepBy(1);
  cs:= 'Insert into 'Tabelle1' Values(' + quotedstr(inttostr(pb.position)) + ',';
  for z := 0 to col-1 do begin
  cs := cs + quotedstr(ds_im.DataSet.Fields[z].AsString) + ',';
  next;
end;

cs:= leftstr(cs,strlen(pchar(cs))-1) + ');';

memo.Lines.Add(cs);
ds_im.DataSet.next;
Wenn fertig verbinde dich mit dem MySQL Server führe den Script aus (aus memo).

Gruß Matt
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:38 Uhr.
Powered by vBulletin® Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2019 by Daniel R. Wolf