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

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


GamerHD11







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

Piwa: 23

Respekt: 50

Nie ma teraz ?adnych DB3, i nie zapisuje nic ale pisze update a jakby tak jakos po??czy? dwa kody ? Bo ten od lukiego insertuje auta a ten tw?j powinien updateowac ale chyba nie ma jak bo nie ma stworzonej kolumny od tego pojazdu ?

Postaw piwo autorowi tego posta
 

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


luki123luki123

Place Game






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

Piwa: 6101

Respekt: 611
Respekt: 611Respekt: 611

Jacob, nie znasz nawet sk?adni funkcji, a ze mnie si? ?mia?e? :D

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, -)
            for _,v in pairs result ) do
                local auto createVehicle v["model"], v["posx"], v["posy"], v["posz"], v["rotx"], v["roty"], v["rotz"] )
                setVehicleColor autov["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 i0do
                addVehicleUpgrade(autov["t"..i..""])
                end
                for 13,16 do
                addVehicleUpgrade(autov["t"..i..""])
                end
                setVehiclePaintjob(autov["paintjob"])
                setVehicleVariant(autov["wariant1"], v["wariant2"])
                setVehicleHeadLightColor(autov["hr"], v["hg"], v["hb"])
                setVehiclePlateText(autov["tablica"])
                setVehicleHandling(auto"engineAcceleration"v["acceler"])
                setVehicleHandling(auto"maxVelocity"v["vmax"])
                setVehicleOverrideLights(auto1)
            end
    end
end)


addCommandHandler("zapisz", function ( plr )
    acc getAccountName(getPlayerAccount(plr))
    if isObjectInACLGroup("user." ..accaclGetGroup("Admin")) then
        for _,v in ipairs getElementsByType "vehicle") ) do
            if getElementData(v"prywatne"then
                local pojazdID getElementModel )
                local c1,c2,c3,c4 getVehicleColor )
                local x,y,getElementPosition )
                local rotxrotyrotz getElementRotation )
                local owner getElementData(v"owner")
                local przebieg getElementData(v"przebieg")
                local paliwo getElementData(v"paliwo")
                local bak getElementData(v"bak")
                local t0 getVehicleUpgradeOnSlot(v0)
                local t1 getVehicleUpgradeOnSlot(v1)
                local t2 getVehicleUpgradeOnSlot(v2)
                local t3 getVehicleUpgradeOnSlot(v3)
                local t4 getVehicleUpgradeOnSlot(v4)
                local t5 getVehicleUpgradeOnSlot(v5)
                local t6 getVehicleUpgradeOnSlot(v6)
                local t7 getVehicleUpgradeOnSlot(v7)
                local t8 getVehicleUpgradeOnSlot(v8)
                local t9 getVehicleUpgradeOnSlot(v9)
                local t13 getVehicleUpgradeOnSlot(v13)
                local t14 getVehicleUpgradeOnSlot(v14)
                local t15 getVehicleUpgradeOnSlot(v15)
                local t16 getVehicleUpgradeOnSlot(v16)
                local felgi getVehicleUpgradeOnSlot(v12)
                local paintjob getVehiclePaintjob(v)
                local hrhghb getVehicleHeadLightColor(v)
                local tablica getVehiclePlateText(v)
                local wariant1wariant2 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, -)
                    dbFree zapis )
                    if #result == 1 then    
                        outputChatBox("Twoje auto zosta?o zaktualizowane!"plr255,0)
                        local qh dbQuery conn"UPDATE OP_Vehicles SET model ="..pojazdID..", posx ="..x..", posy ="..y..", posz ="..z..", rotx ="..rotx..", roty ="..roty..", rotz ="..rotz..", color1 ="..c1..", color2 ="..c2..", color3 ="..c3..", color4 ="..c4..", owner ="..owner..", przebieg ="..przebieg..", paliwo ="..paliwo..", bak ="..bak..", paintjob ="..paintjob..", hr ="..hr..", hg ="..hg..", hb ="..hb..", felgi ="..felgi..", t0 ="..t0..", t1 ="..t1..", t2 ="..t2..", t3 ="..t3..", t4 ="..t4..", t5 ="..t5..", t6 ="..t6..", t7 ="..t7..", t8 ="..t8..", t9 ="..t9..", t13 ="..t13..", t14 ="..t14..", t15 ="..t15..", t16 ="..t16..", tablica ="..tablica..", wariant1 ="..wariant1..", wariant2 ="..wariant2..", vmax ="..vmax..", acceler ="..acceler.." WHERE id ="..id.."")                                                                                                                                                                                                                                                                                                                                                    ownerprzebiegpaliwobakpaintjobhrhghbfelgit0t1t2t3t4t5t6t7t8t9t13t14t15t16tablicawariant1wariant2vmaxaccelerid)
                        dbFree(qh)
                elseif #result == 0 then
                        outputChatBox("Twoje auto zosta?o zapisane poraz pierwszy !"plr255,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 (?, ?, ?, ?, ?, ?, ?, ?, ? ,?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)"pojazdIDxyzrotxrotyrotzc1c2c3c4ownerprzebiegpaliwobakpaintjobhrhghbfelgit0t1t2t3t4t5t6t7t8t9t13t14t15t16tablicawariant1wariant2vmaxacceler)
                    end
                end    
            end
        end
    end
end)

