Swisslinux.org

− The GNU/Linux crossroads in Switzerland −

 

Language

 

The Forum

You are not logged in.

#1 27 Jul 2007 15:49:09

OdyX
Membre
From: Renens, Vaud
Registered: 06 Jun 2006
Posts: 484
Website

[SMS] Envoi de SMS par Xtra-Zone de Swisscom

Salut à tous,

Liste des versions

0.01 - Version originale
0.02 - Messages plus longs

Présentation
cherchant à pouvoir envoyer des SMS depuis Kontact (KDE) en cliquant simplement sur le numéro de téléphone, tout en utilisant mes crédits offerts sur la Xtra-Zone de Swisscom.

J'ai donc cherché le programme me permettant d'y arriver, j'ai nommé : smssend. En gros, c'est un script qui se connecte sur les pages internet des différents portails SMS. Par contre, pas de script pour la Xtra-Zone de Swisscom, je l'ai donc rédigé, en me basant sur ce que j'ai trouvé sur UbuntuUsers.de qui ne marchait pas à l'origine.

Voici donc le script original ~/.smssend/xtrazone.sms :

Code:

## Swisscom Xtra-Zone ##
# Version 0.01
# Author : Didier Raboud <didier@raboud.com>
# Thanks to : Pot and its first essay : http://forum.ubuntuusers.de/viewtopic.php?p=740746
# Usage: 
# 
# smssend xtrazone.sms LOGIN PASSWORD NUMBER "MESSAGE" 

NbParams 4 
%Login Convert : Your login 
%Password Hidden : Your password 
%Tel Convert : GSM number of recipient (090xyyyyyy) 
%Message Size=143 Convert : Your message 

PostURL https://www.swisscom-mobile.ch/youth/sms_senden-fr.aspx
Params login
PostData isiwebuserid=\%Login%&isiwebpasswd=\%Password%&isiwebjavascript=No&isiwebappid=mobile&isiwebmethod=authenticate&isiweburi=/youth/youth/sms_senden-fr.aspx&isiwebargs=login
Referer https://www.swisscom-mobile.ch/youth/youth_zone_home-fr.aspx?login
Search Swisscom Fehlermeldung
ErrorMsg 1 Mauvais numéro et/ou mot de passe.
ElseSearch Ton compte MMS/SMS
PrintMsg Connection OK.
Else
ErrorMsg 9 Erreur inconnue.
GO 

### Sending ###
PostURL https://www.swisscom-mobile.ch/youth/sms_senden-fr.aspx 
PostData __EVENTTARGET=&__EVENTARGUMENT=&__VIEWSTATE_SCM=1&__VIEWSTATE=&CobYouthSMSSenden:txtMessage=\%Message%&CobYouthSMSSenden:txtNewReceiver=\%Tel%&CobYouthSMSSenden:btnSend=Envoyer
Referer https://www.swisscom-mobile.ch/youth/sms_senden-fr.aspx
Search CobYouthSMSSenden_lblSuccessfully
PrintMsg Envoi du message OK.
ElseSearch CobYouthSMSSenden_lblErrorBox
ErrorMsg 3 Échec de l'envoi du message.
Else
ErrorMsg 9 Erreur inconnue.
GO

### Logout ###
GetURL https://www.swisscom-mobile.ch/youth/youth_zone_home-fr.aspx
Params logout
Go

La ligne de commande pour essayer est la suivante :

Code:

smssend xtrazone.sms 0_mon_numero_0 MonMotDePasse 0_no_destinataire_0 "Texte du message (max 135 charactères)"

Dans Kontact, dans les Contacts, il faut mettre la ligne suivante dans les options :

Code:

smssend xtrazone.sms 0_mon_numero_0 MonMotDePasse %N "`cat %F`"

Voilà voilà, ... Je peux maintenant envoyer des messages directement depuis Kontact (gratuitement qui plus est), c'est pas beau ça ?

Par contre, rien ne garantit ni n'affiche si le message est réellement envoyé dans Kontact. En ligne de commande par contre, on peut voir quelques messages d'erreur.

Enfin voilà, je suis assez content et fier de ce travail...

@+, OdyX

EDIT : Ajout du Version Control. :-)

Last edited by OdyX (30 Jul 2007 23:34:57)

Offline

 

#2 27 Jul 2007 22:04:45

fbianco
Membre du comité
From: Suisse
Registered: 04 Feb 2005
Posts: 1455
Website

Re: [SMS] Envoi de SMS par Xtra-Zone de Swisscom

Cool, je vais essayer ça ! merci pour le script.


Utilisateur de Debian GNU/Linux, le système d'exploitation universel !

www : https://skadi.ch

Offline

 

#3 29 Jul 2007 00:23:24

fbianco
Membre du comité
From: Suisse
Registered: 04 Feb 2005
Posts: 1455
Website

Re: [SMS] Envoi de SMS par Xtra-Zone de Swisscom

Chapeau ! C'est très pratique.

Par contre, faites pas comme moi... lors du copier-coller, des retours à la ligne malencontreux s'étaient glissés dans le code... :-P


Utilisateur de Debian GNU/Linux, le système d'exploitation universel !

