XProfan

Español

Torben
Nissen

Bueno Morgen,
Yo beschäftige mich en el Moment con el Thema Datensicherheit. (DSGVO lässt grüßen

) Yo sería gerne Datenbankdateien verschlüsseln y habe en el Foro en XProfan.de una alten Eintrag vom März 2003 gefunden. Dort se beschrieben, dass el Verschlüsseln con el Prospeed.dll rápidamente ir sería. Gibt lo todavía el dll? Alle alten Links trabajo no mehr.

Der folgende Ver código fuente stammt de Franco (de XProfan.de):

Kompilieren Marca Separación

Crypt (B,A,S,L)
Verschlüsselt Daten en una Zona con una cualquier langen Contraseña. En zweimaligem gleichem Aufruf son el originalen Daten
otra vez producido.
B : Largo - Bereichsvariable, en el el Daten gespeichert son
A : Largo - Anzahl a verschlüsselnder Bytes
S : Largo - Pointer en una String (oder Zona), en el el Contraseña gespeichert es
L : Largo - Longitud des Passworts
Ergebniss: Largo - 0
Un superschnelle y relativ sichere Datenverschlüsselung en XOR-Contraseña-Base.
Ejemplo:
name$="Datenfile.dat"
x&=@FileSize(name$)
ReadFileFast(addr(name$),bereich#,0,x&)'Expediente/Daten en Bereichsvariable einladen
passwort$="CryptMe"'Contraseña es "CryptMe"
Crypt(bereich#,x&,addr(Contraseña$),len(Contraseña$))'Daten de el Zona verschlüsseln
name$="Datenfile_crypted.dat"'Hier podría el verschlüsselte Expediente otra vez
WriteFileFast(addr(name$),bereich#,0,x&)'gespeichert voluntad...
Crypt(bereich#,x&,addr(Contraseña$),len(Contraseña$))'...oder otra vez en el originalen Zustand gebracht
'voluntad