Zobacz :)

Postaw piwo autorowi tego posta
 

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


Jacob

Głupiomądry






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

Piwa: 786

Respekt: 212,3
Respekt: 212,3Respekt: 212,3

Na co dzie? u?ywam OOP, tam si? nie podaj? tych argument?w.
Pytanko, tabela jest czysta? Bo je?eli tak, to jakim cudem auto ma ju? jakie? "vehid" i przechodzi do update'u?

Postaw piwo autorowi tego posta
 

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


GamerHD11







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

Piwa: 23

Respekt: 50

Luki wywala w 75 b??d ?e = jest blisko )

Tak tabela jest czysta

Postaw piwo autorowi tego posta
 

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


luki123luki123

Place Game






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

Piwa: 6101

Respekt: 611
Respekt: 611Respekt: 611

GamerHD11, podaj ca?y b??d.

Postaw piwo autorowi tego posta
 

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


Jacob

Głupiomądry






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

Piwa: 786

Respekt: 212,3
Respekt: 212,3Respekt: 212,3

Dodaj po zmiennej 'id' outputChatBox(tostring(id))
To id powinno by? false, bo nie by?o wcze?niej ustawiane i powinno przechodzi? do insertu.

Postaw piwo autorowi tego posta
 

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


GamerHD11







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

Piwa: 23

Respekt: 50

luki123luki123,
ERROR: Loading script failed: [gameplay]\Us-Salon\server.lua:75: '=' expected near ')'

Postaw piwo autorowi tego posta
 

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


Jacob

Głupiomądry






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

Piwa: 786

Respekt: 212,3
Respekt: 212,3Respekt: 212,3

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, -)
        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 autov["color1"], v["color2"], v["color3"], v["color4"] )
                setElementData (auto"veh:id"v["id"])
                setElementData (auto"owner"v["owner"])
                setElementData (auto"przebieg"v["przebieg"])
                setElementData (auto"paliwo"v["paliwo"])
                setElementData (auto"bak"v["bak"])        
                for i0do
                    addVehicleUpgrade(autov["t"..i..""])
                end    
                for is 13,16 do
                    addVehicleUpgrade(autov["t"..is..""])
                end
                setVehiclePaintjob(autov["paintjob"])
                setVehicleVariant(autov["wariant1"], v["wariant2"])
                setVehicleHeadLightColor(autov["hr"], v["hg"], v["hb"])
                setVehiclePlateText(autov["tablica"])
                setVehicleHandling(auto"engineAcceleration"v["acceler"])
                setVehicleHandling(auto"maxVelocity"v["vmax"])
                setVehicleOverrideLights(auto1)
            end
        end
        dbFree(q)
    end
end)



