El Kit de herramientas Mobile Messaging es un Kit de herramientas ActiveX/COM que provee la funcionalidad de envío de mensajes SMS para desarrolladores de Software de Windows.
Con el Kit de herramientas SMS ActiveXperts, usted puede enviar Y recibir mensajes SMS (incluyendo WAP, ringtones, mensajes con imagen) a través de:
Met ActiveXperts SMS Component kunnen Pager berichten worden verzonden via een:
![]() Welcome screen |
![]() Visual Studio.NET |
![]() Console Application |
![]() Web Application |
Características SMS:
Pager:
Genérico:
El Kit de herramientas Mobile Messaging ActiveXperts incluye muestras para muchas herramientas de desarrollo, incluyendo:
El Kit de herramientas Mobile Messaging ActiveXperts está disponible como un componente de 32-bit y como uno de 64-bit (siendo ambos parte del producto):
El Kit de herramientas Mobile Messaging ActiveXperts funciona en los siguientes sistemas operativos:
Los siguientes fragmentos de código (VBScript) muestran cómo utilizar el Kit de herramientas SMS ActiveXperts.
Para ver más ejemplos, diríjase a la página Muestras Online del kit de herramientas SMS .
Option Explicit Dim objGsm, objSmsMessage, objSmsConstants Set objGsm = CreateObject ( "AxSms.Gsm" ) Set objSmsMessage = CreateObject ( "AxSms.Message" ) Set objSmsConstants = CreateObject ( "AxSms.Constants" ) objGsm.Open "MultiTech GSM MultiModem", "0000" ' Pincode is 0000. WScript.Echo "Open Device, result: " & objGsm.LastError ' Message: set all properties objSmsMessage.Clear objSmsMessage.ToAddress = "+31612345678" objSmsMessage.Body = "Hello, world!" objSmsMessage.BodyFormat = objSmsConstants.BODYFORMAT_TEXT objGsm.SendSms( objSmsMessage ) WScript.Echo "Send, result: " & objGsm.LastError objGsm.Close
Option Explicit ' Declare objects Dim objSmpp, objMessage, objSmsConstants, objDeliveryStatus ' Declare Variables Dim strReference Dim strServer, nPort, nTimeout, strUsername, strPassword ' Create objects Set objSmpp = CreateObject ( "AxSms.Smpp" ) Set objMessage = CreateObject ( "AxSms.Message" ) Set objSmsConstants = CreateObject ( "AxSms.Constants" ) ' Connect to smpp provider on port 2775, max. 5000msecs before timeout objSmpp.Connect "smpp.activexperts-labs.com", 2775, 5000 If ( objSmpp.LastError <> 0 ) Then WScript.Sleep 3000 WScript.Quit End If objSmpp.Bind objSmsConstants.SMPP_BIND_TRANSMITTER, "myaccount", "mypassword, "", objSmsConstants.SMPP_VERSION_34, 0, 0, "", 5000 Wscript.Echo "Binding Smpp Credentials, result: " & objSmpp.LastError If ( objSmpp.LastError <> 0 ) Then objSmpp.Disconnect WScript.Quit End If ' Message: set all properties objMessage.Clear objMessage.FromAddress = "+3161213456789" objMessage.ToAddress = "+3161122334455" objMessage.Body = "Hello, world!" objMessage.BodyFormat = objSmsConstants.BODYFORMAT_TEXT objSmpp.SubmitSms ( objMessage ) Wscript.Echo "SubmitSms, result: " & objSmpp.LastError objSmpp.Unbind objSmpp.Disconnect WScript.Echo "Ready."
Para obtener información detallada acerca de planes de licencias, clic aquí