GTAONLINE.PL :: Wszystkie auta się zapisują

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

GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » Wszystkie auta się zapisują Poprzedni temat Następny temat

Idź do strony: « 1 2 3 4 5 6 7 8 »

Wysłany: 2016-07-06, 15:39

GamerHD11

Wiek: 24
Na forum: 4260 dni
Posty: 259
Nick w MP: SzokoHD

Piwa: 23

Respekt: 50


a w INSERT nie powinno by? te? id ?

Wysłany: 2016-07-06, 15:39

luki123luki123
Place Game

Wiek: 28
Na forum: 5275 dni
Posty: 1948
Nick w MP: LuKiO

Piwa: 6101

Respekt: 611
Respekt: 611

GamerHD11, sprawd? teraz: powinno dzia?a?:

local conn = dbConnect ( "sqlite", "db.db" )

addEventHandler ( "onResourceStart", resourceRoot, function ()
    if conn then
        dbExec ( conn, "CREATE TABLE IF NOT EXISTS OP_Vehicles (id INTEGER PRIMARY KEY AUTOINCREMENT, model INTEGER, posx FLOAT, posy FLOAT, posz FLOAT, rotx FLOAT, roty FLOAT, rotz FLOAT, color1 INTEGER, color2 INTEGER, color3 INTEGER, color4 INTEGER, owner VARCHAR, przebieg FLOAT, paliwo FLOAT, bak FLOAT, paintjob INTEGER, hr INTEGER, hg INTEGER, hb INTEGER, felgi INTEGER, t0 INTEGER, t1 INTEGER, t2 INTEGER, t3 INTEGER, t4 INTEGER, t5 INTEGER, t6 INTEGER, t7 INTEGER, t8 INTEGER, t9 INTEGER, t13 INTEGER, t14 INTEGER, t15 INTEGER, t16 INTEGER, tablica TEXT, wariant1 INTEGER, wariant2 INTEGER, vmax FLOAT, acceler FLOAT )" )
        local q = dbQuery ( conn, "SELECT * FROM OP_Vehicles")
        local result = dbPoll ( q, -1 )
            for _,v in pairs ( result ) do
                local auto = createVehicle ( v["model"], v["posx"], v["posy"], v["posz"], v["rotx"], v["roty"], v["rotz"] )
                setVehicleColor ( auto, v["color1"], v["color2"], v["color3"], v["color4"] )
                setElementData (auto, "vehid", v["id"])
                setElementData (auto, "owner", v["owner"])
                setElementData (auto, "przebieg", v["przebieg"])
                setElementData (auto, "paliwo", v["paliwo"])
                setElementData (auto, "bak", v["bak"])
                for i= 0, 9 do
                addVehicleUpgrade(auto, v["t"..i..""])
                end
                for i = 13,16 do
                addVehicleUpgrade(auto, v["t"..i..""])
                end
                setVehiclePaintjob(auto, v["paintjob"])
                setVehicleVariant(auto, v["wariant1"], v["wariant2"])
                setVehicleHeadLightColor(auto, v["hr"], v["hg"], v["hb"])
                setVehiclePlateText(auto, v["tablica"])
                setVehicleHandling(auto, "engineAcceleration", v["acceler"])
                setVehicleHandling(auto, "maxVelocity", v["vmax"])
                setVehicleOverrideLights(auto, 1)
            end
    end
end)


