Code d exemple pour envoyer des sms en visual basic

Description

NEW Permet d'envoyer des sms sur tous les gsm du monde entier,français,belge,....

ATTENTION JE SAIS QUE LE PROGRAMME DOIT ETRE MODIFIER POUR RE-FONCTIONNER
MAIS CE CODE EST POUR COMPRENDRE.. A VOS CLAVIER

Source / Exemple :


Voila le source mais lisez la FAQ pour bien comprendre et le modifier a votre guise !!! 
Après avoir reçu des dixaines et dixaines d'e-mail par semaines....
j'ai décidé d'écrire ces quelques lignes et qui j'éspère pourront répondre a vos
nombreuses questions !!!!!!

ex : Comment faire pour rajouter un provider ? exemple un provider français....

et oui je vais vous l'expliquez le plus simplement du monde, je ne pourrais faire mieux.

///////////////////////////////////////////////////////////////////////////////////////////////////////////////
\\\\\\\\\\Bon le programme fonctionne de la manière suivantes.\\\\\\\\\\\\\\\\\\\
///////////////////////////////////////////////////////////////////////////////////////////////////////////////

il fonctionne comme un formulaire HTML, a part que vous êtes devant un programme VB, mais
il fait les mêmes opérations qu'un simple formulaire Web...
---------------------------------------------
1er méthode pour les néophytes & gros nulles. 
---------------------------------------------

l'idée est donc d'allez sur un site qui permet d'envoyer des sms, de visionner dans le 
code source de la page HTML (celle du formulaire)
Le nom des variables, ex :numéro, préfixe, messages.... 
de savoir si il s'agit d'une action du type POST ou GET. (différence expliquée plus tard)

---------------------------------------------------------------------------
2éme méthode pour les meilleurs ou ceux qui ne veulent pas mourrir idiot.
---------------------------------------------------------------------------
il suffit de créer un petit logiciel qui écoute le port X de votre PC.... (je vous le donne)

bon je m'explique,...
votre browser préférez que fait-il, bein oui il envoye des commandes HTTP (voir protocol www.salemioche.com)
et celui-ci envoye exactement le contenu du fichier qu'il faudra créer...

pour crée le logiciel, vous créer un feuille vb,vous lui rajouter l'objet winsock (ocx) , configurer de telle 
maniére a écouter un port ex : le port 20000. (pour des explications sur l'objet winsock voir le 
MSDN) il n'y a pas plus de 10 ligne de programmation...

                                                      • C'est pour cette raison que je vous les donnent.... *******************************
donc créer une form rajouter l'objet winsock private sub form_load() winsock1.LocalPort = 20000 'port d'ecoute choisi winsock1.Listen 'initialise winsock a l'écoute end sub private Sub winsock1_ConnectionRequest(ByVal requestID As Long) winsock1.Close winsock1.Accept requestID 'accepte la connexion End Sub Private Sub winsock1_DataArrival(ByVal bytesTotal As Long) Dim donnee As String winsock1(Index).GetData donnee ' recupére les donnee envoyée par le browser MsgBox donnee End Sub private sub form_unload() winsock1.close end sub ensuite vous lancer votre browser vous allez sur un site qui permet d'envoyer des SMS vous allez sur le formulaire.... quand celui-ci est chargé vous allez dans les paramêtres de votre browser (IE ou Netscape) et vous le configuré avec un connexion internet via réseau local, en résumer vous lui dite que vous avez un proxy dont l'adresse ip est celle de votre machine, et le port de connexion est le port que vous écoutez avec le petit logiciel ex port 20000. ensuite.... vous remplisez votre formulaire Web et vous faite envoyer.... votre petit logiciel devrai alors a ce moment recevoir des donnees du type (si c'est pas le cas retourné a vos claviers....)
  • Si l'action est du type POST *
POST http://212.68.202.150/sms/process.cfm HTTP/1.0 Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/msword, application/vnd.ms-powerpoint, */* Referer: http://www.b-gsm.com/sms.cfm Accept-Language: fr-be Content-Type: application/x-www-form-urlencoded Accept-Encoding: gzip, deflate User-Agent: Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt; Wanadoo BE; KITV4 Wanadoo) Host: 212.68.202.150 Content-Length: 108 Proxy-Connection: Keep-Alive Pragma: no-cache Cookie: CFGLOBALS=HITCOUNT%3D4%23LASTVISIT%3D%7Bts+%272000%2D09%2D05+13%3A52%3A19%27%7D%23TIMECREATED%3D%7Bts+%272000%2D09%2D05+13%3A14%3A44%27%7D%23; CFTOKEN=80004368; CFID=146943 message=SALUT MA BICHE&counter=128&network=32486&number=712062&language=resultsfr&gateid=netbel&Submit=Envoyer
  • Si l'action est du type GET *
GET http://www.b-gsm.com/resultsfr/success.cfm?bodytext=test%20message%20Visit%20www%2Enetbel%2Ebe&fullnumero=32486712062 HTTP/1.0 Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/msword, application/vnd.ms-powerpoint, */* Accept-Language: fr-be Accept-Encoding: gzip, deflate User-Agent: Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt; Wanadoo BE; KITV4 Wanadoo) Host: www.b-gsm.com Proxy-Connection: Keep-Alive La différence entre GET ET POST est que le noms des variables et leurs resultats sont pour le GET fournie directement par le lien... Voila le fichier est "quasi" créer, maintenant il vous suffit de le modifier un peu ! pour vous permettre de remplir les champs intéressants. Bon à vos clavier et amusé vous bien. Attention certain site demande pour s'inscrire, vous devrez donc peut-être prévoir d'envoyer plusieurs fichiers.... @+ Crevette

Conclusion :


Attention interface en flash........

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.