¡Regístrate!
Crea una cuenta de usuario y envía tus mensajes SMS en segundos. Tendrás todas las funcionalidades y prestaciones en una misma plataforma.
Envía desde API y gestiona tu cuenta con nuestra aplicación online WebSMS.
A continuación se muestran los ejemplos de código de programación en el lenguaje VB.net para enviar mensajes SMS a través de la API de la plataforma LabsMobile.
También dispones de ejemplos de código en Visual Basic y otros lenguajes de programación.
Te recomendamos consultes y tengas en cuenta los siguientes recursos y ayuda en tu integración:
Este es el código de ejemplo en VB.net para enviar mensajes SMS con la SMS API de LabsMobile en la versión JSON. Como se puede ver se debe crear una estructura JSON con todos los parámetros del envío y realizar una llamada HTTP/POST con los datos JSON en el cuerpo de la llamada.
Es imprescindible realizar la llamada con la autentificación del nombre de usuario (email de registro) y la contraseña (o token API) de la cuenta.
Dim myReq As HttpWebRequest Dim myResp As HttpWebResponse myReq = HttpWebRequest.Create("https://api.labsmobile.com/json/send") myReq.Method = "POST" myReq.ContentType = "application/json" myReq.Headers.add("Authorization", "Basic " & Convert.ToBase64String(Encoding.UTF8.GetBytes("myusername:mypassword"))) Dim myData As String = "{\"message\":\"Text of the SMS message\", \"tpoa\":\"Sender\",\"recipient\":[{\"msisdn\":\"12015550123\"},{\"msisdn\":\"447400123456\"},{\"msisdn\":\"5212221234567\"}]}" myReq.GetRequestStream.Write(System.Text.Encoding.UTF8.GetBytes(myData), 0, System.Text.Encoding.UTF8.GetBytes(myData).Count) myResp = myReq.GetResponse Dim myreader As New System.IO.StreamReader(myResp.GetResponseStream) Dim myText As String myText = myreader.ReadToEnd
Puedes consultar todos los parámetros JSON disponibles, opciones de configuración, manuales y especificaciones en la siguiente url: https://apidocs.labsmobile.com/?vb--vbnet#send-sms
Ejemplo de código en VB.net para la consulta del saldo de una cuenta. El resultado siempre se obtiene en créditos internos de la plataforma LabsMobile.
Dim myReq As HttpWebRequest Dim myResp As HttpWebResponse myReq = HttpWebRequest.Create("https://api.labsmobile.com/json/balance") myReq.Method = "GET" myReq.ContentType = "application/json" myReq.Headers.add("Authorization", "Basic " & Convert.ToBase64String(Encoding.UTF8.GetBytes("myusername:mypassword"))) myResp = myReq.GetResponse Dim myreader As New System.IO.StreamReader(myResp.GetResponseStream) Dim myText As String myText = myreader.ReadToEnd
Ejemplo de envío para la versión GET de la SMS API de LabsMobile. Este es un método básico y simple de enviar mensajes SMS desde una aplicación o software creada en VB.net codificando todos los parámetros en la misma url.
Es importante codificar todos los valores como url (con la función urlencode() por ejemplo).
Puedes ver y descargar el manual de la API GET de LabsMobile en la siguiente url: https://www.labsmobile.com/es/api-sms/versiones-api/http-get
Imports System.Net Imports System.IO Dim client As WebClient = New WebClient client.Headers.Add("user-agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; .NET CLR 1.0.3705;)") client.QueryString.Add("username", "xx@xx.xxx") client.QueryString.Add("password", "xxxxxxxx") client.QueryString.Add("msisdn", "xxxx") client.QueryString.Add("message", "This is an example message") Dim baseurl As String = "http://api.labsmobile.com/get/send.php" Dim data As Stream = client.OpenRead(baseurl) Dim reader As StreamReader = New StreamReader(data) Dim s As String = reader.ReadToEnd() data.Close() reader.Close() Return
Imports System.Net Imports System.IO Dim client As WebClient = New WebClient client.Headers.Add("user-agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; .NET CLR 1.0.3705;)") client.QueryString.Add("username", "xx@xx.xxx") client.QueryString.Add("password", "xxxxxxxx") Dim baseurl As String = "http://api.labsmobile.com/get/balance.php" Dim data As Stream = client.OpenRead(baseurl) Dim reader As StreamReader = New StreamReader(data) Dim s As String = reader.ReadToEnd() data.Close() reader.Close() Return
Dentro del entorno de programación VisualStudio.net en el apartado Solution Explorer hacer click en Add Service Reference.Aparecerá el diálogo adjunto. Copiar la siguiente url: http://api.labsmobile.com/ws/services/LabsMobileWsdl.php?wsdl. Crear un nombre al Namespace por ejemplo"LabsMobileAPI".
Dim res As String = New client.LabsMobileAPI.SendSMS( "priv00x", "xx@xx.xxx", "xxxxxxxx", "<?xml version="1.0" encoding="UTF-8"?> <sms> <recipient> <msisdn>34609827393</msisdn> </recipient> <message><![CDATA[This is an example message]]></message> </sms>")
Dentro del entorno de programación VisualStudio.net en el apartado Solution Explorer hacer click en Add Service Reference.Aparecerá el diálogo adjunto. Copiar la siguiente url: http://api.labsmobile.com/ws/services/LabsMobileWsdl.php?wsdl. Crear un nombre al Namespace por ejemplo"LabsMobileAPI".
string resultado = new Client.LabsMobileAPI.GetCredit( "xx@xx.xxx", "xxxxxxxx")
Crea una cuenta de usuario y envía tus mensajes SMS en segundos. Tendrás todas las funcionalidades y prestaciones en una misma plataforma.
Envía desde API y gestiona tu cuenta con nuestra aplicación online WebSMS.
Validación de usuarios a la app y envío de invitaciones para la descarga de la aplicación a los contactos de los usuarios.
En LabsMobile sólo ofrecemos rutas directas de máxima fiabilidad y calidad. Disfruta de nuestra plataforma y de todas nuestros servicios por el precio de un SMS.
Paga SÓLO por los mensajes enviados.
Nuestro departamento técnico cuenta con profesionales con años de experiencia y hemos realizado múltiples integraciones.
Te guiamos y ayudamos en todo el proceso.
Este tutorial explica cómo enviar mensajes SMS a un conjunto de teléfonos con una previa importación de la base de datos o listado.