Sending SMS

<%
message = “Hello this is testing Sendmode gateway”
message = Server.urlencode(message)
senderid = “TEST”
address = “https://api.sendmode.co.za/httppost.aspx”
username = “yourusername”
password = “yourpassword”
numto = “44712345678”
url = address & “?username=” & username & “&password=” & password & ”

&data1=” & message & “&senderid=” & senderid & “&numto=” & numto & “&type=sendparam”

set xmlhttp = CreateObject(“MSXML2.ServerXMLHTTP”)
xmlhttp.open “POST”, url, false
xmlhttp.send “”
msg = xmlhttp.responseText
response.write(msg)
set xmlhttp = nothing
%>