RS232 en VBA Fermé

Question

Bonjour, 

j'utilise VBA editor avec Microsoft Visual Basic 6.5 et j'aurais besoin de récuperer des valeurs de poids d'une balance en RS232.

Sauf que je suis bloqué par la plus part des solutions que je trouve qui ne fonctionnerais que sur VB6 ou autre.

Est ce que quelqu'un pourrait m'aider ?

Merci !


Configuration: Windows 7 / Internet Explorer 9.0

bliebb · Accepted Answer

Bonjour,

Une bonne solution pour communiquer avec une balance c'est Bill Redirect ce petit logiciel communique directement avec la balance via RS232 ou USB et envoi les données dans le champ de votre application.  Cela évite d'avoir à s'occuper de la communication et c'est très stable comme solution.  La requête du poids peut être fait par; votre application VB 6.5, via une touche au clavier, bouton dans l'écran, automatiquement ... Le support à l'intégration est gratuit nous l'avons utiliser plusieurs fois et nous avons sauvé beaucoup de temps ;)

Voilà le lien du site internet: http://www.billproduction.com/billscalebalance/INDEX_FR.HTML

f894009 · Answer

Bonjour,
VB2008:

https://docs.microsoft.com/fr-fr/dotnet/api/system.io.ports.serialport?redirectedfrom=MSDN&view=netframework-4.8#code-snippet-2

Linko360 · Answer

Merci, je suis tombé sur ce site aussi mais j'ai une erreur à la compile sur les 3 première lignes déjà :

compile error:

invalid outside procedure

Imports SystemImports System.IO.PortsImports System.Threading

:s

f894009 · Answer

Re,

un autre exemple: 

https://codes-sources.commentcamarche.net/source/22701-communication-port-serie-vb-net

Linko360 · Answer

Je relande le sujet,

J'ai essayé une manipulation mais je suis encore bloqué.

J'ai ajouter le MSCOMM32.OCX dans le dossier system32 de windows et je l'ai cocher dans les outils pour VBA.

Mais quand je clique sur le "petit téléphone" et que je l'insère dans un userform, j'ai un message qui m'indique : " le sujet n est pas approuvé pour l action spécifié".

J'ai vu que c'était un blocage de microsoft de "sécurité" et quand modifiant le registre HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer\ActiveX Compatibility\{648A5600-2C6E-101B-82B6-000000000014}
 
et en passane le compatibility flags de 400 à 0, cela pouvais fonctionner.

mais je n'est pas de "compatibility flags"..

Quelqu"un peut m'aider ?

Linko360 · Answer

up :)

f894009 · Answer

Bonjour,

Avez-vous regarde ce que  bliebb 28 févr. 2014 à 16:18 propose ????

Votre besoin est pour des tests ou une utilisation permanente ??

VBA Excel ?????