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.

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

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
   Dim objPagerMessage As PagerMessage = New PagerMessage()
   
 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.