addCommandHandler("zapisz", function ( plr )
    acc = getAccountName(getPlayerAccount(plr))
    if isObjectInACLGroup("user." ..acc, aclGetGroup("Admin")) then
        for _,v in ipairs ( getElementsByType ( "vehicle") ) do
            if getElementData(v, "prywatne") then
                local pojazdID = getElementModel ( v )
                local c1,c2,c3,c4 = getVehicleColor ( v )
                local x,y,z = getElementPosition ( v )
                local rotx, roty, rotz = getElementRotation ( v )
                local owner = getElementData(v, "owner")
                local przebieg = getElementData(v, "przebieg")
                local paliwo = getElementData(v, "paliwo")
                local bak = getElementData(v, "bak")
                local t0 = getVehicleUpgradeOnSlot(v, 0)
                local t1 = getVehicleUpgradeOnSlot(v, 1)
                local t2 = getVehicleUpgradeOnSlot(v, 2)
                local t3 = getVehicleUpgradeOnSlot(v, 3)
                local t4 = getVehicleUpgradeOnSlot(v, 4)
                local t5 = getVehicleUpgradeOnSlot(v, 5)
                local t6 = getVehicleUpgradeOnSlot(v, 6)
                local t7 = getVehicleUpgradeOnSlot(v, 7)
                local t8 = getVehicleUpgradeOnSlot(v, 8)
                local t9 = getVehicleUpgradeOnSlot(v, 9)
                local t13 = getVehicleUpgradeOnSlot(v, 13)
                local t14 = getVehicleUpgradeOnSlot(v, 14)
                local t15 = getVehicleUpgradeOnSlot(v, 15)
                local t16 = getVehicleUpgradeOnSlot(v, 16)
                local felgi = getVehicleUpgradeOnSlot(v, 12)
                local paintjob = getVehiclePaintjob(v)
                local hr, hg, hb = getVehicleHeadLightColor(v)
                local tablica = getVehiclePlateText(v)
                local wariant1, wariant2 = getVehicleVariant(v)
                local vmax = getVehicleHandling(v).maxVelocity
                local acceler = getVehicleHandling(v).engineAcceleration
                local id = getElementData(v, "vehid")
                    local zapis = dbQuery ( conn, "SELECT * FROM OP_Vehicles WHERE id = ?", id )
                    local result = dbPoll ( zapis, -1 )
                    dbFree ( zapis )
                    if #result == 1 then    
                        outputChatBox("Twoje auto zosta?o zaktualizowane!", plr, 255, 0 ,0)
                        dbExec ( conn, "UPDATE OP_Vehicles SET model = '?', posx = '?', posy = '?', posz = '?', rotx = '?', roty = '?', rotz = '?', color1 = '?', color2 = '?', color3 = '?', color4 = '?', owner = '?', przebieg = '?', paliwo = '?', bak = '?', paintjob = '?', hr = '?', hg = '?', hb = '?', felgi = '?', t0 = '?', t1 = '?', t2 = '?', t3 = '?', t4 = '?', t5 = '?', t6 = '?', t7 = '?', t8 = '?', t9 = '?', t13 = '?', t14 = '?', t15 = '?', t16 = '?', tablica = '?', wariant1 = '?', wariant2 = '?', vmax = '?', acceler = '?' WHERE id = ?", pojazdID, x, y, z, rotx, roty, rotz, c1, c2, c3, c4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler, id)
                elseif #result == 0 then
                        outputChatBox("Twoje auto zosta?o zapisane poraz pierwszy !", plr, 255, 0 ,0)
                        dbExec ( conn, "INSERT INTO OP_Vehicles (model, posx, posy, posz, rotx, roty, rotz, color1, color2 ,color3, color4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ? ,?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)", pojazdID, x, y, z, rotx, roty, rotz, c1, c2, c3, c4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler)
                    end
            end
        end
    end
end)

Podpis

Moje skrypty:

System bram
System języków
Panel Logowania
Praca sprawacza
Panel Lidera
Płynna zmiana wartości

Wysłany: 2016-07-06, 15:42

GamerHD11

Wiek: 24
Na forum: 4260 dni
Posty: 259
Nick w MP: SzokoHD

Piwa: 23

Respekt: 50


luki123luki123, lepiej, lepiej teraz zapisuje tylko pierwszy raz pojazdy oraz wszystkie, ale ich nie updateuje.

Wysłany: 2016-07-06, 15:46

Jacob
Głupiomądry

Wiek: 28
Na forum: 5502 dni
Posty: 967
Nick w MP: Jacob

