Ich würde das mit Hilfe von EncodeBase64 als String in der Datenbank
speichern.
Ich benutze EncodeBase64 bevor ich z.B einen PrinterSetup String in die
Datenbank schreibe:
EncodeBase64(mLabelprintersetup, 0)
Und dann lese ich es aus wieder aus einem Recordset ("rs") zurück, und
mache es mit DecodeBase64 wieder lesbar
mLabelPrinterSetup=DecodeBase64(rs.Field("setting").StringValue)
Das kannst du mit Deinem verschlüsselten String analog so machen.
Achtung: Zum Abspeichern erst verschlüsseln und dann EncodeBase64, und
beim Rücklesen genau umgekehrt: erst DecodeBase64 und dann Entschlüsseln.
Gruss, Oliver
=======
On 07.02.13 21:04, "Mike Ott" <[email protected]> wrote:
Guten Abend
Ich weiss nicht, ob mein erstes Mail angekommen ist, darum schreibe ich
nochmals.
Ich muss einen verschlüsselten Wert (ToringoCrypto Plugin) in einer
Datenbank speichern:
dim MBToEncrypt As MemoryBlock
MBToEncrypt = NewMemoryBlock(TextLenthInByte)
MBToEncrypt.StringValue(0,TextLenthInByte) = TextToEncrypt
// encrypt
dim MBForCipher As MemoryBlock
Dim ResultCode As Integer
ResultCode = ToringoDES.Encrypt(MBToEncrypt,MBForCipher,passwort)
....
Der verschlüsselte Wert in MBForCipher sieht abenteuerlich aus mit vielen
Hieroglyphen. Nun weiss ich nicht, wie man dieses verschlüsselte
Zeichenwirrwar in einer Datenbank speichern kann. Wäre das nötig als
binary?
Ich wäre froh um einen Code-Tipp, wie man einen Stringwert binär speichern
kann.
Besten Dank und Gruss
Mike Ott