addCommandHandler("zapisz", function ( plr )
    acc getAccountName(getPlayerAccount(plr))
    if isObjectInACLGroup("user." ..accaclGetGroup("Admin")) then
        for _,v in ipairs getElementsByType "vehicle") ) do
            if getElementData(v"prywatne"then
                local pojazdID getElementModel )
                local c1,c2,c3,c4 getVehicleColor )
                local x,y,getElementPosition )
                local rotxrotyrotz getElementRotation )
                local owner getElementData(v"owner")
                local przebieg getElementData(v"przebieg")
                local paliwo getElementData(v"paliwo")
                local bak getElementData(v"bak")
                local t0 getVehicleUpgradeOnSlot(v0)
                local t1 getVehicleUpgradeOnSlot(v1)
                local t2 getVehicleUpgradeOnSlot(v2)
                local t3 getVehicleUpgradeOnSlot(v3)
                local t4 getVehicleUpgradeOnSlot(v4)
                local t5 getVehicleUpgradeOnSlot(v5)
                local t6 getVehicleUpgradeOnSlot(v6)
                local t7 getVehicleUpgradeOnSlot(v7)
                local t8 getVehicleUpgradeOnSlot(v8)
                local t9 getVehicleUpgradeOnSlot(v9)
                local t13 getVehicleUpgradeOnSlot(v13)
                local t14 getVehicleUpgradeOnSlot(v14)
                local t15 getVehicleUpgradeOnSlot(v15)
                local t16 getVehicleUpgradeOnSlot(v16)
                local felgi getVehicleUpgradeOnSlot(v12)
                local paintjob getVehiclePaintjob(v)
                local hrhghb getVehicleHeadLightColor(v)
                local tablica getVehiclePlateText(v)
                local wariant1wariant2 getVehicleVariant(v)
                local vmax getVehicleHandling(v).maxVelocity
                local acceler getVehicleHandling(v).engineAcceleration
                local id getElementData(v"veh:id")
                
                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=?"pojazdIDxyzrotxrotyrotzc1c2c3c4ownerprzebiegpaliwobakpaintjobhrhghbfelgit0t1t2t3t4t5t6t7t8t9t13t14t15t16tablicawariant1wariant2vmaxaccelerid)
                    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 (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"pojazdIDxyzrotxrotyrotzc1c2c3c4ownerprzebiegpaliwobakpaintjobhrhghbfelgit0t1t2t3t4t5t6t7t8t9t13t14t15t16tablicawariant1wariant2vmaxacceler)
                    
                end
                outputChatBox("* Zapis zako?czony!"plr255255255)
            end
        end
    end
end)

Sprawd? to, mo?liwe, ?e mo?e zadzia?a?.

Postaw piwo autorowi tego posta
 

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


GamerHD11







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

Piwa: 23

Respekt: 50

Teraz zapisuj? si? wszystkie auta ale ju? nie updateuj?

I id zwraca false

Postaw piwo autorowi tego posta
 

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


Jacob

Głupiomądry






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

Piwa: 786

Respekt: 212,3
Respekt: 212,3Respekt: 212,3

Okej, czyli zapis wszystkich aut dzia?a. Jest post?p. Jeszcze posprawdzam.

Postaw piwo autorowi tego posta
 

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


luki123luki123

Place Game






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

Piwa: 6101

Respekt: 611
Respekt: 611Respekt: 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, -)
            for _,v in pairs result ) do
                local auto createVehicle v["model"], v["posx"], v["posy"], v["posz"], v["rotx"], v["roty"], v["rotz"] )
                setVehicleColor autov["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 i0do
                addVehicleUpgrade(autov["t"..i..""])
                end
                for 13,16 do
                addVehicleUpgrade(autov["t"..i..""])
                end
                setVehiclePaintjob(autov["paintjob"])
                setVehicleVariant(autov["wariant1"], v["wariant2"])
                setVehicleHeadLightColor(autov["hr"], v["hg"], v["hb"])
                setVehiclePlateText(autov["tablica"])
                setVehicleHandling(auto"engineAcceleration"v["acceler"])
                setVehicleHandling(auto"maxVelocity"v["vmax"])
                setVehicleOverrideLights(auto1)
            end
    end
end)


