Specifications

Chapter 10. Case Studies
disabling a channel, SMS Messaging Server
will not be able to send/receive SMS
messages on this channel. This property
overrides the EnableSend and EnableReceive
properties
EnableSend Boolean RW By setting EnableSend to False, SMS
Messaging Server will only be able to
receive SMS messages
EnableReceive By setting EnableReceive to False, SMS
Messaging Server will only be able to send
SMS messages on this channel
Device String RW Device name. Can be a TAPI device name (like
‘Standard 9600 bps Modem’) or a direct COM
port (like ‘COM1:’)
DeviceSpeed Number RW Device speed. Only required when using a
direct COM port in the ‘Device property’.
Use ‘0’ to use the default speed
PinCode String RW Specifies the PIN code on the SIM card (if
required)
MultiPart Boolean RW Enable MultiPart to allow messages longer
than 160 characters. If disabled, a message
will be truncated if it exceeds 160
characters
DailyLimit Number RW Maximum number of outgoing SMS messages per
day
SubscriberID String RW SMS mobile number that is associated with
the SIM card. It cannot be read from the SIM
card so it must be specified manually
LeaveMessageOnDevice Boolean RW Specifies whether or not to leave a copy of
the message on the device after receive
LastError Number R Completion code of the last called function
Functions:
Function Parameter(s) Description
Clear None Clear all properties
Create None Create a new POP3 channel
Load ChannelID (Number) Load GSM Channel from the configuration
database into the object
Save None Save GSM Channel properties into the
configuration database
Delete ChannelID (Number) Remove a GSM Modem Channel from the
configuration database
Example:
' Load a GSM Modem Channel, change some properties and save it
Set objChannel = CreateObject( "AxSmsServer.GsmModemChannel" )
objChannel.Load( 1001 )
WScript.Echo "Load, result: " & objChannel.LastError
If( objChannel.LastError = 0 ) Then
objChannel.Host = "newhost"
objChannel.Account = "newaccount"
objChannel.Password = "newpassword"
objChannel.Save
WScript.Echo "Save, result: " & objChannel.LastError
End If