Einzelnen Beitrag anzeigen

Real_Thunder

Registriert seit: 25. Apr 2006
197 Beiträge
 
#1

Sonderzeichen ( z.b. " ' ) auslesen und schreiben

  Alt 12. Mär 2007, 01:31
Datenbank: ACCESS • Version: 2002 SP1 • Zugriff über: ADO Ms Jet 4.0
Moin erstmal von mir

Ich stehe vor der Aufgabe mit hilfe eines Delphi Programmes mehrere Datenbanken / Tabellen auszulesen,
und diese zu einer zusammenzufügen..
ok das auslesen hat soweit geklappt...
Nur wenn ich eine Neue Tabelle schreiben will, und in einem
der ausgelesenen Felder ein Sonderzeichen vorkommt wie z.b. ' oder " bzw ( etc...
dann bekomme ich eine ole exeption....

Das mein einfügedtring falsch sei...
erscheint mir an sich auch loisch... das er mit den hochkommas etc nciht mehr ganz passt..
also nun meine frage... wie kann ich die sonderzeichen abändern um string, so das sie von der Accessdatenbank bzw ADO
angeommen werden.

Ich füge die daten volgenermaßen ein:
Delphi-Quellcode:
  memo1.Lines.Add('Erstelle Tabelle (Personen)');
  NeuDbCon.connected:=true;
  NeuDbQuery.SQL.Text:='CREATE TABLE pers59 ('+
                       'id varchar(8) , '+
                       'altid varchar(8) PRIMARY KEY,'+
                       'geschlecht varchar(1),'+
                       'anrede varchar(40),'+
                       'Nachname varchar(50), '+
                       'Vorname varchar(50), '+
                       'strasse varchar(90), '+
                       'plz varchar(10), '+
                       'ort varchar(55), '+
                       'tel varchar(20), '+
                       'tel2 varchar(20), '+
                       'fax varchar(20), '+
                       'email varchar(60), '+
                       'bemerkung text, '+
                       'erstellt varchar(10), '+
                       'modify varchar(10), '+
                       'sterntaler bit, '+
                       'patenschaft bit, '+
                       'kastration bit, '+
                       'kostrin bit'+
                       ')';
   NeuDbQuery.ExecSQL;
währe nett wenn ich eine antwort bekommen könnten.

MfG
Real Thunder
  Mit Zitat antworten Zitat