addCommandHandler("zapisz", function ( plr )
    acc getAccountName(getPlayerAccount(plr))
    if isObjectInACLGroup("user." ..accaclGetGroup("Admin")) then
        for _,v in ipairs getElementsByType "vehicle") ) do
            if getElementData(v"prywatne"then
                local pojazdID getElementModel )
                local c1,c2,c3,c4 getVehicleColor )
                local x,y,getElementPosition )
                local rotxrotyrotz getElementRotation )
                local owner getElementData(v"owner")
                local przebieg getElementData(v"przebieg")
                local paliwo getElementData(v"paliwo")
                local bak getElementData(v"bak")
                local t0 getVehicleUpgradeOnSlot(v0)
                local t1 getVehicleUpgradeOnSlot(v1)
                local t2 getVehicleUpgradeOnSlot(v2)
                local t3 getVehicleUpgradeOnSlot(v3)
                local t4 getVehicleUpgradeOnSlot(v4)
                local t5 getVehicleUpgradeOnSlot(v5)
                local t6 getVehicleUpgradeOnSlot(v6)
                local t7 getVehicleUpgradeOnSlot(v7)
                local t8 getVehicleUpgradeOnSlot(v8)
                local t9 getVehicleUpgradeOnSlot(v9)
                local t13 getVehicleUpgradeOnSlot(v13)
                local t14 getVehicleUpgradeOnSlot(v14)
                local t15 getVehicleUpgradeOnSlot(v15)
                local t16 getVehicleUpgradeOnSlot(v16)
                local felgi getVehicleUpgradeOnSlot(v12)
                local paintjob getVehiclePaintjob(v)
                local hrhghb getVehicleHeadLightColor(v)
                local tablica getVehiclePlateText(v)
                local wariant1wariant2 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, -)
                    dbFree zapis )
                    if #result == 1 then    
                        outputChatBox("Twoje auto zosta?o zaktualizowane!"plr255,0)
                        local qh dbQuery conn"UPDATE OP_Vehicles SET model="..pojazdID..", posx="..x..", posy="..y..", posz="..z..", rotx="..rotx..", roty="..roty..", rotz="..rotz..", color1="..c1..", color2="..c2..", color3="..c3..", color4="..c4..", owner="..owner..", przebieg="..przebieg..", paliwo="..paliwo..", bak="..bak..", paintjob="..paintjob..", hr="..hr..", hg="..hg..", hb="..hb..", felgi="..felgi..", t0="..t0..", t1="..t1..", t2="..t2..", t3="..t3..", t4="..t4..", t5="..t5..", t6="..t6..", t7="..t7..", t8="..t8..", t9="..t9..", t13="..t13..", t14="..t14..", t15="..t15..", t16="..t16..", tablica="..tablica..", wariant1="..wariant1..", wariant2="..wariant2..", vmax="..vmax..", acceler="..acceler.." WHERE id="..id )
                        dbFree(qh)
                elseif #result == 0 then
                        outputChatBox("Twoje auto zosta?o zapisane poraz pierwszy !"plr255,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 (?, ?, ?, ?, ?, ?, ?, ?, ? ,?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)"pojazdIDxyzrotxrotyrotzc1c2c3c4ownerprzebiegpaliwobakpaintjobhrhghbfelgit0t1t2t3t4t5t6t7t8t9t13t14t15t16tablicawariant1wariant2vmaxacceler)
                    end
                end    
            end
        end
    end
end)


Postaw piwo autorowi tego posta
 

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


Jacob

Głupiomądry






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

Piwa: 786

Respekt: 212,3
Respekt: 212,3Respekt: 212,3

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, -)
        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 autov["color1"], v["color2"], v["color3"], v["color4"] )
                setElementData (auto"veh:id"v["id"])
                setElementData (auto"owner"v["owner"])
                setElementData (auto"przebieg"v["przebieg"])
                setElementData (auto"paliwo"v["paliwo"])
                setElementData (auto"bak"v["bak"])        
                for i0do
                    addVehicleUpgrade(autov["t"..i..""])
                end    
                for is 13,16 do
                    addVehicleUpgrade(autov["t"..is..""])
                end
                setVehiclePaintjob(autov["paintjob"])
                setVehicleVariant(autov["wariant1"], v["wariant2"])
                setVehicleHeadLightColor(autov["hr"], v["hg"], v["hb"])
                setVehiclePlateText(autov["tablica"])
                setVehicleHandling(auto"engineAcceleration"v["acceler"])
                setVehicleHandling(auto"maxVelocity"v["vmax"])
                setVehicleOverrideLights(auto1)
            end
        end
        dbFree(q)
    end
