Rank Management Server

local GlitchURL = "" --Place the glitch project URL inside of the quotes

function rankUser(UserId, RoleId)
    game:GetService("HttpService"):GetAsync(GlitchURL .. "ranker?userid=" .. UserId .. "&rank=" .. RoleId)
end



local MarketplaceService = game:GetService("MarketplaceService")


local Configuration = {
{PASSID, RANKID}
}

game.ReplicatedStorage.ClaimRank.OnServerEvent:Connect(function(Player)
    for i = 1, #Configuration do
        local GamepassId = Configuration[i][1]
        local RankId = Configuration[i][2]

        if MarketplaceService:UserOwnsGamePassAsync(Player.UserId, GamepassId) then
            print("Ranked player to " .. RankId)
            rankUser(Player.UserId, RankId)
        end
    end
end)