DataStore request was added to queue. If request queue fills, further requests will be dropped?

Full Error: DataStore request was added to queue. If request queue fills, further requests will be dropped. Try sending fewer requests.Key = 1137780701

Why do I get this? It prints out data saved every time but it doesn't actually save data unless you change the value manually (meaning when it gets changed through a local script it doesn't save), the issue might be causing this.

here's my script:

local DataStoreService = game:GetService("DataStoreService")
local dataStore = DataStoreService:GetDataStore("DevelopemntDataV1.1") -- change this to wipe player's data
local hourwait = 24
local possiblerewards = {}
local timenow = tick()
--[[
local Event = Instance.new("RemoteEvent")
Event.Name = "ClickEvent"
Event.Parent = game:GetService("ReplicatedStorage")
--]]
local newThread = coroutine.wrap(function()
    while wait(15) do
        for i, v in ipairs(game:GetService("Players"):GetPlayers()) do
            saveData(v)
        end
    end
end)

function saveData(player)
    --[[
    local lifetimevalue = player.PlayerValues.LifetimeStats.LifetimeClicks.Value
    local storedValue = lifetimevalue ~= 0 and math.floor(math.log(lifetimevalue) / math.log(1.0000001)) or 0
    local lifetimevalue = player.PlayerValues.LifetimeStats.LifetimeGems.Value
    local storedValue2 = lifetimevalue ~= 0 and math.floor(math.log(lifetimevalue) / math.log(1.0000001)) or 0
    --]]
    local tableToSave = {
        player.leaderstats.Flips.Value;
        player.leaderstats.Money.Value;
    }

    local success, err = pcall(function()
        dataStore:SetAsync(player.UserId, tableToSave)
    end)

    if success then
        print("Data has been saved!")
    else
        print("Data hasn't been saved!")
        warn(err)       
    end
end

game.Players.PlayerAdded:Connect(function(player)

    local leaderstats = Instance.new("Folder",player)
    leaderstats.Name = "leaderstats"

    local Flips = Instance.new("IntValue",leaderstats)
    Flips.Name = "Flips"
    Flips.Parent = leaderstats

    local Money = Instance.new("IntValue",leaderstats)
    Money.Name = "Money"
    Money.Parent = leaderstats

    local data

    local success, err = pcall(function()

        data = dataStore:GetAsync(player.UserId)

    end)

    local values = { -- change this to the values you want
        Flips;
        Money;
    }
    if success then
        --[[
        Flips.Value = data[1]
        Money.Value = data[2]--]]
        --[[
        Rebirth.Value = data[3]
        Tokens.Value = data[4]
        Multiplier.Value = data[5]
    --]]
        try, except = pcall(function()
            for i,v in pairs(data)do
                local suc, err = pcall(function()
                    values[i].Value = v
                end)
                if not suc then
                    print(suc)
                    warn(err)
                    print(try)
                    warn(except)
                end
            end
        end)
    end
end)

game.Players.PlayerRemoving:Connect(function(player)
    local success, err  = pcall(function()
        saveData(player)
    end)

    if success then
        print("Data has been saved")
    else
        print("Data has not been saved!")
        warn(err)
    end
end)

game:BindToClose(function()
    for _, player in pairs(game.Players:GetPlayers()) do
        local success, err  = pcall(function()
            saveData(player)
        end)

        if success then
            print("Data has been saved")
        else
            print("Data has not been saved!")
            warn(err)
        end
    end
end)

local e = {
    [1]={
        ""}
}
warn(e[1])
while wait(1) do
    if not (#game.Players:GetPlayers() <= 0) then
        break
    end
end
newThread()
print("Datastore time: ".. tostring(tick() - timenow) .." seconds")