Private Const WSURL = "https://login.parsgreen.com/Api/SendSMS.asmx"
Private Const Signature = "----"
Private Const Sender = "...."
Private Const XM = "<?xml version='1.0' encoding='utf-8'?>" & _
"<soap12:Envelope xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' xmlns:xsd='http://www.w3.org/2001/XMLSchema' xmlns:soap12='http://www.w3.org/2003/05/soap-envelope'>" & _
"<soap12:Body><SendGroupSMS xmlns='http://ParsGreen.com/'>" & _
"<signature>@SGN</signature>" & _
"<from>@SDR</from>" & _
"<to><string>@M</string></to>" & _
"<text>@T</text>" & _
"<isFlash>false</isFlash>" & _
"<udh></udh>" & _
"<retStr></retStr>" & _
"</SendGroupSMS></soap12:Body></soap12:Envelope>"
Public Type SendGroupSMSResponse
SendGroupSMSResult As Integer
success As Integer
http_status As Integer
http_status_text As String
End Type