طلب فنكشنات

[I_Mr.[T]he[P]rInCe]

وانت تقول ويش فايده ذي getPlayerAccount

ذي لما اللاعب يضغط علي الشيك بوكس يسوي ترايقر للسيرفر ويسوي الكود

ماسويت ترايقر ي اخ عناد لآزم تتعلم الترايقر وبعدين سو

getPlayerAccount اها لازم اسوي تريقر

ThePrInCe أتمنى تصلح الكود يا

لأني أحتاج مساعدتك كثير

أخي انا كتبت ايش الكود اللي يستخدمه بس ما كتبت باقي الاكواد

[I_Mr.[T]he[P]rInCe]

  
--هنا مثلا كلمه تدخلها عشان تحفظ الحساب 
cmd : addCommandHandler("name") -- نضيف كلمه 
function ( username,password) --نسوي فنكشن  
setAccountData(elemnt,"Name",getPlayerSerial(elemnt))--نسوي أكونت داتا بسريال اللاعب  
setAccountData(elemnt,"Name",username)--نسوي أكونت داتا باليوزر نيم 
setAccountData ( elemnt, " Name ", password)--بالباسورد 
  
  
--هنا تسجيل الدخول 
Event : onPlayerJoin --أول ما اللاعب يدخل 
Lob : getAccounts ()-- نسوي إحضار لكل الحسابات 
getAccountData == getPlayerSerial -- إذا كانت الداتا = سريال اللاعب 
getAccountData  == username --نحضر الداتا حقت اليوزر نيم بالحساب 
getAccountData == password --نحضر الداتا حقت الباسورد 
  
logIn () --نسجل الدخول 
  
  

[3NAD]

respect .

صرآحة /

انسان طيب ي عناد وربي

كود مثل هذا ماي يعطيه الا فاعلين الخير

تراهـ حصري لسيرفرك :]

بالتوفيق

كلام جميل و يسعدني الله يسعدك , اشكرك عليه

  
--هنا مثلا كلمه تدخلها عشان تحفظ الحساب 
cmd : addCommandHandler("name") -- نضيف كلمه 
function ( username,password) --نسوي فنكشن  
setAccountData(elemnt,"Name",getPlayerSerial(elemnt))--نسوي أكونت داتا بسريال اللاعب  
setAccountData(elemnt,"Name",username)--نسوي أكونت داتا باليوزر نيم 
setAccountData ( elemnt, " Name ", password)--بالباسورد 
  
  
--هنا تسجيل الدخول 
Event : onPlayerJoin --أول ما اللاعب يدخل 
Lob : getAccounts ()-- نسوي إحضار لكل الحسابات 
getAccountData == getPlayerSerial -- إذا كانت الداتا = سريال اللاعب 
getAccountData  == username --نحضر الداتا حقت اليوزر نيم بالحساب 
getAccountData == password --نحضر الداتا حقت الباسورد 
  
logIn () --نسجل الدخول 
  
  

ما استفدت من الشرح حقك

أتمنى ان تطبقه على طلب صاحب الموضوع كي نستفيد جميعاً من خبراتك

[</Mr.Tn6eL>]

addEvent ( "onlogin", true ) 
addEventHandler ( "onlogin", root, 
    function ( user, pass ) 
        local account = getAccount ( user, pass ) 
        if account then 
            if logIn ( source, account, pass ) then 
                triggerClientEvent ( source, "hide", resourceRoot ) 
                setAccountData ( account, "autoLogin", toJSON({user, pass})) 
            end 
        end 
    end 
) 
  
addEventHandler ( "onPlayerJoin", root, 
    function ( ) 
        for k,v in ipairs(getAccountsBySerial(getPlayerSerial(source))) 
            local data = getAccountData (v, "autoLogin" ) 
            if data then 
                local json = fromJSON(data) 
                local account = getAccount (getAccountName(v), json[2]) 
                if account then 
                    logIn ( source, account, json[2]) 
                end 
            end 
        end 
    end 
) 

بس اتوقع الطريقة ماهي آمنة

^ محد شاف ردي

[I_Mr.[T]he[P]rInCe]

respect .

صرآحة /

انسان طيب ي عناد وربي

كود مثل هذا ماي يعطيه الا فاعلين الخير

تراهـ حصري لسيرفرك :]

بالتوفيق

