Envoi de SMS à partir d'un modem GSM ou d'un modem exécutant les commandes AT

**bruce207** · 05/01/2010, 11h57

Bonjour,
Voici le code pour envoyer des sms à partir d'un modem GSM ou d'un modem exécutant les commandes AT. Les paramètres et certains élémnts peuvent changer:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
bMonPort est un booléen
nNbreOctet est un entier
sMess est une chaîne
 
//Ouverture du port COM
bMonPort = sOuvre(1, 1024, 1024, sTimeoutDéfaut)
SI bMonPort = Vrai ALORS
	//On renseigne les paramètres du modem
	sFixeParamètre(1, 9600, 0, 8, 1, Vrai, Vrai, Faux)
	//On teste le modem
	sEcrit(1, "AT" + Caract(13))
	//On laisse au moden le temps de répondre
	Temporisation(100)
	nNbreOctet = sDansFileEntrée(1)
	sMess = sLit(1, nNbreOctet)
	//Si la réponse (qui est en fonction du modem) est différente Entrée_OK_Entrée...
	SI Majuscule(sMess) <> Caract(13) + Caract(10) + "OK" + Caract(13) + Caract(10) ALORS
		Info("Communication avec le terminal impossible !" + RC + " Réseau mauvais ou revérifiez les branchements du modem et sa configuration !")
	SINON
		//Selon le pays le nombre de chiffre pour composer un numéro
		//Pour moi c'est 8, pour la France c'est supérieur dont à changeren fonction
		//du pays (ici SAI_N_Téléphone est le champ qui contient le N° de tél
		SI Taille(SAI_N_Téléphone) <> 8 ALORS
			Info("Numéro de Téléphone érronné ! Vérifier le SVP !")
		SINON
			Temporisation(100)
			//Pour les commandes AT chercher la syntaxe sur le net
			sEcrit(1, "AT+CMGS=" + Caract(34) + Droite(SAI_N_Téléphone, 8) + Caract(34) + Caract(13))
			Temporisation(100)
			nNbreOctet = sDansFileEntrée(1)
			sMess = sLit(1, nNbreOctet)
			SI Majuscule(sMess) <> Caract(13) + Caract(10) + "> " ALORS
				Info("Mauvaise initialisation du Modem !")
			SINON
				Temporisation(100)
				sEcrit(1, SAI_Message + Caract(26))
//				Temporisation(100)
				Info("Message envoyer avec succès !")
			FIN
		FIN
	FIN
	//On ferme le port
	sFerme(1)
SINON
	Erreur("Erreur d'ouverture du COM1")
FIN

Merci

**njulio2000** · 31/08/2010, 17h12

Salut Bruce,

J'aimerais savoir si ce code fonctionne quelque soit le modem gsm. Merci

**bruce207** · 02/09/2010, 15h41

Bonjour,
je l'ai testé avec un modem wavecom fastrack et je crois que pour tous les modems du genre ça marche. Essaye et tu me diras

**Badman** · 05/12/2012, 21h31

Bon, je voudrais juste ajouté que j'ai fait le test avec un modem GSM TM2... et que sa fonctionne parfaitement.... et surtout un grand merci au forum et aux participant, parce que j'ai un bouquin Interface GSM 2eme edition qui a oublier de préciser qu'il faut des guillemets qui encadre le numero de tel....

**bruce207** · 28/12/2012, 11h23

Envoyé par marie eva

lorsque j'exécute le code voici le message d'erreur : Communication avec le terminal impossible!Réseau mauvais ou revérifiez les branchements du modem et sa configuration!

Il faut d'abord tester le modem pour savoir si ta machine le reconnait pour ce faire sous XP tu vas as Démarrer--Tous les programmes--Accéssoires--Communications--HyperTerminal. Pour des OS superieures c-a-d Vista ou Seven faudra chercher. Donc après avoir lancer HyperTerminal et paramétrer avac les informations demandées, une console s'affiche et là après le prompt du curseur tu tapes AT et si le modem est bien connecté et reconnu par la machine tu auras comme reponse OK. Fais déjà ceci et tiens moi informer

**b_reda31** · 14/12/2013, 01h06

Un Grand Merci. Très beau travail

**adostum66** · 06/10/2014, 08h57

salut je suis buté au méme probléme si quelqu'un peut avoir une source fonctionnelle s'il vous plait, je voulais envoyé des messages depuis un modem de la marque huawei à partir de mon application windev. s'il vous plait aidé moi, j'essaie toute les sources mais en vain. mon port est COM5