Piwa: 786

Respekt: 212,3
Respekt: 212,3

Sprawd? czy wy?wietla si? na czacie 'update' czy 'zapis'.

local conn = dbConnect ( "sqlite", "db.db" )

addEventHandler ( "onResourceStart", resourceRoot, function ()
    if conn then
        dbExec ( conn, "CREATE TABLE IF NOT EXISTS OP_Vehicles(id INTEGER PRIMARY KEY AUTOINCREMENT, model INTEGER, posx FLOAT, posy FLOAT, posz FLOAT, rotx FLOAT, roty FLOAT, rotz FLOAT, color1 INTEGER, color2 INTEGER, color3 INTEGER, color4 INTEGER, owner VARCHAR, przebieg FLOAT, paliwo FLOAT, bak FLOAT, paintjob INTEGER, hr INTEGER, hg INTEGER, hb INTEGER, felgi INTEGER, t0 INTEGER, t1 INTEGER, t2 INTEGER, t3 INTEGER, t4 INTEGER, t5 INTEGER, t6 INTEGER, t7 INTEGER, t8 INTEGER, t9 INTEGER, t13 INTEGER, t14 INTEGER, t15 INTEGER, t16 INTEGER, tablica TEXT, wariant1 INTEGER, wariant2 INTEGER, vmax FLOAT, acceler FLOAT )" )
        local q = dbQuery ( conn, "SELECT * FROM OP_Vehicles")
        local result = dbPoll ( q, -1 )
        if #result > 0 then
            for _,v in pairs ( result ) do
                local auto = createVehicle ( v["model"], v["posx"], v["posy"], v["posz"], v["rotx"], v["roty"], v["rotz"] )
                setVehicleColor ( auto, v["color1"], v["color2"], v["color3"], v["color4"] )
                setElementData (auto, "vehid", v["id"])
                setElementData (auto, "owner", v["owner"])
                setElementData (auto, "przebieg", v["przebieg"])
                setElementData (auto, "paliwo", v["paliwo"])
                setElementData (auto, "bak", v["bak"])
                for i= 0, 9 do
                addVehicleUpgrade(auto, v["t"..i..""])
                end
                for is = 13,16 do
                addVehicleUpgrade(auto, v["t"..is..""])
                end
                setVehiclePaintjob(auto, v["paintjob"])
                setVehicleVariant(auto, v["wariant1"], v["wariant2"])
                setVehicleHeadLightColor(auto, v["hr"], v["hg"], v["hb"])
                setVehiclePlateText(auto, v["tablica"])
                setVehicleHandling(auto, "engineAcceleration", v["acceler"])
                setVehicleHandling(auto, "maxVelocity", v["vmax"])
                setVehicleOverrideLights(auto, 1)
            end
        end
        dbFree(q)
    end
end)



