im making a global leaderboard ?

why is this script not working

for i = 1,10 do
    local Sam = script.sample:Clone()
    Sam.Name = i
    Sam.Parent = script.Parent.surfaceGui.Frame.ScrollingFrame
    Sam.UserPos.Text = "["..tostring(i) .. "]"
    Sam.score.Text = "Nil"
    Sam.Username.Text = ""
    Sam.LayoutOrder = i
    script.Parent.SurfaceGui.Frame.ScrollingFrame.CanvasSize = UDim2.new(0,0,0,50*i)
end

function UpdateGui()
    for i,v in pairs(game.Players:GetChildren())do
        local Data = 1 --This is your score.
        local Datastore = game:GetService("DataStoreService"):GetOrderedDataStore("scoreX1")
        Datastore:SetAsync(v.UserId,Data)
    end
    local DataStore = game:GetService("DataStoreService")GetOrderedDataStore("ScoreX1")
    local pages = DataStore:GetStoredAsync(false,10)
    local Data = pages:GetCurrentPage()
    for k,v in pairs(Data) do
        if tonumber(v.key) >= 1 then
            local  Frame = script.Parent.SurfaceGui.Frame.ScrollingFrame:FindFirstChild(tostring(k))
            if Frame then
                Frame.Username.Text = game.Players:GetNameFromUserIdAsync(v.key)
                Frame.score.Text = tostring(v.Value)

            end
        end
    end
end

while true do
    UpdateGui()
    wait(2)
end