Also I don't believe this runs because this line does not compile:

            URL = api.smsfactor.com/send?text=" + Message + "&to=" + Recipient
Do you mean this?

            URL = "api.smsfactor.com/send?text=" & Message & "&to=" & Recipient