كلام جميل و يسعدني الله يسعدك , اشكرك عليه

  
--هنا مثلا كلمه تدخلها عشان تحفظ الحساب 
cmd : addCommandHandler("name") -- نضيف كلمه 
function ( username,password) --نسوي فنكشن  
setAccountData(elemnt,"Name",getPlayerSerial(elemnt))--نسوي أكونت داتا بسريال اللاعب  
setAccountData(elemnt,"Name",username)--نسوي أكونت داتا باليوزر نيم 
setAccountData ( elemnt, " Name ", password)--بالباسورد 
  
  
--هنا تسجيل الدخول 
Event : onPlayerJoin --أول ما اللاعب يدخل 
Lob : getAccounts ()-- نسوي إحضار لكل الحسابات 
getAccountData == getPlayerSerial -- إذا كانت الداتا = سريال اللاعب 
getAccountData  == username --نحضر الداتا حقت اليوزر نيم بالحساب 
getAccountData == password --نحضر الداتا حقت الباسورد 
  
logIn () --نسجل الدخول 
  
  

ما استفدت من الشرح حقك

أتمنى ان تطبقه على طلب صاحب الموضوع كي نستفيد جميعاً من خبراتك

صاحب الموضوع طلب كود تسجيل الدخول التلقائي

وذي الاكواد إللي استخدمها

اذا تبي الكود كامل قلي

[3NAD]

صاحب الموضوع طلب كود تسجيل الدخول التلقائي

وذي الاكواد إللي استخدمها

اذا تبي الكود كامل قلي

اي ياليت يعني، احس عندك مهارات قوية ماشاء الله

[terreus]

صاحب الموضوع طلب كود تسجيل الدخول التلقائي

وذي الاكواد إللي استخدمها

اذا تبي الكود كامل قلي

لوللللللل

ضضضضضضضضضضضضضض

بس عناد اشوفه بدون فائدة عناد معطيكم كود جاهز فوق ._.

صراحة موضوع صار ضحك لول

[I_Mr.[T]he[P]rInCe]

صاحب الموضوع طلب كود تسجيل الدخول التلقائي

وذي الاكواد إللي استخدمها

اذا تبي الكود كامل قلي

لوللللللل

ضضضضضضضضضضضضضض

بس عناد اشوفه بدون فائدة عناد معطيكم كود جاهز فوق ._.

صراحة موضوع صار ضحك لول

اصلا انا لسه ما شفت كود عناد + صاحب الموضوع لو طلب الكود كامل كنت بعطيه

[' A F .]

^ طيب عناد طلبك ذذ

[Simple.]

يا ذا برنس

كيف اسوي تريقر من كلنت لسيرفر انت عطيتنا بس حق السيرفر وكيف استقبله ؟

معليش تعبناك معنا تحملنا شوية

[terreus]

في هذا الكود

-- Client 
    addEventHandler("onClientGUIClick",getRootElement(), 
        function () 
            local user = guiGetText(lName) 
            local pass = guiGetText(lPass) 
            local ruser = guiGetText(rName) 
            local rpass = guiGetText(rPass) 
            if ( source == login ) then 
                triggerServerEvent("onlogin",getLocalPlayer(),user,pass, guiCheckBoxGetSelected ( ........ ) ) 
            elseif ( source == register ) then 
                triggerServerEvent("onre",getLocalPlayer(),ruser,rpass) 
            end 
        end 
    ) 
  

شفت محل النقاط ^

حط بداله تعريف التشيك بوكس حق الدخول التلقائي

يعني مثلاً

checkedBox = guiCreateCheckBox(20,30,150,20,"Checked checkbox",true,false,guiWindow) 

checkedBox خذ

---

-- Client  
addEventHandler ( "onClientResourceStart", resourceRoot, 
    function ( ) 
        triggerServerEvent ( "onCheckAutoLogin", localPlayer ) 
    end 
) 
  
addEvent ( "onOpenLoginWindow", true ) 
addEventHandler ( "onOpenLoginWindow", root, 
    function ( )  
        showChat(false) 
        guiSetVisible (wnd, true ) 
        guiSetVisible (register, true ) 
        guiSetVisible ( login, true ) 
        setTimer ( move, 1000, 1 )   
    end 
) 

-- Server 
local AutoLogin_DB = dbConnect ( "sqlite", "AutoLogin.db" ) 
dbExec ( AutoLogin_DB, "CREATE TABLE IF NOT EXISTS `AutoLogin` (`UserName`, `PassWord`, `Serial`)") 
  
addEvent ( "onCheckAutoLogin", true ) 
addEventHandler ( "onCheckAutoLogin", root, 
    function ( ) 
        local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( source )) ), -1 ) 
        if #DB > 0 then  
            local user, pass = tostring(DB[1].UserName), tostring(DB[1].PassWord) 
            local account = getAccount ( user, pass ) 
            if account then          
                logIn ( source, account, pass ) 
                triggerClientEvent ( source, "hide", resourceRoot )              
            else 
                triggerClientEvent ( source, "onOpenLoginWindow", resourceRoot )     
            end 
        else 
            triggerClientEvent ( source, "onOpenLoginWindow", resourceRoot )     
        end 
    end 
) 
  
