Große Texte mit Sonderzeichen in Datenbank speichern

[emsländer]

Moin,

Habe da noch ein großes Problem.
Das Datenfeld ist Text und dort möchte ich eine XML-Datei "RAW" reinschieben.
Leider klappt das nicht, weil dort auch Kommas, Sonderzeichen und Klammern etc. drin sind.

Wer hat da eine Idee?

Gruss

EL

[Bernhard Geyer]

Mit Paramtrisierten Abfragen sollte das kein Problem darstellen.
Besser aber statt text ntext nehmen um nicht auf Nicht-Westeuropäischen Systemen Probleme zu bekommen.

Alternativ gibts noch eine XML-Datentyp beim MS SQL Server. Hab damit aber noch nix gemacht.

[emsländer]

Moin,

acuh parametrisiert klappt es nicht:

Delphi-Quellcode:

function insert_antrag(code, user_code, nachricht, dossier, f_xml,timestamp, zuAkte, kunden_ip, fdd_ip, progversion : string) : string;

var stmp : string;
_query : TSQLQuery;


begin
  try
    _query := TSQLquery.Create(nil);
    _query.SQLConnection := fddservice.SQLConnFDD;
    with _query do begin
      insert;
      sql.text := 'insert into antraege(code,user_code,nachricht,dossier,xml,timestamp,zu_Akte,kundenip,fddip,progversion)  values'+ '(:_code,:_usercode,:_nachricht,:_dossier,:_xml,:_timestamp,:_zuAkte,:_kundenip,:_fddip,:_progversion)';

 

      ParamByName('_code').AsString := code;
      ParamByName('_usercode').AsString := code;
      ParamByName('_nachricht').AsString := nachricht;
      ParamByName('_dossier').AsString := dossier;
      ParamByName('_xml').AsWideString := f_xml;
      ParamByName('_timestamp').AsString := timestamp;
      ParamByName('_zuAkte').Asinteger := strtoint(zuAkte);
      ParamByName('_kundenip').AsString := kunden_ip;
      ParamByName('_fddip').AsString := fdd_ip;
      ParamByName('_progversion').AsString := progversion;
      ExecSQL;
      sleep(100);
      result:='';
    end;
  except
    result('Nix da - klappt nicht');
  end;
  freeandnil(_query);
end;

Es hakt wie es aussieht an "_nachricht" (dort sind z.B. %20,0D0A etc. drin) und an _xml .. (dort sind massig Sonderzeichen)
Die Table nachricht ist Typ ntext, xml ist Typ xml.

Des Weiteren: Wie kann ich da eine Fehlerabfrage realisieren?

Gruss

EL

[Bernhard Geyer]

Welcher Fehlermeldung kommt den?

[mkinzler]

Versuch mal

Delphi-Quellcode:

ParamByName('_nachricht').Value := nachricht;

[emsländer]

Zitat:

Zitat von Bernhard Geyer

Welcher Fehlermeldung kommt den?

Keine .... ist ein Dienst. Daher suche ich eine Möglichkeit, an dieser Stelle den Fehlertext zu "lesen".

Gruss

EL

[Bernhard Geyer]

Zitat:

Zitat von emsländer

Keine .... ist ein Dienst. Daher suche ich eine Möglichkeit, an dieser Stelle den Fehlertext zu "lesen".

Aber in eine Logdatei schreiben sollte kein Problem darstellen.
Ohne genaue Fehlermeldung können wir hier alle unsere Glaskugeln auspacken.

[emsländer]

Zitat:

Zitat von Bernhard Geyer

Zitat:

Zitat von emsländer

Keine .... ist ein Dienst. Daher suche ich eine Möglichkeit, an dieser Stelle den Fehlertext zu "lesen".

Aber in eine Logdatei schreiben sollte kein Problem darstellen.
Ohne genaue Fehlermeldung können wir hier alle unsere Glaskugeln auspacken.

Wie kann ich in diesem "Code-Konstrukt" die SQL-Fehlermeldungen auslesen?


Gruss

EL

[Bernhard Geyer]

Zitat:

Zitat von emsländer

Wie kann ich in diesem "Code-Konstrukt" die SQL-Fehlermeldungen auslesen?

hast du doch schon in einem anderen Thread gefragt.
Verwende doch die dort vorgestellten Lösungen.

[emsländer]

Zitat:

Zitat von Bernhard Geyer

Zitat:

Zitat von emsländer

Wie kann ich in diesem "Code-Konstrukt" die SQL-Fehlermeldungen auslesen?

hast du doch schon in einem anderen Thread gefragt.
Verwende doch die dort vorgestellten Lösungen.

Genau das funktioniert dort nicht, weil das nicht ADO ist

Gruss

EL