DLL POUR LES PROGS SMS

cs_Repie Messages postés 103 Date d'inscription mardi 10 octobre 2000 Statut Membre Dernière intervention 5 mars 2006 - 27 août 2002 à 18:33
logisim Messages postés 49 Date d'inscription mardi 8 mai 2001 Statut Membre Dernière intervention 14 août 2004 - 15 juin 2004 à 19:40
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/4431-dll-pour-les-progs-sms

logisim Messages postés 49 Date d'inscription mardi 8 mai 2001 Statut Membre Dernière intervention 14 août 2004
15 juin 2004 à 19:40
Il y a quand même beaucoup plus simple ! Dans un module :

Function Operateur(Numero As String) As String
If Len(Numero) <> 10 Then Exit Function
If Not IsNumeric(Numero) Then Exit Function
Select Case CInt(Mid$(Numero, 3, 2))
Case 7 To 8, 30, 70 To 89: Operateur = "Orange"
Case 3, 9 To 24: Operateur = "SFR"
Case 60 To 69, 98 To 99: Operateur = "Bouygues"
End Function
cs_shivan Messages postés 363 Date d'inscription jeudi 20 décembre 2001 Statut Membre Dernière intervention 25 août 2003
30 août 2002 à 14:16
et marchera bientot plus, car bientot on pourra garder son numéro en changeant d'opérateur... ca a été décidé yapas longtemps...
tareumleretour Messages postés 38 Date d'inscription jeudi 27 juin 2002 Statut Membre Dernière intervention 22 mai 2005 1
28 août 2002 à 23:34
En faite comme je n'avais jamais fait de module de classe, c'était pour moi locasion d'en faire un. Et puis faire une fonction ou un module cela n'a pas d'importance car c'est juste une source a aprofondir. Nickadele a raison, j'aurai du preciser de ce code ne marche que pour la france.(Merci Nick)
nickadele Messages postés 1251 Date d'inscription mercredi 7 août 2002 Statut Modérateur Dernière intervention 10 avril 2013
28 août 2002 à 10:27
Uniquement valable pour la france :o(
car en Belgique on peut changer d'opérateur sans changer de numéro.

faudra donc approfondir
cs_Pingouin Messages postés 262 Date d'inscription lundi 26 août 2002 Statut Membre Dernière intervention 24 août 2005
28 août 2002 à 09:24
C'est vrai koi une tiote fct et ct bon. Menfin on va pa core critiquer.
cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 79
28 août 2002 à 09:02
Bonne idée, mais pourquoi avoir choisi un module de classe ?
Une simple Fontion aurait suffit :
Public GetOpérateur(ByVal Numéro as String) as String
Des fois, vous vous compliquez la vie ...
cs_Repie Messages postés 103 Date d'inscription mardi 10 octobre 2000 Statut Membre Dernière intervention 5 mars 2006
27 août 2002 à 18:33
niv2 ? arf
Rejoignez-nous