Einzelnen Beitrag anzeigen

waldforest

Registriert seit: 8. Mai 2005
366 Beiträge
 
Delphi XE3 Enterprise
 
#1

Feld durch verschlüsselten Text ersetzen

  Alt 9. Feb 2011, 20:19
Datenbank: Firebird • Version: 2.1 • Zugriff über: Zeos
Hallo,
ich würde gerne ein Feld mit sich selbst nach Entschlüsselung in einer Firebirdtabelle ersetzen.
Hierzu dient die eigene Funktion Crypt, welche sich als Parameter zwei Textfelder bedient.

Ich habe dies derzeit wie folgt gelöst, dauert aber bei einer großen Datenbank endlos

Code:
  with Tabelle do
  begin
    for i := 1 To RecordCount do
    begin
      Edit ;
      FieldByName('name').Value := Crypt(name, "WEDRFXEFCRTT"));
     Next;
    end;
  end;
wie könnte ich dies über den SQL Update lösen ?

Update Tabelle set name = Replace( name, name Crypt(name, "WEDRFXEFCRTT"))

leider gelingt es mir nicht dei Funktion einzubinden. Hat hier jemand Erfahrung ?
mfg wf
  Mit Zitat antworten Zitat