ADO/Access und Textfile importieren

[Jens Schumann]

Hallo,
mit folgendem Source schaffe ich es eine Txt-Datei nach Access zu importieren.

Delphi-Quellcode:

unit Unit1; 
interface 
uses 
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, 
  ADODB25_TLB, StdCtrls; 
type 
  TForm1 = class(TForm) 
    Button1: TButton; 
    procedure Button1Click(Sender: TObject); 
  private 
    { Private-Deklarationen } 
  public 
    { Public-Deklarationen } 
  end; 
var 
  Form1: TForm1; 
implementation 
{$R *.DFM} 
resourcestring 
  ConnStr = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Delphi5\Test\ADO\Textfile import;Extended Properties=Text;Persist Security Info=False'; 
procedure TForm1.Button1Click(Sender: TObject); 
var 
  aConn : Connection; 
  aSQL  : String; 
  RA    : OleVariant; 
  Opt   : OleVariant; 
begin 
  aSQL:='SELECT * INTO [Test] IN  "D:\Delphi5\Test\ADO\Textfile import\db1.mdb" FROM xyz.txt'; 
  aConn:=CoConnection.Create; 
  Try 
    aConn.Open(ConnStr,'','',-1); 
    aConn.Execute(aSQL,RA,Opt); 
  Finally 
    aConn.Close; 
    aConn:=Nil; 
    end;   
end;

Meine Test Txt-Datei sieht so aus:


F1;F2;F3;F4
'dsfsadf';'234';'5tv';324,004
'gfh';'6564';'rt';345,45
'gfh';'4566';'rr';23,3
'vcn';'564';'rtz';43543,4
Beim Import werden jedoch die ' mitgenommen. Wie kann ich die ' unterdrücken?
Schließlich handelt es sich hier nur um Textbegrenzungszeichen.
Weglassen geht nicht, da die Txt-Datei mit der ich arbeiten muss nicht von mir stammt.