beisse mir gerade die Zähne an dieser (einfachen) Problematik aus:
ich möchte gern alle Namensfelder in einer Adressdatenbank verschlüsseln.
Das Iterieren durch die DB ist kein Problem, das Ersetzen des Klarnamens mit
der verschlüsselten Version schon.
Ist dieser Ansatz hier überhaupt der richtige:
Code: Alles auswählen
Passwort := 'BlaBla';
SQLQuery1.SQL.Text := 'select name from adressen';
SQLQuery1.Open();
SQLQuery1.refresh;
while not sqlQuery1.EOF do
begin
Temp := encrypt(Passwort, trim(sqlquery1.FieldByName('name').AsString));
Kundennummer := Sqlquery1.fieldbyname(kdnr).asstring;
//
// Dies Ansatz scheint falsch zu sein: SQLQuery1.SQL.Text := 'Update adressen set name = ' + Temp + 'where num='+Kdnummer;
//
sqlquery1.Next;
end;
Bin für jeden Hinweis dankbar.
BB