Einzelnen Beitrag anzeigen

apm

Registriert seit: 22. Nov 2010
28 Beiträge
 
#3

AW: MySQL verschlüsseln

  Alt 28. Mär 2012, 10:18
Darüber gestoßen bin ich gestern glaube ich. Aber ich habe es noch nicht hinbekommen die Sachen wieder richtig auszugeben

Delphi-Quellcode:
  Query1.Close;
  Query1.SQL.Text := 'INSERT INTO test (NeuesFeld) Values( AES_ENCRYPT(''speicher_test'', ''passwd'') )';
  Query1.ExecSQL;

  Query1.Close;
  Query1.SQL.Text := 'SELECT AES_DECRYPT(''NeuesFeld'', ''passwd'') FROM test';
  Query1.Open; Query1.last;

  Memo1.Text := Query1.FieldByName('NeuesFeld').AsString;
Bei der Memo-Zuweisung kennt er das Feld nicht. Also müsste ja die Select-Anweisung falsch sein ...
  Mit Zitat antworten Zitat