PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → Bluetooth et socket
Bluetooth et socket
Débuté par Olivier BOHER ( AGIS, 07 déc. 2013 09:23 - 7 réponses
Membre enregistré
188 messages
Popularité : +1 (5 votes)
Posté le 07 décembre 2013 - 09:23
Bonjour,
J'essaye de faire communiquer un PC sous windev 18 avec un téléphone mobile Wiko sous windev mobile 18, avec un socket en bluetooth.

Côté bluetooth pas de soucis, le téléphone est connecté au PC.
Par contre pour la com :

Serveur côté PC :

SI SocketCréeBluetooth("Connexion","SerialPortServiceClass_UUID") = Faux ALORS
ToastAffiche("Impossible de créer la socket Bluetooth",ErreurInfo(errComplet), toastCourt)
SINON
ToastAffiche("Connexion établie !", toastCourt)
ThreadExécute("THREAD_LECTURE",threadNormal, Lire_Socket)
FIN

PROCEDURE Lire_Socket()
sMessage est une chaîne
TANTQUE SocketExiste("Connexion") = Vrai
sMessage = SocketLit("Connexion", Vrai)
SI sMessage <> "" ALORS
Trace("Reçu " + sMessage)
FIN
FIN


Client côté téléphone :

Sur un bouton :
SI SocketConnecteBluetooth("connexion","SerialPortServiceClass_UUID", "adresse_mac_pc") = Vrai ALORS
ToastAffiche("connexion",toastCourt)
SINON
ToastAffiche( ErreurInfo(), toastCourt)
FIN

Sur un bouton
SI SocketEcrit("connexion","Mon message") ALORS
ToastAffiche("Message envoye")
FIN


Côté PC pour d'erreur au lancement par contre côté téléphone j'ai irrémédiablement le message "La connexion de la socket a échoué".

Quelqu'un a réalisé avec succès ce genre de com ?
Merci

--
---
www.xenon33.fr
Membre enregistré
188 messages
Popularité : +1 (5 votes)
Posté le 09 décembre 2013 - 08:37
Bonjour,
Je complète ma question...
Je voudrais utilisé la lecture de code-barre du téléphone portable (fonction CBDécode) et envoyer le résultat vers le PC par une socket.
La socket fonctionne sur un téléphone ? ou faut-il avoir un lecteur code-barres en bluetooth pour que le service SerialPortServiceClass_UUID fonctionne ? car dans le cas présent j'ai toujours "La connexion de la socket a échoué" sur le téléphone portable.
Merci...


Serveur côté PC :

SI SocketCréeBluetooth("Connexion","SerialPortServiceClass_UUID") = Faux ALORS
ToastAffiche("Impossible de créer la socket Bluetooth",ErreurInfo(errComplet), toastCourt)
SINON
ToastAffiche("Connexion établie !", toastCourt)
ThreadExecute("THREAD_LECTURE",threadNormal, Lire_Socket)
FIN

Procedure Lire_Socket()
sMessage est une chaîne

TANTQUE SocketExiste("Connexion") = Vrai
sMessage = SocketLit("Connexion", Vrai)
SI sMessage <> "" ALORS
Trace("Reçu " + sMessage)
FIN
FIN


Client côté téléphone :

Sur un bouton :
SI SocketConnecteBluetooth("connexion","SerialPortServiceClass_UUID", "adresse_mac_pc") = Vrai ALORS
ToastAffiche("connexion",toastCourt)
SINON
ToastAffiche( ErreurInfo(), toastCourt)
FIN


Sur un bouton :
SI SocketEcrit("connexion","Mon message") ALORS
ToastAffiche("Message envoye")
FIN


--
---
www.xenon33.fr
Membre enregistré
188 messages
Popularité : +1 (5 votes)
Posté le 10 décembre 2013 - 19:41
Personne n'a essayé cela on dirait...
J'ai envoyé un post au support !
Merci

--
---
www.xenon33.fr
Posté le 15 janvier 2015 - 23:20
Bonjour,

Je déterre ce topic pour savoir si vous avez trouvé une solution à votre problème ?
J'ai moi-même une erreur 100029 à l'exécution d'un code quasi-identique au vôtre !

Merci
Membre enregistré
188 messages
Popularité : +1 (5 votes)
Posté le 16 janvier 2015 - 16:05
Bonjour Julian.
Concernant mon problème précis, il y avait un bug sur Windev d'après le support qui devait corrigé le soucis.
Mais depuis, je n'ai plus utilisé le bluetooth je suis passé avec un socket tcp/ip (plus pratique).
Voilà
Cordialement
Posté le 07 juillet 2015 - 21:19
L'erreur est bien vivante
Posté le 29 février 2016 - 09:20
Malgré plusieurs requête au support windev, le bug est toujours présent sur la version 21 de windev (01F210051f)

Pour information, cela fonctionne en windev 16 mais plus en windev 18 (non testé sur windev 17).
Il s'agit d'un bug de régression.
Posté le 20 avril 2021 - 11:33
Bonjour Olivier
Je trouve la même problème dans la création de socket au niveau de serveur (Est ce que le support de WinDev te donne un solution pour ce problème)
merci d'avance.