Pas d'inquiétude, avec PBAdonf, c'est dans la poche ! ^^

Le forum (ô combien francophone) des utilisateurs de Powerbuilder.

Recherche rapide

Annonce

Certaines rubriques, dont des cours, sont uniquement visibles par les membres du forum ^^.
Dans la rubrique Liens & Références, vous avez accès à un sommaire de téléchargement, profitez-en !
Il existe maintenant un nouveau TOPIC "Votre CV en Ligne" accessible uniquement par demande.

#1 27-09-2008 07:01:11

thiboulou  
Membre
Lieu: chantilly France
Date d'inscription: 27-05-2007
Messages: 5
Pépites: 200
Banque: 0

[RESOLU] Envoyer un sms via appli pb9

bjr,
Sur un appli client-serveur logistique en pb9 nous souhaiterions  envoyer un sms au client sur son te.
quelqu'un a-t-il un script pb?
que peux-t-on utiliser comme utilitaire ou site?

Dernière modification par thiboulou (07-10-2008 01:01:40)

Hors ligne

 

#2 27-09-2008 07:58:02

pick ouic  
La bourse ou la vie ^^
Award: gearotter
Lieu: Massy-Verrières
Date d'inscription: 29-05-2006
Messages: 4658
Pépites: 942
Banque: 2,147,483,647
Site web

Re: [RESOLU] Envoyer un sms via appli pb9

tr1l0b1t:
Using MSComm32.ocx ...you must send AT GSM commands to the modem.
This page will be useful to get the basics : http://www.traud.de/gsm/sms.htm

Full list & specifications of AT GSM commands are at ETSI page :
(http://webapp.etsi.org/key/key.asp?GSMS … cPart2=005)
...an extract :

SMS Commands SMS Text Mode
---------------------------------------
AT+CSMS   Select Message Service
AT+CPMS   Preferred Message Storage
AT+CMGF   Message Format
AT+CSCA   Service Centre Address
AT+CSMP   Set Text Mode Parameters
AT+CSDH   Show Text Mode Parameters
AT+CSCB   Select Cell Broadcast Message Types
AT+CSAS   Save Settings
AT+CRES   Restore Settings
AT+CNMI   New Message Indications to TE
AT+CMGL   List Messages
AT+CMGR   Read Message
AT+CMGS   Send Message
AT+CMSS   Send Message from Storage
AT+CMGW   Write Message to Memory
AT+CMGD   Delete Message

PB source code should be something like this (just pseudocode):

Code: pb

String ls_data

OLEObject ole_1 
ole_1 = create OLEObject 
ole_1.ConnecttoNewobject("MScommlib.Mscomm") 

// Configure the communication's port
ole_1.object.CommPort = 1
ole_1.object.Settings = "9600, N, 8, 1"
ole_1.object.InputLen = 0

// Open it
ole_1.object.PortOpen = True

// Send data
ole_1.object.Output = "AT " + char (13) 

// Wait for "OK" response
Do 
    ls_data += ole_1.object.Input
LOOP Until (Pos (ls_data, "OK") > 0)

// Close port
ole_1.object.PortOpen = FALSE 

ole_1.DisconnectObject()


As you see, it's a very extensive subject  but I hope
you got the idea. I reccommend you to test AT commands with
Hyperterminal, then code the working sequence in PB.
Regards


Connaitre son ignorance est une grande part de la connaissance.
http://animegifs.free.fr/anime/mazinger/mazinger.gif

Hors ligne

 

#3 29-09-2008 16:01:00

Doctor Z  
Moderador
Award: PanchoeNacho
Lieu: Vale Figueira (Lisbonne)
Date d'inscription: 30-05-2006
Messages: 756
Pépites: 1,003,082
Banque: 877,135,234,297,804

Re: [RESOLU] Envoyer un sms via appli pb9

Bonjour,

thiboulou si ton souci est règlé, merci de préciser le résolu dans le titre de ta demande


http://www.userbars.com/i/543606.gif
Olivença, l'oubliée
Si tu es alentejane, que Dieu te bénisses, si tu ne l'es pas, que Dieu te pardonnes.

Hors ligne

 

#4 29-09-2008 16:44:36

thiboulou  
Membre
Lieu: chantilly France
Date d'inscription: 27-05-2007
Messages: 5
Pépites: 200
Banque: 0

Re: [RESOLU] Envoyer un sms via appli pb9

bjr,
merci pour ta réponse rapide, je vais tester et te tiens au courant...

Hors ligne

 

Pied de page des forums

Propulsé par FluxBB 1.2.22