addEvent ( "onlogin", true ) 
addEventHandler ( "onlogin", root, 
    function ( user, pass, auto ) 
        local account = getAccount ( user, pass ) 
        if account then 
            if logIn ( source, account, pass ) then 
                triggerClientEvent ( source, "hide", resourceRoot ) 
                if auto then 
                    local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( source )) ), -1 ) 
                    if #DB > 0 then 
                        dbExec ( AutoLogin_DB, "UPDATE `AutoLogin` SET `UserName`=?,`PassWord`=? WHERE `Serial`=?", tostring(user), tostring(pass), tostring(getPlayerSerial (source)) ) 
                    else 
                        dbExec ( AutoLogin_DB, "INSERT INTO `AutoLogin` VALUES(?,?,?)", tostring(user), tostring(pass), tostring(getPlayerSerial (source)) ) 
                    end 
                else 
                    local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( source )) ), -1 ) 
                    if #DB > 0 then                  
                        dbExec ( AutoLogin_DB, "DELETE FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial(source)) ) 
                    end 
                end 
            else 
                outputChatBox ( "* Account already in use.", source, 255, 0, 0 ) 
            end 
        else 
            outputChatBox ( "* Worng Username Or Password.", source, 255, 0, 0 ) 
        end 
    end 
) 
  
addCommandHandler ( "disableAuto",  
    function ( player ) 
        local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( player )) ), -1 ) 
        if #DB > 0 then                  
            dbExec ( AutoLogin_DB, "DELETE FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial(player)) ) 
            outputChatBox ( "* Auto-Login has been disabled.", player, 0, 255, 0 ) 
        end  
    end 
) 

ضفت لك كوماند حق إلغاء الدخول التلقائي

disableAuto

* لم يتم التجربة, رد خبر

مسويه عناد

[TAPL]

صاحب الموضوع طلب كود تسجيل الدخول التلقائي

وذي الاكواد إللي استخدمها

اذا تبي الكود كامل قلي

لوللللللل

ضضضضضضضضضضضضضض

بس عناد اشوفه بدون فائدة عناد معطيكم كود جاهز فوق ._.

صراحة موضوع صار ضحك لول

اصلا انا لسه ما شفت كود عناد + صاحب الموضوع لو طلب الكود كامل كنت بعطيه

ما شفت كود عناد و جالس ترد بالموضوع؟

الموضوع انحل من اول صفحة لكن بسببك وصل الصفحة الثالثة

******

[I_Mr.[T]he[P]rInCe]

^ طيب عناد طلبك ذذ

بسوي واعطيه

[I_Mr.[T]he[P]rInCe]

كود عناد sqlite صعب

انا الاكواد اللي نشرتها سهله

[#DRAGON!FIRE]

انت ما نشرت الا فنكشنات وطلبوا منك تسويها .. مدام سهلة وكذا سويها لو كانت ناجحة ..

وكود عناد صعب بالنسبة لكـ .. لكن هو ك كود سهل مو بس بالنسبة لي لكن الكود واضح وما فيه اي تعقيد .

[M7MD#]

في هذا الكود

-- Client 
    addEventHandler("onClientGUIClick",getRootElement(), 
        function () 
            local user = guiGetText(lName) 
            local pass = guiGetText(lPass) 
            local ruser = guiGetText(rName) 
            local rpass = guiGetText(rPass) 
            if ( source == login ) then 
                triggerServerEvent("onlogin",getLocalPlayer(),user,pass, guiCheckBoxGetSelected ( ........ ) ) 
            elseif ( source == register ) then 
                triggerServerEvent("onre",getLocalPlayer(),ruser,rpass) 
            end 
        end 
    ) 
  

شفت محل النقاط ^

حط بداله تعريف التشيك بوكس حق الدخول التلقائي

يعني مثلاً

checkedBox = guiCreateCheckBox(20,30,150,20,"Checked checkbox",true,false,guiWindow) 

checkedBox خذ

---

-- Client  
addEventHandler ( "onClientResourceStart", resourceRoot, 
    function ( ) 
        triggerServerEvent ( "onCheckAutoLogin", localPlayer ) 
    end 
) 
  
addEvent ( "onOpenLoginWindow", true ) 
addEventHandler ( "onOpenLoginWindow", root, 
    function ( )  
        showChat(false) 
        guiSetVisible (wnd, true ) 
        guiSetVisible (register, true ) 
        guiSetVisible ( login, true ) 
        setTimer ( move, 1000, 1 )   
    end 
) 

-- Server 
local AutoLogin_DB = dbConnect ( "sqlite", "AutoLogin.db" ) 
dbExec ( AutoLogin_DB, "CREATE TABLE IF NOT EXISTS `AutoLogin` (`UserName`, `PassWord`, `Serial`)") 
  
addEvent ( "onCheckAutoLogin", true ) 
addEventHandler ( "onCheckAutoLogin", root, 
    function ( ) 
        local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( source )) ), -1 ) 
        if #DB > 0 then  
            local user, pass = tostring(DB[1].UserName), tostring(DB[1].PassWord) 
            local account = getAccount ( user, pass ) 
            if account then          
                logIn ( source, account, pass ) 
                triggerClientEvent ( source, "hide", resourceRoot )              
            else 
                triggerClientEvent ( source, "onOpenLoginWindow", resourceRoot )     
            end 
        else 
            triggerClientEvent ( source, "onOpenLoginWindow", resourceRoot )     
        end 
    end 
) 
  
