Why wont this save the data in my datastore?

local DSService = game:GetService('DataStoreService'):GetDataStore('namehere')
game.Players.PlayerAdded:connect(function(plr)

    local uniquekey = 'id'..plr.userId

    local charbio = Instance.new('Folder',plr)
    charbio.Name = "CharacterBio"

    local new = Instance.new('StringValue',charbio)
    new.Name = "New"

    local gender = Instance.new('StringValue',charbio)
    gender.Name = "Gender"

    local hair = Instance.new('StringValue',charbio)
    hair.Name = "Hair"

    local hairc = Instance.new('StringValue',charbio)
    hairc.Name = "HairC"

    local shirt = Instance.new('IntValue',charbio)
    shirt.Name = "Shirt"

    local pants = Instance.new('IntValue',charbio)
    pants.Name = "Pants"

    local dress = Instance.new('StringValue',charbio)
    dress.Name = "Dress"

    local mask = Instance.new('StringValue',charbio)
    mask.Name = "Mask"

    local gloves = Instance.new('IntValue',charbio)
    gloves.Name = "Gloves"

    local elite = Instance.new('StringValue',charbio)
    elite.Name = "Elite"

    local class = Instance.new('StringValue',charbio)
    class.Name = "Class"

    local scar = Instance.new('IntValue',charbio)
    scar.Name = "Scar"

    local skin = Instance.new('StringValue',charbio)
    skin.Name = "Skin"

    local gold = Instance.new('IntValue',charbio)
    gold.Name = "Gold"

    local level = Instance.new('IntValue',charbio)
    level.Name = "Level"

    local exp = Instance.new('IntValue',charbio)
    exp.Name = "Experience"

    local GetSaved = DSService:GetAsync(uniquekey)
    if GetSaved then
    for i,v in pairs(charbio:GetChildren()) do
       v.Value = GetSaved[i]
    end
    else 
    local NumbersForSaving = {new.Value,gender.Value,hair.Value,hairc.Value,shirt.Value,pants.Value,dress.Value,mask.Value,gloves.Value,elite.Value,class.Value,scar.Value,skin.Value,gold.Value,level.Value,exp.Value}

    DSService:SetAsync(uniquekey, NumbersForSaving)
    end

end)


game.Players.PlayerRemoving:connect(function(plr)

    local uniquekey = 'id'..plr.userId
    local bio = plr.CharacterBio
    local Savetable = {bio.New.Value,bio.Gender.Value,bio.Hair.Value,bio.HairC.Value,bio.Shirt.Value,bio.Pants.Value,bio.Dress.Value,bio.Mask.Value,bio.Gloves.Value,bio.Elite.Value,bio.Class.Value,bio.Scar.Value,bio.Skin.Value,bio.Gold.Value,bio.Level.Value,bio.Experience.Value}
    DSService:SetAsync(uniquekey, Savetable)
    print("saved")

end)

game.OnClose = function() 
    wait(30)
end

It always prints "saved" when players exit, but it never saves changes made to their data throughout their time playing.