addCommandHandler("zapisz", function ( plr )
    acc = getAccountName(getPlayerAccount(plr))
    if isObjectInACLGroup("user." ..acc, aclGetGroup("Admin")) then
        for _,v in ipairs ( getElementsByType ( "vehicle") ) do
            if getElementData(v, "prywatne") then
                local pojazdID = getElementModel ( v )
                local c1,c2,c3,c4 = getVehicleColor ( v )
                local x,y,z = getElementPosition ( v )
                local rotx, roty, rotz = getElementRotation ( v )
                local owner = getElementData(v, "owner")
                local przebieg = getElementData(v, "przebieg")
                local paliwo = getElementData(v, "paliwo")
                local bak = getElementData(v, "bak")
                local t0 = getVehicleUpgradeOnSlot(v, 0)
                local t1 = getVehicleUpgradeOnSlot(v, 1)
                local t2 = getVehicleUpgradeOnSlot(v, 2)
                local t3 = getVehicleUpgradeOnSlot(v, 3)
                local t4 = getVehicleUpgradeOnSlot(v, 4)
                local t5 = getVehicleUpgradeOnSlot(v, 5)
                local t6 = getVehicleUpgradeOnSlot(v, 6)
                local t7 = getVehicleUpgradeOnSlot(v, 7)
                local t8 = getVehicleUpgradeOnSlot(v, 8)
                local t9 = getVehicleUpgradeOnSlot(v, 9)
                local t13 = getVehicleUpgradeOnSlot(v, 13)
                local t14 = getVehicleUpgradeOnSlot(v, 14)
                local t15 = getVehicleUpgradeOnSlot(v, 15)
                local t16 = getVehicleUpgradeOnSlot(v, 16)
                local felgi = getVehicleUpgradeOnSlot(v, 12)
                local paintjob = getVehiclePaintjob(v)
                local hr, hg, hb = getVehicleHeadLightColor(v)
                local tablica = getVehiclePlateText(v)
                local wariant1, wariant2 = getVehicleVariant(v)
                local vmax = getVehicleHandling(v).maxVelocity
                local acceler = getVehicleHandling(v).engineAcceleration
                local id = getElementData(v, "vehid")
                
                if ( id ) then
                    outputChatBox("update")
                    local r = dbQuery("SELECT * FROM OP_Vehicles WHERE id=?", id)
                    if #dbPoll(r, -1) > 0 then
                        dbExec ( conn, "UPDATE OP_Vehicles SET model=?, posx=?, posy=?, posz=?, rotx=?, roty=?, rotz=?, color1=?, color2=?, color3=?, color4=?, owner=?, przebieg=?, paliwo=?, bak=?, paintjob=?, hr=?, hg=?, hb=?, felgi=?, t0=?, t1=?, t2=?, t3=?, t4=?, t5=?, t6=?, t7=?, t8=?, t9=?, t13=?, t14=?, t15=?, t16=?, tablica=?, wariant1=?, wariant2=?, vmax=?, acceler=? WHERE id=?", pojazdID, x, y, z, rotx, roty, rotz, c1, c2, c3, c4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler, id)
                    end
                    dbFree(r)
                else
                    outputChatBox("zapis")
                    dbExec ( conn, "INSERT INTO OP_Vehicles (model, posx, posy, posz, rotx, roty, rotz, color1, color2, color3, color4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)", pojazdID, x, y, z, rotx, roty, rotz, c1, c2, c3, c4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler)
                    
                end
                outputChatBox("* Zapis zako?czony!", plr, 255, 255, 255)
            end
        end
    end
end)

I jeszcze sprawd? b??dy w logs/db.log

Wysłany: 2016-07-06, 15:47

luki123luki123
Place Game

Wiek: 28
Na forum: 5275 dni
Posty: 1948
Nick w MP: LuKiO

Piwa: 6101

Respekt: 611
Respekt: 611

GamerHD11,

local conn = dbConnect ( "sqlite", "db.db" )

