Giriş / Kayıt Ol Kod Problemi

[Kral__]

Giriş Kod:

[code]nKul = Input.GetText("kul");
nSif = Input.GetText("sif");
nNick = INIFile.GetSectionNames("AutoPlay\\Docs\\db.ini");
if nKul == nNick then
if nSif == "giriş" then
Label.SetText("nick", nKul);
INIFile.SetValue("AutoPlay\\Docs\\online.ini", nKul, "", "");
else
Dialog.Message("Uyarı", "Yanlış karakter girdiniz lütfen tekrar deneyiniz.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end
else
Dialog.Message("Uyarı", "Yanlış karakter girdiniz lütfen tekrar deneyiniz.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end
Input.SetText("kul", "");
Input.SetText("sif", "");[/code]

Kayıt Ol Kod:

[code]nKul = Input.GetText("kul");
nSif = Input.GetText("sif");
nNick = INIFile.GetSectionNames("AutoPlay\\Docs\\db.ini");
if nKul == "" then
Dialog.Message("Uyarı", "Lütfen Gerekli Alanları Doldurunuz.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
else
if nSif == "giriş" then
if nKul == nNick then
Dialog.Message("Uyarı", "Zaten böyle bir nick kayıtlı.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
else
INIFile.SetValue("AutoPlay\\Docs\\db.ini", nKul, "", "")
Dialog.Message("", "Kayıtınız tamamlanmıştır.Şimdi giriş yapabilirsiniz.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
Input.SetText("kul", "");
Input.SetText("sif", "");
end
else
Dialog.Message("Uyarı", "Yanlış Şifre Girdiniz.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end
end[/code]
Arkadaşlar size zahmet olmazsa yanlışlıkları düzeltirmisiniz.Sorun yanlış karakter girmeyip yanlış karakter girdiniz hatası veriyo :S.Mesela db.inide Kral sectionu olmasına rağmen "Kul" inputuna Kral yazıp giriş desem yanlış karakter girdiniz diyo :S.Düzeltebilirseniz minnettar kalırım.

[pilgetir]

for döngüsü ile tek tek kontrol ettirmen gerekiyor.Bunu bir dene

[quote]nKul = Input.GetText("kul");
nSif = Input.GetText("sif");
[b]nNick = INIFile.GetSectionNames("AutoPlay\\Docs\\db.ini");
for i in pairs(nNick) do
sKadi = INIFile.GetValue("AutoPlay\\Docs\\db.ini", nNick[i], "")
if nKul == sKadi[1] then[/b]
if nSif == "giriş" then
Label.SetText("nick", nKul);
INIFile.SetValue("AutoPlay\\Docs\\online.ini", nKul, "", "");
else
Dialog.Message("Uyarı", "Yanlış karakter girdiniz lütfen tekrar deneyiniz.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end
else
Dialog.Message("Uyarı", "Yanlış karakter girdiniz lütfen tekrar deneyiniz.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end
Input.SetText("kul", "");
Input.SetText("sif", "");

[/quote]

Edited June 30, 2012 by pilgetir