end)



addCommandHandler("zapisz", function ( plr )
    acc getAccountName(getPlayerAccount(plr))
    if isObjectInACLGroup("user." ..accaclGetGroup("Admin")) then
        for _,v in ipairs getElementsByType "vehicle") ) do
            if getElementData(v"prywatne"then
                local pojazdID getElementModel )
                local c1,c2,c3,c4 getVehicleColor )
                local x,y,getElementPosition )
                local rotxrotyrotz getElementRotation )
                local owner getElementData(v"owner")
                local przebieg getElementData(v"przebieg")
                local paliwo getElementData(v"paliwo")
                local bak getElementData(v"bak")
                local t0 getVehicleUpgradeOnSlot(v0)
                local t1 getVehicleUpgradeOnSlot(v1)
                local t2 getVehicleUpgradeOnSlot(v2)
                local t3 getVehicleUpgradeOnSlot(v3)
                local t4 getVehicleUpgradeOnSlot(v4)
                local t5 getVehicleUpgradeOnSlot(v5)
                local t6 getVehicleUpgradeOnSlot(v6)
                local t7 getVehicleUpgradeOnSlot(v7)
                local t8 getVehicleUpgradeOnSlot(v8)
                local t9 getVehicleUpgradeOnSlot(v9)
                local t13 getVehicleUpgradeOnSlot(v13)
                local t14 getVehicleUpgradeOnSlot(v14)
                local t15 getVehicleUpgradeOnSlot(v15)
                local t16 getVehicleUpgradeOnSlot(v16)
                local felgi getVehicleUpgradeOnSlot(v12)
                local paintjob getVehiclePaintjob(v)
                local hrhghb getVehicleHeadLightColor(v)
                local tablica getVehiclePlateText(v)
                local wariant1wariant2 getVehicleVariant(v)
                local vmax getVehicleHandling(v).maxVelocity
                local acceler getVehicleHandling(v).engineAcceleration
                local id getElementData(v"veh:id")
                
                if ( id 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=?"pojazdIDxyzrotxrotyrotzc1c2c3c4ownerprzebiegpaliwobakpaintjobhrhghbfelgit0t1t2t3t4t5t6t7t8t9t13t14t15t16tablicawariant1wariant2vmaxaccelerid)
                else
                    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 (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"pojazdIDxyzrotxrotyrotzc1c2c3c4ownerprzebiegpaliwobakpaintjobhrhghbfelgit0t1t2t3t4t5t6t7t8t9t13t14t15t16tablicawariant1wariant2vmaxacceler) 
                end
            end
        end
        outputChatBox("* Zapis zako?czony!"plr255255255)
    end
end)

Sprawd?.

Postaw piwo autorowi tego posta
 

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


GamerHD11







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

Piwa: 23

Respekt: 50

Jacob jednak nie bo zrobi?es blad w elementDacie bo powinno by? vehid a nie veh:id teraz sprawdzi?em i jest tak jak wczeeniej i z output wywala 1.

Albo czekaj chwile bo to jednak ja zrobi?em b??d :)

Nie jednak nie dzia?a wog?le nawet nie zapisuje

Postaw piwo autorowi tego posta
 

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


Jacob

Głupiomądry






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

Piwa: 786

Respekt: 212,3
Respekt: 212,3Respekt: 212,3

Specjalnie zmieni?em na veh:id, bo mo?liwe ?e inny skrypt to nadpisuje i dlatego id nie jest puste. Zostaw to veh:id.

Postaw piwo autorowi tego posta
 

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


GamerHD11







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

Piwa: 23

Respekt: 50

Ale auta w salonie maj? nadawane id z elemtnDat? vehid

Luki tw?j kod zapisuje ale nie updatuje ju? tych aut czyli tak jak wczesniej

Ostatnio zmieniony przez GamerHD11 2016-07-06, 16:33, w całości zmieniany 1 raz  
Postaw piwo autorowi tego posta
 

 
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ą 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