XProfan

English

Torben
Nissen

good tommorrow,
I engage me in the momentum with the Topic Datensicherheit. (DSGVO can greet

) i'd gladly Datenbankdateien code and I in the Forum on XProfan.de a middle-aged entry of March 2003 found. there becomes described, that the code with the Prospeed.dll quick weg would. gives it yet The dll? any middle-aged left functions not any more.

The following View source stammt of Frank (of XProfan.de):

Compile Mark Separation

Crypt (B,A,s,L)
Verschlüsselt data in one area with one discretionary long Password. with zweimaligem same appeal are The originalen data
again manufactured.
B : Long - Memory-Variable, in the The data stored are
A : Long - amount To verschlüsselnder Bytes
s : Long - Pointer on a String (or area), in the the Password stored is
L : Long - length the Passworts
Ergebniss: Long - 0
an superschnelle and relatively secure Datenverschlüsselung on XOR-Password-Basis.
example:
name$="Datenfile.dat"
x&=@FileSize(name$)
ReadFileFast(addr(name$),area#,0,x&)'File/data in Memory-Variable invite
passwort$="CryptMe"'Password is "CryptMe"
Crypt(area#,x&,addr(Password$),len(Password$))'Data from the area code
name$="Datenfile_crypted.dat"'here could The encrypted File again
WriteFileFast(addr(name$),area#,0,x&)'stored go...
Crypt(area#,x&,addr(Password$),len(Password$))'...or again into originalen status brought
'go