addEventHandler ( "onResourceStart", resourceRoot, function ()
    if conn then
        dbExec ( conn, "CREATE TABLE IF NOT EXISTS OP_Vehicles (id INTEGER PRIMARY KEY AUTOINCREMENT, model INTEGER, posx FLOAT, posy FLOAT, posz FLOAT, rotx FLOAT, roty FLOAT, rotz FLOAT, color1 INTEGER, color2 INTEGER, color3 INTEGER, color4 INTEGER, owner VARCHAR, przebieg FLOAT, paliwo FLOAT, bak FLOAT, paintjob INTEGER, hr INTEGER, hg INTEGER, hb INTEGER, felgi INTEGER, t0 INTEGER, t1 INTEGER, t2 INTEGER, t3 INTEGER, t4 INTEGER, t5 INTEGER, t6 INTEGER, t7 INTEGER, t8 INTEGER, t9 INTEGER, t13 INTEGER, t14 INTEGER, t15 INTEGER, t16 INTEGER, tablica TEXT, wariant1 INTEGER, wariant2 INTEGER, vmax FLOAT, acceler FLOAT )" )
        local q = dbQuery ( conn, "SELECT * FROM OP_Vehicles")
        local result = dbPoll ( q, -1 )
            for _,v in pairs ( result ) do
                local auto = createVehicle ( v["model"], v["posx"], v["posy"], v["posz"], v["rotx"], v["roty"], v["rotz"] )
                setVehicleColor ( auto, v["color1"], v["color2"], v["color3"], v["color4"] )
                setElementData (auto, "vehid", v["id"])
                setElementData (auto, "owner", v["owner"])
                setElementData (auto, "przebieg", v["przebieg"])
                setElementData (auto, "paliwo", v["paliwo"])
                setElementData (auto, "bak", v["bak"])
                for i= 0, 9 do
                addVehicleUpgrade(auto, v["t"..i..""])
                end
                for i = 13,16 do
                addVehicleUpgrade(auto, v["t"..i..""])
                end
                setVehiclePaintjob(auto, v["paintjob"])
                setVehicleVariant(auto, v["wariant1"], v["wariant2"])
                setVehicleHeadLightColor(auto, v["hr"], v["hg"], v["hb"])
                setVehiclePlateText(auto, v["tablica"])
                setVehicleHandling(auto, "engineAcceleration", v["acceler"])
                setVehicleHandling(auto, "maxVelocity", v["vmax"])
                setVehicleOverrideLights(auto, 1)
            end
    end
end)


addCommandHandler("zapisz", function ( plr )
    acc = getAccountName(getPlayerAccount(plr))
    if isObjectInACLGroup("user." ..acc, aclGetGroup("Admin")) then
        for _,v in ipairs ( getElementsByType ( "vehicle") ) do
            if getElementData(v, "prywatne") then
                local pojazdID = getElementModel ( v )
                local c1,c2,c3,c4 = getVehicleColor ( v )
                local x,y,z = getElementPosition ( v )
                local rotx, roty, rotz = getElementRotation ( v )
                local owner = getElementData(v, "owner")
                local przebieg = getElementData(v, "przebieg")
                local paliwo = getElementData(v, "paliwo")
                local bak = getElementData(v, "bak")
                local t0 = getVehicleUpgradeOnSlot(v, 0)
                local t1 = getVehicleUpgradeOnSlot(v, 1)
                local t2 = getVehicleUpgradeOnSlot(v, 2)
                local t3 = getVehicleUpgradeOnSlot(v, 3)
                local t4 = getVehicleUpgradeOnSlot(v, 4)
                local t5 = getVehicleUpgradeOnSlot(v, 5)
                local t6 = getVehicleUpgradeOnSlot(v, 6)
                local t7 = getVehicleUpgradeOnSlot(v, 7)
                local t8 = getVehicleUpgradeOnSlot(v, 8)
                local t9 = getVehicleUpgradeOnSlot(v, 9)
                local t13 = getVehicleUpgradeOnSlot(v, 13)
                local t14 = getVehicleUpgradeOnSlot(v, 14)
                local t15 = getVehicleUpgradeOnSlot(v, 15)
                local t16 = getVehicleUpgradeOnSlot(v, 16)
                local felgi = getVehicleUpgradeOnSlot(v, 12)
                local paintjob = getVehiclePaintjob(v)
                local hr, hg, hb = getVehicleHeadLightColor(v)
                local tablica = getVehiclePlateText(v)
                local wariant1, wariant2 = getVehicleVariant(v)
                local vmax = getVehicleHandling(v).maxVelocity
                local acceler = getVehicleHandling(v).engineAcceleration
                local id = getElementData(v, "vehid")
                if id then
                    local zapis = dbQuery ( conn, "SELECT * FROM OP_Vehicles WHERE id = ?", id )
                    local result = dbPoll ( zapis, -1 )
                    dbFree ( zapis )
                    if #result == 1 then    
                        outputChatBox("Twoje auto zosta?o zaktualizowane!", plr, 255, 0 ,0)
                        local qh = dbQuery ( conn, "UPDATE OP_Vehicles SET model = '?', posx = '?', posy = '?', posz = '?', rotx = '?', roty = '?', rotz = '?', color1 = '?', color2 = '?', color3 = '?', color4 = '?', owner = '?', przebieg = '?', paliwo = '?', bak = '?', paintjob = '?', hr = '?', hg = '?', hb = '?', felgi = '?', t0 = '?', t1 = '?', t2 = '?', t3 = '?', t4 = '?', t5 = '?', t6 = '?', t7 = '?', t8 = '?', t9 = '?', t13 = '?', t14 = '?', t15 = '?', t16 = '?', tablica = '?', wariant1 = '?', wariant2 = '?', vmax = '?', acceler = '?' WHERE id = ?", pojazdID, x, y, z, rotx, roty, rotz, c1, c2, c3, c4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler, id)
                        dbFree(qh)
                elseif #result == 0 then
                        outputChatBox("Twoje auto zosta?o zapisane poraz pierwszy !", plr, 255, 0 ,0)
                        dbExec ( conn, "INSERT INTO OP_Vehicles (model, posx, posy, posz, rotx, roty, rotz, color1, color2 ,color3, color4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ? ,?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)", pojazdID, x, y, z, rotx, roty, rotz, c1, c2, c3, c4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler)
                    end
                end    
            end
        end
    end
end)

