Benzersiz Anahtar

[Abdullah 37]

Arkadaşlar Parola Tasarımı v3 adlı apz dosyasında Input_Password ve Giriş butonunun script bölümünde benzersiz anahtar diye bir kodlama var.Bu benzersiz anahtar nedir ve nasıl kullanılır?

Input_Password Script On Key Bölümü

if e_Key == 13 then
anahtar = "3j2*f932hf^'R'!%$#£½$#£" -- benzersiz anahtar

-- tanımlamalar
kullanici = Input.GetText("Input_Username");
parola = Input.GetText("Input_Password");

sKullanici = INIFile.GetValue("AutoPlay\\Docs\\data.ini", "sistem", "user")
sParola = INIFile.GetValue("AutoPlay\\Docs\\data.ini", "sistem", "pass")

cKullanici = Crypto.BlowfishDecryptString(sKullanici, anahtar)
cParola = Crypto.BlowfishDecryptString(sParola, anahtar)

if cKullanici == kullanici and cParola == parola then
Page.Jump("Page2")
else
Dialog.Message("Hata", "Hatalı kullanıcı adı veya şifre")
end
end

Giriş Butonu Script On Click Bölümü

anahtar = "3j2*f932hf^'R'!%$#£½$#£" -- benzersiz anahtar

-- tanımlamalar
kullanici = Input.GetText("Input_Username");
parola = Input.GetText("Input_Password");

sKullanici = INIFile.GetValue("AutoPlay\\Docs\\data.ini", "sistem", "user")
sParola = INIFile.GetValue("AutoPlay\\Docs\\data.ini", "sistem", "pass")

cKullanici = Crypto.BlowfishDecryptString(sKullanici, anahtar)
cParola = Crypto.BlowfishDecryptString(sParola, anahtar)

if cKullanici == kullanici and cParola == parola then
Page.Jump("Page2")
else
Dialog.Message("Hata", "Hatalı kullanıcı adı veya şifre")
end

[KintaRo]

benzersiz anahtar benim tanımlamam mantık şu şekilde; öncelikle bir benzersiz anahtar oluşturulur. örneğin:

gizlikey = "ıhy308h932r"

daha sonra bir metni Crypto.BlowfishEncryptString ile şifreleme yaparken bu anahtar kullanılır. Daha şifrelenmiş metni çözmek için tekrar bu anahtar gerekir. Yani o anahtar bilinmeden tekrar çözme (Decrypt) işlemi yapılamaz.

[Abdullah 37]

Hocam parola tasarımı projesinde şu anki kullanıcı gözüküyor.Peki şu anki şifreyi nasıl gösterebiliriz.

[KintaRo]

şifreyi projenin bir yerinde göstermek için:

sParola = INIFile.GetValue("AutoPlay\\Docs\\data.ini", "sistem", "pass")

cParola = Crypto.BlowfishDecryptString(sParola, anahtar)

kodu ile hafizaya çözülmüş halini alabilirsin daha sonra bunu bir labelda örneğin;

Label.SetText("Label1", cParola)

Şeklinde gösterebilirsin.