Hallo,
ich erzeuge aus einer
Paradox Tabelle eine ganz einfache
CSV Datei mittels:
Delphi-Quellcode:
Var Zeile:String;
StringList1 : TStringList;
i : integer;
begin
Zeile:='';
StringList1 := TStringList.Create;
Try
Table1.First;
// Feldnamen schreiben
For i:=0 to Table1.FieldCount-1 do
Zeile:=Zeile+Table1.Fields[i].FieldName+';';
StringList1.Add(Zeile);
// Datensätze schreiben
While NOT Table1.Eof do Begin
Zeile:='';
For i:=0 to Table1.Fields.Count-1 do
Zeile:=Zeile+Table1.Fields[i].AsString+';';
StringList1.Add(Zeile);
Table1.Next;
End;
StringList1.SaveToFile('c:\export\xliste.CSV');
Finally
StringList1.Free;
End;
end;
Diese Datei möchte ich dann mittels der JvCsvDataSet Komponente in einem anderen Programm, das auf einen MS
SQL Server zugreift, einlesen.
Beim Einlesen bekomme ich die Fehlermeldung:
Zitat:
Unexpected error parsing
CSV Field Definitions
Öffne ich aber die
CSV Datei in Excel und speichere diese dort ohne Änderung wieder ab, liest die Komponente diese Datei einwandfrei ein. Excel muss also irgendeine Information hinzufügen.
Was mache ich also beim Erzeugen der Datei falsch bzw. was fehlt der Datei für eine Information????