**adostum66** · 22/10/2014, 17h29

déja resolut, merci bien

**phoenix916916** · 27/03/2015, 08h08

bonjour

je reprend cette discussion afin de ladapter a un modem gSM IP

est ce que vous avez deja essayer de le faire

merci de votre retour

**mpozagara** · 18/11/2015, 13h21

Bonjour,

Est-il possible de personnaliser l’émetteur lors de l'envoie d'un SMS avec les commandes AT?

Merci

**omed23** · 19/08/2017, 10h58

merci des solutions je suis en train de tester je reviens vers pour vous donnez le resultat

**omed23** · 19/08/2017, 11h42

J'ai testé et l'erreur est : ("Communication avec le terminal impossible ! Réseau mauvais ou revérifiez les branchements du modem et sa configuration !")

**b_reda31** · 19/08/2017, 11h56

Si vous ne disposez pas d'un modem gsm bien installé et bien configuré sur votre machine, il serai tout à fait normal que vous ne puissiez exécuter ce code.
Sinon vérifiez si le numéro de port de votre modem correspond à celui utilisé dans le programme

**omed23** · 19/08/2017, 12h06

j'ai un mon huawei installer et connecter.
mon numéro de port est bon .
dans mon terminal ma commande AT reponds ok

**omed23** · 19/08/2017, 17h19

j'ai toujours la meme erreur

**b_reda31** · 20/08/2017, 14h09

Envoyé par omed23

j'ai toujours la meme erreur

Bonjour, ne me prenez surtout pas mal, mais il ne suffit pas de prendre un code existant de le copier / coller sans rien comprendre , de l'exécuter et s'étonner que ça ne fonctionne pas...
Il faut un minumum d'effort de compréhension afin d'adapter le code à votre matériel :

Pas besoin d'être un génie pour comprendre que le message d'erreur affiché provient de la condition suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SI Majuscule(sMess) <> Caract(13) + Caract(10) + "OK" + Caract(13) + Caract(10) ALORS

Je vois pour cela deux cas de figure : (On supposant que le modem est bien installé et configuré et que vous utilisez le bon port)
1- Dans le code, la réponse attendu par le modem est

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Caract(13) + Caract(10) + "OK" + Caract(13)

ce qui correspond à un format bien précis de message de retour
il est possible, que le modem que vous utilisez, réponde d'un message quelque peu différent, mais je pense que dans la majorité des cas, le message de retour du modem contient la chaine "OK",
essayer donc d'assouplir un peu la condition, un peu du genre "Si le message du modem contient la sous chaine "OK" "

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
SI Contient(Majuscule(sMess), "OK") = Vrai ALORS
...

2- Le modem ne renvoie pas le message OK, essayez d'afficher le message de retour et voir ce qu'il en est. Vous ne donnez peut être pas assez de temps au modem pour répondre, essayez donc d'augmenter le délai dans les fonction de temporisation.

Je vous conseille vivement de bien relire le code de cette contribution, je trouve qu'il est très bien écrit et très bien commenté. J'en remercie encore son Auteur Bruce207.

**omed23** · 22/08/2017, 10h57

merci pour vos contributions les développeurs.
jusque la je n'y parviens j'ai l'impression que mon problème se situe à un autre niveau..
en allégant b_reda31 maintenant ce sont mes port qui ne souvrent plus. donnez mooi le temps de me concentrer sur mon code et je reviendrai vers vous pour vous donnez le resultat s'il vous plait.
merci encore.

**omed23** · 08/09/2017, 15h13

merci les développeurs pour l'aide et les astuces ce n'est que maintenant que je peux envoyer des messages.
il fallait déclarer la variable sch en chaine (ansi) et après avoir fixer les parametres convertir en utf8

**abdelhek02** · 21/12/2017, 13h58

Bonjour, j'ai besoin d'aide

J'ai testé et l'erreur dans le cas ou mon SMS contient des caractères accentués Ou taille(sch)>70.

**kabamel** · 17/09/2019, 10h39

Salut, je trouve très intéressant ce code.
Etant débutant, comment je dois l'utiliser.
J'ai une clé orange. le Code reconnait-il au branchement directement, ou bien il faut des manip ?
Merci d'avance.........

Envoi de SMS à partir d'un modem GSM ou d'un modem exécutant les commandes AT

Contribuez

Discussions similaires

Partager

Partager