Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#4

Re: INSERT INTO in Tabelle mit Beziehungen über SQL?

  Alt 14. Jul 2005, 18:18
Zitat von unitedlb:
Delphi-Quellcode:
 sqlfield := 'Act-Journal-ID,SN,Company,Name,Adresse,PLZ,Telefon,Bemerkung';

                sqldata := cases[r].journalid+','+
                           quotedstr(cases[r].sn)+','+
                           quotedstr(cases[r].company)+','+
                           quotedstr(cases[r].name)+','+
                           quotedstr(cases[r].adresse)+','+
                           quotedstr(cases[r].plz)+','+
                           quotedstr(cases[r].ort)+','+
                           quotedstr(cases[r].telefon)+','+
                           quotedstr(cases[r].bemerkung);

                with form1.ADOQuery1.SQL do begin
                        Clear;
                        add('INSERT INTO Aufträge ('+sqlfield+') VALUES('+sqldata+')');
                        end;
                form1.ADOQuery1.ExecSQL;
1.) Sonderzeichen in Tabellenname (das ä), nicht gut, ein Drama, wenn du auf ne andere DB portieren möchtest/musst
2.) Sonderzeichen im Feldnamen "Act-Journal-ID", die Minuszeichen könnten als Subtraktion interpretiert werden -> Feld umbenennen
3.) "Name" ist ein reserviertes Wort -> Feld umbenennen.
4.) du hast immer noch nicht das produzierte SQL-Statement gezeigt.
das geht ganz einfach:
Delphi-Quellcode:
   with form1.ADOQuery1.SQL do begin
     Clear;
     add('INSERT INTO Aufträge ('+sqlfield+') VALUES('+sqldata+')');
     SaveToFile('C:\insert.txt'); // <======
   end;
Und dann schau dir mal die Datei C:\insert.txt an. Und poste dann den Inhalt, falls es nach Änderung von
1.) bis 3.) immer noch Probleme gibt.
Andreas
  Mit Zitat antworten Zitat