Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

Wysłany: 2019-05-04, 10:41


Radosny69







Wiek: 27
Na forum: 2592 dni
Posty: 4
Nick w MP: Radosny69



Respekt: 50

witam mam problem z panelem logowania gdy klikam zaloguj nie loguje mnie do konta
(wszystko podpi?te)
w db3

ERROR: [BW]/BW_Logowanie/s_logging.lua:89: attempt to call field "?" (a nil value) [DUP x10]

za pomoc piwko i respekt ;)

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-05-04, 11:10


_jvneczek







Wiek: 22
Na forum: 4325 dni
Posty: 1513
Nick w MP: _jvneczek

Piwa: 3949

Respekt: 337,5
Respekt: 337,5Respekt: 337,5Respekt: 337,5

Daj kod po stronie servera i wska? 89 linijke.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-05-04, 11:17


Radosny69







Wiek: 27
Na forum: 2592 dni
Posty: 4
Nick w MP: Radosny69



Respekt: 50

--[[
     Panel Logowania by Kurianusz @2016 . 
     Regulamin /Licencja
     Korzystanie z tego kodu tylko je?eli posiadasz tzwcopyrightsZakaz usuwania tej notatki!
     Pami?taj ?e nielegalne korzystanie z kodu podpada pod kodeks karny :> Tak samo jak usuni?cie tej notatki!
]]



function sprawdzorganizacje(plr)
local x exports['BW_db']:dbGet("SELECT spawn from ogrpg_organization_list join ogrpg_organizations on ogrpg_organizations.code = ogrpg_organization_list.id WHERE uid=? and not(spawn=?)",getElementData(plr,"player:uid"),"0,0,0")
if and #x > 0 then
local t split(x[1].spawn",")
    return t
end
return false
end

function getAdmin(plr,level)
    if level then
        local result=exports["BW_db"]:dbGet("SELECT * from ogrpg_admins WHERE serial=? AND level=?"getPlayerSerial(plr), level)
        if result and #result > 0 then
            return true
        else
            return false
        end
    else
        local result=exports["BW_db"]:dbGet("SELECT * from ogrpg_admins WHERE serial=?"getPlayerSerial(plr))
        if result and #result > 0 then
            return true
        else
            return false
        end
    end
end

