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, 14:45


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

Czyli co? jest ?le z zapisem, powstawiaj jaki? outputChatBox po #result >= 1 i po else i zobacz czy w og?le do ifa wchodzi.

Jeszcze usu? ca?? tabel? na wszelki wypadek i daj skryptowi stworzy? j? ponownie.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-06, 14:56


GamerHD11







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

Piwa: 23

Respekt: 50

Tak, auta si? nie zapisuj? ani nie updatuj? ale podczas zapisu wywala outputa "Zapis" i te inne tyle razy ile jest samochod?w.

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"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 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"vehid")
                outputChatBox(owner)
                local wybierz dbQuery(conn"SELECT id FROM OP_Vehicles WHERE id = ?"id)
                local result dbPoll(wybierz, -1)
                if #result >= 1 then
                outputChatBox("Update")
                    local update 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
                outputChatBox("Zapisz")
                    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)
                dbFree(wybierz)
            end
        end
    end
end)


Postaw piwo autorowi tego posta
 

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


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

Dobra, zr?b tak.
Usu? tabele OP_Vehicles, a p??niej zastartuj skrypt z tym kodem
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"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 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"vehid")
                
                if ( id then
                    local update 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
                outputChatBox("* Zapis zako?czony!"plr255255255)
            end
        end
    end
end)


Postaw piwo autorowi tego posta
 

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


GamerHD11







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

Piwa: 23

Respekt: 50

Nie dzia?a, tylko pisze na czacie ?e zapis zako?czony ale auto znika po restarcie zasobu i nic nie dodaje si? do tabeli OP_Vehicles. Nie ma nic w DB3 i jeszcze utworzy?a si? tabela sqlitesequence to dobrze ?

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

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


luki123luki123

Place Game






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

Piwa: 6101

Respekt: 611
Respekt: 611Respekt: 611

Jacob, ?le tutaj jest :)
  local update 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)

Oraz te if id jak to ma niby dzia?a? samoch?d ma id to go update jak nawet tego pojazdu nie ma bo nie b?dzie on zapisany.
Twoje rozwi?zanie nie ma sprawa dzia?a? :)

Postaw piwo autorowi tego posta
 

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


GamerHD11







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

Piwa: 23

Respekt: 50

luki123luki123, to tego ifa zmieni? na tego poprzedniego z "result >= 1" a co jest ?le w tym UPDATE ?

Postaw piwo autorowi tego posta
 

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


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

Ma prawo dzia?a?. Je?eli nie ma zapisanego ID na element dat?, to znaczy ?e nie ma go w bazie danych jeszcze wi?c trzeba go doda?.

Postaw piwo autorowi tego posta
 

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


luki123luki123

Place Game






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

Piwa: 6101

Respekt: 611
Respekt: 611Respekt: 611

GamerHD11, sprawd?:
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 connect"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)
                        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)
                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)

A co do update to funkcja dxExec nic nie zwraca, a kilka post?w wyzej Jacob pisa? o tym a sam zapomina? o tym :)

Postaw piwo autorowi tego posta
 

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


GamerHD11







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

Piwa: 23

Respekt: 50

Dobra Luki z twojego kodu nic nie zapisuje ale wywala DB3 w linijkach 70, 71, 72(Bad Argument 1) a w 73 length of local 'result' (a boolean value)

P.S. By? b??d z zmienn? i zmieni?em to ale i tak si? nie zapisa?o ale wiadomoc wyskoczy?a ?e po raz pierwszy zapisano, w DB3 nic i w bazie te? nic si? nie zapisa?o

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

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


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

Ju? widz? b??d. Zapytanie by?o ?le skonstruowane, bo by? ',' przed WHERE.
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"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 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"vehid")
                
                if ( id then
                    local update 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
                outputChatBox("* Zapis zako?czony!"plr255255255)
                dbFree(wybierz)
            end
        end
    end
end)


Postaw piwo autorowi tego posta
 

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


GamerHD11







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

Piwa: 23

Respekt: 50

Jacob, dalej nic nie dzia?a. Nie zapisuje pojazdu do bazy wgl.

Postaw piwo autorowi tego posta
 

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


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

Czuj?, ?e zbli?amy si? ku ko?cowi. Nast?pny b??d w zapytaniu znalaz?em, za du?o by?o znak?w zapytania. Sprawd? teraz
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"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 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"vehid")
                
                if ( id then
                    local update 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
                outputChatBox("* Zapis zako?czony!"plr255255255)
                dbFree(wybierz)
            end
        end
    end
end)


Postaw piwo autorowi tego posta
 

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


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)
                        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)
                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, 15:35


GamerHD11







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

Piwa: 23

Respekt: 50

Dalej nic, tylko ten output wywala. A takie pytanie co ka?de sprawdzanie skryptu mam usuwa? tabel? OP_Vehicles ?

Postaw piwo autorowi tego posta
 

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


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

Je?eli ju? jest tam kolumna 'ID' to nie. Jeszcze poszukam b??d?w.

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