PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV 2024 → [WM20/W20] CryptStandard/UncryptStandard
[WM20/W20] CryptStandard/UncryptStandard
Started by ARV, Mar., 22 2018 9:03 PM - No answer
Registered member
498 messages
Popularité : +8 (8 votes)
Posted on March, 22 2018 - 9:03 PM
Hi

I have some issues using this function on my version of windev it doesn't get me the string I Encrypt heres my code

//Encrypt in Android
pass is UNICODE string = "Password"
bufKEY is Buffer = HashString(HA_MD5_128,pass)
sMessa is UNICODE string = EDT_Text
bufEncrypt is Buffer = CryptStandard(sMessa,bufKEY,cryptAES128)

TableDB.Pa = bufEncrypt
HAdd(TableDB)
Info("Done")


//Uncrypt on PC
HReadFirst(TableDB,ID)
pass is UNICODE string = "Password"
bufkey is Buffer= HashString(HA_MD5_128,pass)
bufSResult2 is Buffer = UncryptStandard(TablaErrores.Pa,BufKey,cryptAES128)
EDT_Uncrypt= bufSResult2

IF bufSResult2 = "" THEN
Info(ErrorInfo(errFullDetails))
END



For some reason it only uncrypt the first letter of my message the rest it's lost.
Next time I will try with Ansi but I don't think is that the problem.
Any Ideas my fellows developers?

Best Regards.