addEvent ( "onlogin", true ) 
addEventHandler ( "onlogin", root, 
    function ( user, pass, auto ) 
        local account = getAccount ( user, pass ) 
        if account then 
            if logIn ( source, account, pass ) then 
                triggerClientEvent ( source, "hide", resourceRoot ) 
                if auto then 
                    local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( source )) ), -1 ) 
                    if #DB > 0 then 
                        dbExec ( AutoLogin_DB, "UPDATE `AutoLogin` SET `UserName`=?,`PassWord`=? WHERE `Serial`=?", tostring(user), tostring(pass), tostring(getPlayerSerial (source)) ) 
                    else 
                        dbExec ( AutoLogin_DB, "INSERT INTO `AutoLogin` VALUES(?,?,?)", tostring(user), tostring(pass), tostring(getPlayerSerial (source)) ) 
                    end 
                else 
                    local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( source )) ), -1 ) 
                    if #DB > 0 then                  
                        dbExec ( AutoLogin_DB, "DELETE FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial(source)) ) 
                    end 
                end 
            else 
                outputChatBox ( "* Account already in use.", source, 255, 0, 0 ) 
            end 
        else 
            outputChatBox ( "* Worng Username Or Password.", source, 255, 0, 0 ) 
        end 
    end 
) 
  
addCommandHandler ( "disableAuto",  
    function ( player ) 
        local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( player )) ), -1 ) 
        if #DB > 0 then                  
            dbExec ( AutoLogin_DB, "DELETE FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial(player)) ) 
            outputChatBox ( "* Auto-Login has been disabled.", player, 0, 255, 0 ) 
        end  
    end 
) 

ضفت لك كوماند حق إلغاء الدخول التلقائي

disableAuto

* لم يتم التجربة, رد خبر

حبيبي عناد والله الله يخليك الله يوفقك الله يعطيك الي تبيه يا رب : )

شكرا والله الاكواد شغاله حبيبي والله الله يخليك يا رب

[3NAD]

حياك الله

[M7MD#]

حبيبي والله عناد

هسا لو بدي اجيب باس واحد معين اقدر ولا ماقدر ؟

لأن الاسم والباس ينحفظ

[3NAD]

اكيد تقدر

[M7MD#]

كيف

انا عندي برنامج

db browser for SQlite

ورحت ملف

auto login

واسوي له اكسبورت ويجيب لي الاسم والحساب والسيريال ؟

جربت يطلع لي كذا :

UserName,PassWord,Serial

فارغ

[3NAD]

أضف هذا لنفس الملف

  
addCommandHandler ( "getAccountPassword", 
    function ( player, _, account ) 
        if ( getPlayerSerial ( player ) == "Your Serial" ) and account then 
            local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `UserName`=?", tostring(account) ), -1 ) 
            if #DB > 0 then                
                local user, pass = tostring(DB[1].UserName), tostring(DB[1].PassWord) 
                outputChatBox ( "* Username: "..user, player, 0, 255, 0 ) 
                outputChatBox ( "* Password: "..pass, player, 0, 255, 0 ) 
            else 
                outputChatBox ( "* No results.", player, 0, 255, 0 ) 
            end  
        end 
    end 
) 

عدل على خانة السيريال بحيث مو اي شخص يطلع الباسورد

واكتب ب اف8

getAccountPassword M7MD 

* ابرئ ذمتي من إستخدامه لغرض إختراق الإيميلات والعضويات بالمواقع و ما إلى ذلك

[M7MD#]

غلبتك معي والله

شكرا الله يخليك ويديمك يـ عناد وان شاء الله تظل من كبار المبرمجين في كل الام تي ايه يا رب وتكون فخر للعرب كلهم

[3NAD]

اللهم آمين, حياك الله