I zobacz w db3 czy nic nie b?dzie.

Podpis

Moje skrypty:

System bram
System języków
Panel Logowania
Praca sprawacza
Panel Lidera
Płynna zmiana wartości

Wysłany: 2016-07-06, 15:50

GamerHD11

Wiek: 24
Na forum: 4260 dni
Posty: 259
Nick w MP: SzokoHD

Piwa: 23

Respekt: 50


nic nie ma w db3 ale te? nie updateuje jest tak jak wczesniej, tylko zapisuje je po raz pierwszy

Wysłany: 2016-07-06, 15:53

Jacob
Głupiomądry

Wiek: 28
Na forum: 5502 dni
Posty: 967
Nick w MP: Jacob

Piwa: 786

Respekt: 212,3
Respekt: 212,3


Sprawd? m?j kod i mi powiedz czy wy?wietla 'update' czy 'zapis'. Sprawd? b??dy bazy w logs/db.log

Wysłany: 2016-07-06, 15:59

GamerHD11

Wiek: 24
Na forum: 4260 dni
Posty: 259
Nick w MP: SzokoHD

Piwa: 23

Respekt: 50


Jacob, wywala update, a co do log?w to nie mam takiego czegos

Wysłany: 2016-07-06, 16:01

Jacob
Głupiomądry

Wiek: 28
Na forum: 5502 dni
Posty: 967
Nick w MP: Jacob

Piwa: 786

Respekt: 212,3
Respekt: 212,3


To wbij na /debguscript 2 tam wywala b??dy sk?adni zapyta?. Nie dzia?a nadal?

Wysłany: 2016-07-06, 16:03

GamerHD11

Wiek: 24
Na forum: 4260 dni
Posty: 259
Nick w MP: SzokoHD

Piwa: 23

Respekt: 50


b??dy s? w linijkach 76,77 Tw?j kod tylko wyswietla napis update

Wysłany: 2016-07-06, 16:04

Jacob
Głupiomądry

Wiek: 28
Na forum: 5502 dni
Posty: 967
Nick w MP: Jacob

Piwa: 786

Respekt: 212,3
Respekt: 212,3


Podaj te linijki.

Wysłany: 2016-07-06, 16:05

GamerHD11

Wiek: 24
Na forum: 4260 dni
Posty: 259
Nick w MP: SzokoHD

Piwa: 23

Respekt: 50


*local r = dbQuery("SELECT FROM OP_Vehicles WHERE id=?", id) if #dbPoll(r, -1) > 0 then**

