如何使用DELETE FROM只保留一条记录？

Question

我创建了一个脚本，用于检查某些数据库表中是否有序列号列具有相同值的行。 如何为任何给定的序列号删除除一行外的所有行？

LINK DATBASE：

local function Antidupe()
-- USAR FROM 62 OU 70 ELE VAI PEGAR APARTIR DO 62 ou 70 CARACTERS
    local tablesToCheck = {"player_items", "player_depotitems", "tile_items"}
    local itemsToCheck = {2523}
    local text, final = "", ""
    local filex = "data/logs/Duplicated.txt"
    local f = io.open(filex, "a+")
    local count = 0
    local Caracters = 70
    for i = 1, table.maxn(tablesToCheck) do
        for _, item in ipairs(itemsToCheck) do
            if(type(tablesToCheck[i]) == "string") then
                local query = db.getResult("SELECT *, SUBSTRING(CONVERT(attributes USING latin1) FROM "..Caracters..") AS 'track' FROM " .. tablesToCheck[i] .. " WHERE itemtype = "..item.." AND SUBSTRING(CONVERT(attributes USING latin1) FROM "..Caracters..") IN (SELECT SUBSTRING(CONVERT(attributes USING latin1) FROM "..Caracters..") FROM " .. tablesToCheck[i] .. " WHERE CONVERT(attributes USING latin1) LIKE '%serial%' GROUP BY SUBSTRING(CONVERT(attributes USING latin1) FROM "..Caracters..") HAVING COUNT(*) > 1)")
                    if(query:getID() < 1) then
                        print("[!] [Anti-Dupe] -> No duplicated item was found in the database!")
                    end
                    if(query:getID() ~= -1) then
                        while(true) do
                            local delete = db.executeQuery("DELETE FROM " .. tablesToCheck[i] .. " WHERE SUBSTRING(CONVERT(attributes USING latin1) FROM "..Caracters..") = " .. db.escapeString(query:getDataString("track")) .. ";")
                            text = "[!] [Anti-Dupe] -> Deleting item with duplicated serial from '" .. tablesToCheck[i] .. "' [Player: " .. getPlayerNameByGUID(query:getDataInt("player_id")) .. ", Item: " .. query:getDataInt("itemtype") .. ", Count: " .. query:getDataInt("count") .. ", Serial: " .. query:getDataString("track") .."]... " .. (delete and "Success!" or "Failed!")
                            count = (delete and count + 1 or count)
                            final = final .. (final ~= "" and "\n" or "") .. text
                            print(text)
                            if not query:next() then break end
                        end 
                    end
                end
            end
        end
        if(f ~= nil) then
            f:write("[" .. os.date("%d %B %Y Hora: %X") .. "] >> [Anti-Dupe] " .. count .. " duplicated items have been deleted from the database.\n" .. (final == "" and "[!] [Anti-Dupe] -> No duplicated item was found in the database" or final) .. "\n\n")
            f:close()
        else
            print("[!] [Anti-Dupe] -> Cannot save info to file!")
        end
    return true
end

function onSay(cid, words, param)
        Antidupe()
    return true
end