|
|
Obsah dokumentace | Uživatelská dokumentace | Administrátorská dokumentace | Rejstřík pojmů | Technická podpora | Hledání on-line |
| Programové odesílání SMS z jiných aplikací |
Tento dokument popisuje, jak odeslat SMS z obecné aplikace. Od čtenáře se očekávají základní programátorské znalosti a znalost práce s COM objekty v prostředí Win32.
Obsah dokumentu
SendSMS.dll z adresáře Program Files/Common Files/Datasys/.
Zaregistrujte jej pomocí regsvr32 sendsms.dll.
Ověřte si, že máte přístupová práva (právo zakládat, přejmenovávat a mazat soubory)
do sharu MxInQueue na MobilChange serveru.
Tím je instalace dokončena.
SENDSMS.SendSMSObj. Vytvořte jej prostředky
Vámi použitého jazyka, například ve VBScriptu:
Dim SendSMS Set SendSMS = CreateObject( "SENDSMS.SendSMSObj" ) |
SendSMS.Init() nainicializuje SendSMS objekt. Není možno odesílat SMS zprávy
před zavoláním této funkce. Tato funkce by měla být zavolána jen jednou na začátku práce. Syntaxe je:
SendSMS.Init( appname, [server] )
appname |
(textový řetězec) Jméno odesílající aplikace. Nesmí obsahovat nic jiného, než malá písmena anglické abecedy a číslice. |
server |
(textový řetězec) Jméno MobilChange serveru. Pokud je předán prázdný řetězec, přistupuje se na lokální počítač. |
(návratová |
Textový řetězec "OK" = úspěšná inicializace, "ERROR" = problém při inicializaci. |
Příklad použití:
Dim rc rc = SendSMS.Init( "banking1", "server15" ) If rc <> "OK" Then ' zde je třeba zpracovat chybu End If |
SendSMS.SendSMS() odesílá SMS zprávu. Syntaxe je:
SendSMS(To, Text, [NoModify=False], [FromName], [FromEmail], [FromSmtp], [Language], [DR=False])
To |
(textový řetězec) Telefonní číslo adresáta. |
Text |
(textový řetězec) Text zprávy. |
NoModify |
(True/False) Pokud je True, text zprávy je odeslán přesně tak, jak byl zadán aplikací.
Pokud je False, text je zpracován pomocí MobilChange stejným zprůsobem, jako
odesílané e-maily, tj. jsou vynechány mezery, překódovaná čeština atd.
|
FromName |
(textový řetězec) Jméno uživatele, za kterého aplikace SMS odesílá.
Případné potvrzení o doručení bude posláno na toto jméno. |
FromEmail |
(textový řetězec) E-mail adresa uživatele, za kterého aplikace SMS odesílá, v rámci
lokálního e-mail systému (tj. např EX: adresa u Exchange serveru).
Případné potvrzení o doručení bude posláno na tuto adresu. |
FromSMTP |
(textový řetězec) SMTP adresa uživatele, za kterého aplikace SMS odesílá.
Případné potvrzení o doručení bude posláno na tuto adresu. |
Language |
(textový řetězec) Kód jazyka uživatele, za kterého aplikace SMS odesílá.
Případné potvrzení o doručení bude posláno v tomto jazyce. Povolené kódy odpovídají názvům podadresářů v adressáři MobilChange/data/, tj. CZ, UK, ... |
DR |
(True/False) Pokud je True, je vyžadováno potvrzení o doručení.
Pokud je False, nechce aplikace potvrzení o doručení.
|
(návratová |
Textový řetězec "OK", pokud je vše v pořádku, řetězec "ERROR" v případě, že došlo k chybě. |
Příklad použití:
Dim rc rc = SendSMS.SendSMS( "+420603899285", "Hello, World!", True ) If rc <> "OK" Then ' zde je třeba zpracovat chybu End If |
SendSMS.UnInit() odinicializuje SendSMS objekt. Po zavolání metody není možno dále odesílat SMS zprávy.
Tato metoda by měla být zavolána jen jednou na konci práce. Syntaxe je:
SendSMS.UnInit()
Příklad použití:
Call SendSMS.UnInit() |
SendSMS.LastError obsahuje textový popis poslední chyby
vzniklé v objektu SendSMS.