www : https://skadi.ch

Offline

 

#4 30 Jul 2007 23:25:17

OdyX
Membre
From: Renens, Vaud
Registered: 06 Jun 2006
Posts: 484
Website

Re: [SMS] Envoi de SMS par Xtra-Zone de Swisscom

[VERSION 0.02] Envoi de longs messages

Il suffit de supprimer la limitation à 135 caractères du fichier original :

Code:

$ diff xtrazone.sms xtrazone.sms.old
2c2
< # Version 0.02
---
> # Version 0.01
13,14c13
< %Message Convert : Your message
< #%Message Size=143 Convert : Your message
---
> %Message Size=143 Convert : Your message

Ce qui donne comme script final :

Code:

## Swisscom Xtra-Zone ##
# Version 0.02
# Author : Didier Raboud <didier@raboud.com>
# Thanks to : Pot and its first essay : http://forum.ubuntuusers.de/viewtopic.php?p=740746
# Usage: 
# 
# smssend xtrazone.sms LOGIN PASSWORD NUMBER "MESSAGE" 

NbParams 4 
%Login Convert : Your login 
%Password Hidden : Your password 
%Tel Convert : GSM number of recipient (090xyyyyyy) 
%Message Convert : Your message

PostURL https://www.swisscom-mobile.ch/youth/sms_senden-fr.aspx
Params login
PostData isiwebuserid=\%Login%&isiwebpasswd=\%Password%&isiwebjavascript=No&isiwebappid=mobile&isiwebmethod=authenticate&isiweburi=/youth/youth/sms_senden-fr.aspx&isiwebargs=login
Referer https://www.swisscom-mobile.ch/youth/youth_zone_home-fr.aspx?login
Search Swisscom Fehlermeldung
ErrorMsg 1 Mauvais numéro et/ou mot de passe.
ElseSearch Ton compte MMS/SMS
PrintMsg Connection OK.
Else
ErrorMsg 9 Erreur inconnue lors de la connexion.
GO 

### Sending ###
PostURL https://www.swisscom-mobile.ch/youth/sms_senden-fr.aspx 
PostData __EVENTTARGET=&__EVENTARGUMENT=&__VIEWSTATE_SCM=1&__VIEWSTATE=&CobYouthSMSSenden:txtMessage=\%Message%&CobYouthSMSSenden:txtNewReceiver=\%Tel%&CobYouthSMSSenden:btnSend=Envoyer
Referer https://www.swisscom-mobile.ch/youth/sms_senden-fr.aspx
Search CobYouthSMSSenden_lblSuccessfully
PrintMsg Envoi du message OK.
ElseSearch CobYouthSMSSenden_lblErrorBox
ErrorMsg 3 Échec de l'envoi du message.
Else
ErrorMsg 9 Erreur inconnue lors de l'envoi.
GO

### Logout ###
GetURL https://www.swisscom-mobile.ch/youth/youth_zone_home-fr.aspx
Params logout
Go

Pour tout ce que j'ai testé, ça marche et envoie finalement plusieurs messages...

@+, OdyX

Offline

 

#5 31 Jul 2007 08:56:28

a-lex
Modérateur
From: Chamoson
Registered: 13 May 2005
Posts: 405
Website

Re: [SMS] Envoi de SMS par Xtra-Zone de Swisscom

ça me semble pas mal, mais dommage que je ne puisse pas en profiter...
snif snif, je suis déjà trop vieux!


Tout ce qui est vraiment grand et inspiré n'a été réalisé que par des individus travaillant librement. (Albert Einstein)

Offline

 

#6 31 Jul 2007 11:21:48

calimarno
Membre du comité
From: VS / AG
Registered: 10 Sep 2005
Posts: 545
Website

Re: [SMS] Envoi de SMS par Xtra-Zone de Swisscom

Reste plus qu'à transférer sur le wiki big_smile


Les Chroniques de Calimarno
Alors que tous les autres ont des problèmes, les chimistes ont des solutions.

Offline

 

#7 03 Aug 2007 13:13:05

SkY`
Citoyen(ne)
From: Bellinzona, TI
Registered: 06 Oct 2006
Posts: 27
Website

Re: [SMS] Envoi de SMS par Xtra-Zone de Swisscom

Un très bon travail! Merci bien smile

Offline

 

#8 24 Aug 2007 12:26:52

baby-tux
Affranchi(e)
 
Registered: 24 Aug 2007
Posts: 4

Re: [SMS] Envoi de SMS par Xtra-Zone de Swisscom

Hello,
c'est mon premier post donc soyez indulgent svp:-$

avez vous essayé d'ajouter à la fin de la commande dans kontact ceci

Code:

> ${HOME}/.smssend/status 2>&1  ; kdialog --title "etat de l'envois" --passivepopup "$(cat ${HOME}/.smssend/status)"

pour obtenir un affichage en cas d'erreur?

edit:je vien d'essayer et sa fonctionne. Parcontre le popup est en haut de l'écrant...:-s

@+
ps désolé des nombreuses fautes d'ortho:-$

Last edited by baby-tux (24 Aug 2007 15:38:45)

Offline

 

Board footer

Powered by FluxBB