Отправка SMS через HTTP-протокол с использованием Visual Basic
Примерный код для SMS рассылки на VB может быть таким:
Dim Http Http = CreateObject("Msxml2.XMLHTTP.4.0") Http.Open("POST", "http://alfa-sms.ru:8080/smw/aisms", False) Http.setRequestHeader("Content-Type", "application/ x-www-form-urlencoded; charset=UTF-8") Http.send("user=user11&pass=test1111&action=post_sms &message=Hello&target=+79999999999") MsgBox(Http.responseText, , "responseText")