Wysłany: 2016-07-06, 16:06

Jacob
Głupiomądry

Wiek: 28
Na forum: 5502 dni
Posty: 967
Nick w MP: Jacob

Piwa: 786

Respekt: 212,3
Respekt: 212,3


A jakie to b??dy?

Wysłany: 2016-07-06, 16:08

GamerHD11

Wiek: 24
Na forum: 4260 dni
Posty: 259
Nick w MP: SzokoHD

Piwa: 23

Respekt: 50


argument 1 jest z?y cos tam boolean. A nie powinno byc przypadkiem tak ? *local r = dbQuery(conn, "SELECT FROM OP_Vehicles WHERE id=?", id)**

Wysłany: 2016-07-06, 16:09

Jacob
Głupiomądry

Wiek: 28
Na forum: 5502 dni
Posty: 967
Nick w MP: Jacob

Piwa: 786

Respekt: 212,3
Respekt: 212,3

Powinno, wybacz.

local conn = dbConnect ( "sqlite", "db.db" )

addEventHandler ( "onResourceStart", resourceRoot, function ()
    if conn then
        dbExec ( conn, "CREATE TABLE IF NOT EXISTS OP_Vehicles(id INTEGER PRIMARY KEY AUTOINCREMENT, model INTEGER, posx FLOAT, posy FLOAT, posz FLOAT, rotx FLOAT, roty FLOAT, rotz FLOAT, color1 INTEGER, color2 INTEGER, color3 INTEGER, color4 INTEGER, owner VARCHAR, przebieg FLOAT, paliwo FLOAT, bak FLOAT, paintjob INTEGER, hr INTEGER, hg INTEGER, hb INTEGER, felgi INTEGER, t0 INTEGER, t1 INTEGER, t2 INTEGER, t3 INTEGER, t4 INTEGER, t5 INTEGER, t6 INTEGER, t7 INTEGER, t8 INTEGER, t9 INTEGER, t13 INTEGER, t14 INTEGER, t15 INTEGER, t16 INTEGER, tablica TEXT, wariant1 INTEGER, wariant2 INTEGER, vmax FLOAT, acceler FLOAT )" )
        local q = dbQuery ( conn, "SELECT * FROM OP_Vehicles")
        local result = dbPoll ( q, -1 )
        if #result > 0 then
            for _,v in pairs ( result ) do
                local auto = createVehicle ( v["model"], v["posx"], v["posy"], v["posz"], v["rotx"], v["roty"], v["rotz"] )
                setVehicleColor ( auto, v["color1"], v["color2"], v["color3"], v["color4"] )
                setElementData (auto, "vehid", v["id"])
                setElementData (auto, "owner", v["owner"])
                setElementData (auto, "przebieg", v["przebieg"])
                setElementData (auto, "paliwo", v["paliwo"])
                setElementData (auto, "bak", v["bak"])        
                for i= 0, 9 do
                    addVehicleUpgrade(auto, v["t"..i..""])
                end    
                for is = 13,16 do
                    addVehicleUpgrade(auto, v["t"..is..""])
                end
                setVehiclePaintjob(auto, v["paintjob"])
                setVehicleVariant(auto, v["wariant1"], v["wariant2"])
                setVehicleHeadLightColor(auto, v["hr"], v["hg"], v["hb"])
                setVehiclePlateText(auto, v["tablica"])
                setVehicleHandling(auto, "engineAcceleration", v["acceler"])
                setVehicleHandling(auto, "maxVelocity", v["vmax"])
                setVehicleOverrideLights(auto, 1)
            end
        end
        dbFree(q)
    end
end)



