My song ID uploader isn't working and I need help fixing it how do I fix it?

I am making a game with music but I want to have it so people can put in a custom Song ID but it isn't working also I am using a Text box for people to submit Song IDs should I change that? This is the script Im using

local Song = workspace.SongScript.Song
local SongId = script.Parent.Parent.SongId

function click()
    Song.SoundId = SongId.Text
end
script.Parent.MouseButton1Down:connect(click)