SMS and MMS Toolkit - PagerProtocolSnpp object

Overview

Simple Network Paging Protocol (SNPP) is a standard for sending one- and two-way wireless messages to pagers. In its simplest form, SNPP provides a simple way to make a link between the Internet and a Telocator Alphanumeric input Protocol (TAP) paging terminal.
There are many SNPP providers around the world; for a list of providers. check the following web page: www.activexperts.com/xmstoolkit/snpplist.

The PagerProtocolSnpp object is part of the ActiveXperts SMS and MMS Toolkit component. Overview of all SMS and MMS Toolkit objects:

SmsProtocolGsm - Send and receive SMS messages using a GSM modem or a modem-capable GSM phone.
SmsProtocolSmpp - Send and receive SMS messages via an SMPP provider.
SmsProtocolHttp - Send (bulk) SMS messages through an SMS/HTTP compliant SMS provider over the internet/VPN.
SmsProtocolDialup - Send SMS messages using a normal Hayes compatible modem (1200 bps or higher).
MmsProtocolMM1 - Send and receive MMS messages via a GPRS modem through WAP (wireless application protocol).
MmsProtocolMM4 - Send MMS messages via an SMTP server. The protocol is based on SMTP, messages are MIME encoded.
MmsProtocolMM7 - Send and receive MMS messages via SOAP/XML using HTTP as the transport protocol.
PagerProtocolSnpp - Send pager messages via an SNPP provider through the internet/VPN.

Sample code

VBScript sample: Send a Pager message via SNPP


   Set objPagerProtocol = CreateObject("ActiveXperts.PagerProtocolSnpp") ' Create PagerProtocolSnpp instance
   Set objPagerMessage  = CreateObject("ActiveXperts.PagerMessage")  ' Create PagerMessage instance

   objPagerMessage.Recipient      = 5551234                          ' Set recipient number
   objPagerMessage.Data           = "Hello World !!!"                ' Set pager message

   objPagerProtocol.Server        = "snpp.pageallcom.com"            ' Provider's IP or hostname
   objPagerProtocol.ServerPort    = 444
   objPagerProtocol.ServerTimeout =  2500                            ' Set timeout to 2500 msecs

   objPagerProtocol.Send( objPagerMessage )                          ' Send the pager message

   WScript.Echo "Send, result; " & objPagerProtocol.LastError
   WScript.Echo "Last response from SNPP provider: " & objPagerProtocol.ProviderResponse

VB .NET sample: Send a Pager message via SNPP


   Imports AXmsCtrl

   Module Module1
     Sub Main()

       Dim objSnppProtocol As PagerProtocolSnpp = New PagerProtocolSnpp() ' Create instance of COM Object

       objPagerMessage.Recipient      = 5551234                      ' Set recipient number
       objPagerMessage.Data           = "Hello World !!!"            ' Set pager message

       objPagerProtocol.Server        = "snpp.pageallcom.com"        ' Provider's IP or hostname
       objPagerProtocol.ServerPort    = 444
       objPagerProtocol.ServerTimeout =  2500                        ' Set timeout to 2500 msecs

       objPagerProtocol.Send( objPagerMessage )                      ' Send the pager message

       Console.WriteLine("Send, result: {0} ( {1} )", 
                objSnppProtocol.LastError.ToString, 
                objSnppProtocol.GetErrorDescription(objSnppProtocol.LastError) )
       Console.WriteLine( "Last response from SNPP provider: " & objPagerProtocol.ProviderResponse )

End Sub End Module

More samples

Samples are available for: Visual Basic, Visual C/C++, VB .NET, VC# .NET, ASP, ASP .NET, Borland C++ Builder, Boland Delphi, ColdFusion, Java, Javascript, PHP, HTML and more.
On ftp.activexperts-labs.com, you can find many SMS and MMS Toolkit samples. Samples are also part of the SMS and MMS Toolkit installation.