addCommandHandler("zapisz", function ( plr )
    acc = getAccountName(getPlayerAccount(plr))
    if isObjectInACLGroup("user." ..acc, aclGetGroup("Admin")) then
        for _,v in ipairs ( getElementsByType ( "vehicle") ) do
            if getElementData(v, "prywatne") then
                local pojazdID = getElementModel ( v )
                local c1,c2,c3,c4 = getVehicleColor ( v )
                local x,y,z = getElementPosition ( v )
                local rotx, roty, rotz = getElementRotation ( v )
                local owner = getElementData(v, "owner")
                local przebieg = getElementData(v, "przebieg")
                local paliwo = getElementData(v, "paliwo")
                local bak = getElementData(v, "bak")
                local t0 = getVehicleUpgradeOnSlot(v, 0)
                local t1 = getVehicleUpgradeOnSlot(v, 1)
                local t2 = getVehicleUpgradeOnSlot(v, 2)
                local t3 = getVehicleUpgradeOnSlot(v, 3)
                local t4 = getVehicleUpgradeOnSlot(v, 4)
                local t5 = getVehicleUpgradeOnSlot(v, 5)
                local t6 = getVehicleUpgradeOnSlot(v, 6)
                local t7 = getVehicleUpgradeOnSlot(v, 7)
                local t8 = getVehicleUpgradeOnSlot(v, 8)
                local t9 = getVehicleUpgradeOnSlot(v, 9)
                local t13 = getVehicleUpgradeOnSlot(v, 13)
                local t14 = getVehicleUpgradeOnSlot(v, 14)
                local t15 = getVehicleUpgradeOnSlot(v, 15)
                local t16 = getVehicleUpgradeOnSlot(v, 16)
                local felgi = getVehicleUpgradeOnSlot(v, 12)
                local paintjob = getVehiclePaintjob(v)
                local hr, hg, hb = getVehicleHeadLightColor(v)
                local tablica = getVehiclePlateText(v)
                local wariant1, wariant2 = getVehicleVariant(v)
                local vmax = getVehicleHandling(v).maxVelocity
                local acceler = getVehicleHandling(v).engineAcceleration
                local id = getElementData(v, "vehid")
                
                if ( id ) then
                    outputChatBox("update")
                    local r = dbQuery(conn, "SELECT * FROM OP_Vehicles WHERE id=?", id)
                    local p = dbPoll(r, -1)
                    if #p > 0 then
                        dbExec ( conn, "UPDATE OP_Vehicles SET model=?, posx=?, posy=?, posz=?, rotx=?, roty=?, rotz=?, color1=?, color2=?, color3=?, color4=?, owner=?, przebieg=?, paliwo=?, bak=?, paintjob=?, hr=?, hg=?, hb=?, felgi=?, t0=?, t1=?, t2=?, t3=?, t4=?, t5=?, t6=?, t7=?, t8=?, t9=?, t13=?, t14=?, t15=?, t16=?, tablica=?, wariant1=?, wariant2=?, vmax=?, acceler=? WHERE id=?", pojazdID, x, y, z, rotx, roty, rotz, c1, c2, c3, c4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler, id)
                    end
                    dbFree(r)
                else
                    outputChatBox("zapis")
                    dbExec ( conn, "INSERT INTO OP_Vehicles (model, posx, posy, posz, rotx, roty, rotz, color1, color2, color3, color4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)", pojazdID, x, y, z, rotx, roty, rotz, c1, c2, c3, c4, owner, przebieg, paliwo, bak, paintjob, hr, hg, hb, felgi, t0, t1, t2, t3, t4, t5, t6, t7, t8, t9, t13, t14, t15, t16, tablica, wariant1, wariant2, vmax, acceler)
                    
                end
                outputChatBox("* Zapis zako?czony!", plr, 255, 255, 255)
            end
        end
    end
end)

Tagi: wszystkie :: auta :: się :: zapisują

Anonymous

Na forum: 245 dni
Posty: 1

Anonymous Koniecznie zajrzyj na:

Skocz do:

Wyświetl posty z ostatnich:

GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » Wszystkie auta się zapisują

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

Idź do strony: « 1 2 3 4 5 6 7 8 »

Dodaj temat do Ulubionych
Wersja do druku

Zaloguj Zarejestruj