addEvent("logging:checkAccount"true)
addEventHandler("logging:checkAccount"resourceRoot, function(login,pass,save)
    local result=exports["BW_db"]:dbGet("SELECT * FROM ogrpg_users WHERE login=?"login)
    if result and #result > 0 then
        serial=getPlayerSerial(client)
        if result[1].register_serial~=serial then
            tak=true
            for i,v in ipairs(split(result[1].seriale,",")) do
                if v==serial then tak=false end
            end
            if tak then
                return triggerClientEvent(client"logging:result"resourceRootfalse"Nie mo?esz si? zalogowa? na to konto!","nope")
            end
        end
        if result[1].login == login and result[1].pass == md5(passthen
            local query=exports["BW_db"]:dbSet("UPDATE ogrpg_users SET pass=? WHERE login=?",teaEncode(pass,"Trujeczka"),login)
            triggerClientEvent(client"logging:result"resourceRootfalse"Zaaktualizowano twoj profil! Zaloguj sie ponownie!.","git")
            return
        end
        if result[1].login == login and result[1].pass == teaEncode(pass,"Ryjek"then
            local query=exports["BW_db"]:dbSet("UPDATE ogrpg_users SET pass=? WHERE login=?",teaEncode(pass,"Trujeczka"),login)
            triggerClientEvent(client"logging:result"resourceRootfalse"Zaaktualizowano twoj profil! Zaloguj sie ponownie!.","git")
            return
        end
        if result[1].login == login and result[1].pass == teaEncode(pass,"Trujeczka"then
            local query=exports["BW_db"]:dbSet("UPDATE ogrpg_users SET pass=? WHERE login=?",teaEncode(pass,"*****"),login)
            triggerClientEvent(client"logging:result"resourceRootfalse"Zaaktualizowano twoj profil! Zaloguj sie ponownie!.","git")
            return
        end
        if result[1].login == login and result[1].pass == teaEncode(pass,"*****"then
            local query=exports["BW_db"]:dbSet("UPDATE ogrpg_users SET pass=? WHERE login=?",teaEncode(pass,"wypierdalacchuje"),login)
            triggerClientEvent(client"logging:result"resourceRootfalse"Zaaktualizowano twoj profil! Zaloguj sie ponownie!.","git")
            return
        end
        if result[1].login == login and result[1].pass == teaEncode(pass,"wypierdalacchuje"then
            for i,player in pairs(getElementsByType("player")) do
                if getElementData(player,"player:uid") == result[1].id then
                triggerClientEvent(client"logging:result"resourceRootfalse"Kto? jest zalogowany na to konto!!!!!.","blad")
                return
            end
            end
            --local result2=exports['BW_db']:dbGet("SELECT login2 from ogrpg_users where id=?",result[1].id)
            if result[1].login2 == false then
            setPlayerName(clientlogin)
            else
            setPlayerName(clientresult[1].login2)
            triggerClientEvent(client"iyw_notifications:send"client"info""Wykupiono us?uge zmiana pseudonimu, tw?j nick to: "..result[1].login2.."")
            end
            q=exports["BW_db"]:dbGet("select logowania_nagroda from ogrpg_users where id=? limit 1",result[1].id)
            exports["BW_db"]:dbSet("update ogrpg_users set logowania_nagroda=logowania_nagroda+1 WHERE DATE(ostatnio_online) = DATE(NOW() - INTERVAL 1 DAY) and id=? limit 1",result[1].id)
            q3=exports["BW_db"]:dbGet("select logowania_nagroda from ogrpg_users where id=? limit 1",result[1].id)
            if(tonumber(q[1].logowania_nagroda)<q3[1].logowania_nagroda)then
                nagrody[q3[1].logowania_nagroda](client)
                if(q3[1].logowania_nagroda==7)then
                    exports["BW_db"]:dbSet("update ogrpg_users set logowania_nagroda=0 WHERE DATE(ostatnio_online) = DATE(NOW() - INTERVAL 1 DAY) and id=? limit 1",result[1].id)
                end
            else
                exports["BW_db"]:dbSet("update ogrpg_users set logowania_nagroda=0 WHERE DATE(ostatnio_online)<DATE(NOW() - INTERVAL 1 DAY) and id=? limit 1",result[1].id)
            end
            if(savethen
                triggerClientEvent(client"createsaved:login",client,login,pass)
            else
                triggerClientEvent(client"deletesaved:login",client)
            end
            exports["BW_db"]:dbSet("update ogrpg_users set ostatnio_online=NOW() where id=?"result[1].id)
            setElementData(client"player:uid"result[1].id)
            triggerClientEvent(client"logging:result"resourceRoottrue"Zalogowa?e? si? pomyslnie","git")
            triggerEvent("SprawdzDom",root,client)
            setElementData(client,"player:organization:spawn",sprawdzorganizacje(client))
            setElementData(client,"p:title",result[1].rp_tytul)
            if result[1].register_serial == false then
            --local query=exports["BW_db"]:dbSet("UPDATE ogrpg_users SET register_serial=? WHERE login=?",getPlayerSerial(client),login)
            end
            local logs=exports["BW_db"]:dbSet("INSERT INTO ogrpg_logs_login (name,serial,data) VALUES (?,?,NOW())"string.format(login.."("..result[1].id..")"),getPlayerSerial(client))
        else
            triggerClientEvent(client"logging:result"resourceRootfalse"Podane dane s? nieprawid?owe.","blad")
        end
    else
        triggerClientEvent(client"logging:result"resourceRootfalse"Podany login nie istnieje w bazie.","blad")
    end
end)
local maks_ilosc_kont 500000000 -- Maksymalna ilosc kont do rejestracji
addEvent("logging:newAccount"true)
addEventHandler("logging:newAccount"resourceRoot, function(login,pass)
    local result=exports["BW_db"]:dbGet("SELECT * FROM ogrpg_users WHERE register_serial=?"getPlayerSerial(client))
    if result and #result >= maks_ilosc_kont then
        triggerClientEvent(client"logging:result"resourceRootfalse"Na ten serial zostala utworzona maksymalna ilosc kont.","blad")
    return end
    local result=exports["BW_db"]:dbGet("SELECT * FROM ogrpg_users WHERE login=?"login)
    if result and #result > 0 then
        triggerClientEvent(client"logging:result"resourceRootfalse"Podany login ju? istnieje w bazie.","blad")
    else
        local query=exports["BW_db"]:dbSet("INSERT INTO ogrpg_users (login,pass,register_serial,changedpw) VALUES (?,?,?,?)"loginteaEncode(pass,"wypierdalacchuje"),getPlayerSerial(client),1)
        if query then
            triggerClientEvent(client"logging:result"resourceRootfalse"Pomyslnie zarejestrowales(as) sie!","git")
            setElementData(client"player:logged"true)
        end
    end
end)


nagrody={
[1]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j pierwszy pierwszy dzie? gdy odwiedzasz nas pod rz?d! Przyjd? jutro, a dostaniesz nagrod?!")
end,
[2]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j drugi dzie? kiedy jeste? u nas pod rz?d! Otrzymujesz 500PLN!")
    plr:giveMoney(500)
end,
[3]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j trzeci dzie? kiedy jeste? u nas pod rz?d! Otrzymujesz 600PLN!")
    plr:giveMoney(600)
end,
[4]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j czwarty dzie? kiedy jeste? u nas pod rz?d! Otrzymujesz 750PLN!")
    plr:giveMoney(750)
end,
[5]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j pi?ty dzie? kiedy jeste? u nas pod rz?d! Otrzymujesz 900PLN!")
    plr:giveMoney(900)
end,
[6]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j sz?sty dzie? kiedy jeste? u nas pod rz?d! Otrzymujesz 1000PLN!")
    plr:giveMoney(1000)
end,
[7]=function(plr)
    triggerClientEvent(client"iyw_notifications:send"client"info""To tw?j si?dmy dzie? kiedy jeste? u nas pod rz?d! 1 punkt premium!")
    exports["BW_db"]:dbSet("update ogrpg_users set pp=pp+1 where id=? limit 1",plr:getData("player:uid"))
end,
 
}


                nagrody[q3[1].logowania_nagroda](client)


prosze

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-05-12, 00:38


=DC=







Wiek: 35
Na forum: 3944 dni
Posty: 223
Nick w MP: =DC=

Piwa: 72

Respekt: 150
Respekt: 150Respekt: 150

Czy masz kolumn? "logowania_nagroda" w tabeli "ogrpg_users"?

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-05-12, 02:24


AsterBonzo

Otwórz ogień






Wiek: 20
Na forum: 2968 dni
Posty: 187
Nick w MP: Hirahi

Piwa: 60

Respekt: 35,8

Radosny69, najlepiej usu? "logowanie_nagorda" wszystko i sprad? czy dzia?a ;)

Postaw piwo autorowi tego posta
 

 
Tagi: pr0blem :: panelem :: logowania
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA Ten temat jest zablokowany bez możliwości zmiany postów lub pisania odpowiedzi

Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Dodaj temat do Ulubionych
Wersja do druku