<%
'Set the values same as you use in your smsgatewayhub.com account
sUser = "user"
spwd ="password"
'Set the mobile number on which you want to send SMS
sNumber = "919893123456"
'Your Message
smsg = "Test SMS from SMSGATEWAYHUB"
' You approved sender id
ssid = "WebSMS"
Dim objXmlHttpMain , sURL
sURL="http://login.smsgatewayhub.com/smsapi/pushsms.aspx?user="& sUser &"&pwd=" & sPassword & "&to=" & sNumber & "&sid="& sSenderID &
"&msg=" & sMessage & "&fl=0"
Set objXmlHttpMain = Server.CreateObject("Msxml2.ServerXMLHTTP")
on error resume next
objXmlHttpMain.open "GET",sURL, False
objXmlHttpMain.setRequestHeader "Content-Type", "text/urlencoded"
objXmlHttpMain.send
'Store response
response.Write (objXmlHttpMain.responseText)
%>