Interface de gestion d'un four pour commander un automate par liaison rs232 et protocole modbus
Soyez le premier à donner votre avis sur cette source.
Snippet vu 22 604 fois - Téléchargée 61 106 fois
Contenu du snippet
Bonjour,
Je suis en BTS Electrotechnique et mon projet de fin d'année consiste à gérer un four à refusion pour les carte CMS.
Je doit créer une interface qui sera reliée à un automate(un TWIDO) via un liaison RS232, et sans doute en utilisant le protocole MODBUS.
J'ai réussi a créer cette interface, même si je n'ai aucune idée de la marche à suivre pour envoyer des informations à l'automate. Donc si qqun pouvait me venir en aide cela serait avec grand plaisir.
Si qq'un sait comment envoyer des trames de VB à l'automate et inversement.
Merci
Si vous voyez des bugs ou autre, merci de m'en faire part.
Je suis en BTS Electrotechnique et mon projet de fin d'année consiste à gérer un four à refusion pour les carte CMS.
Je doit créer une interface qui sera reliée à un automate(un TWIDO) via un liaison RS232, et sans doute en utilisant le protocole MODBUS.
J'ai réussi a créer cette interface, même si je n'ai aucune idée de la marche à suivre pour envoyer des informations à l'automate. Donc si qqun pouvait me venir en aide cela serait avec grand plaisir.
Si qq'un sait comment envoyer des trames de VB à l'automate et inversement.
Merci
Conclusion :
Si vous voyez des bugs ou autre, merci de m'en faire part.
A voir également
- Interface automate
- Dancon - Meilleures réponses
- Visual Basic / VB.NET : Cdrom:interface vb qui se lance automatiquement - CodeS SourceS - Guide
- Lancer automatiquement mon interface ✓ - Forum - Visual Basic 6
- Interface d'une application - Conseils pratiques - Graphisme
- Programmer un automate en c - Guide
- Code source java interface graphique netbeans - Forum - Java
Devant moi aussi communiquer par modbus sur la ligne série est-il possible de remettre en ligne http://www.dancon.com/techsup/visualbasic_modbus_example.htm
Je pense ça peut m'aider.
merci
la tu trouveras toutes les informations sur le protocol MODBUS
http://gs-computer.eu/index.php?mod=index5&lang=fr
ici les information relative a la liaison RS232
http://gs-computer.eu/index.php?mod=index2&lang=fr
Bonne chance
@+
- Messages postés
-
132
- Date d'inscription
- mercredi 6 mars 2002
- Statut
- Membre
- Dernière intervention
- 27 novembre 2012
1mais ce code peut peut-etre t'aider il permet de calculer le Checksum de ta trame t'evitant ainsi d'utiliser un ocx. Il se rajoute automatique a la fin de ta trame.
'----------------------------------------------------------
Sub InsertChecksumMODBUS(ByRef strChaine As String, ByRef chk2 As Long, ByRef chk1 As Long)
Dim CRC As Long
Dim i As Long, j As Byte
Dim lngTemp As Double
CRC = 65535 ' "&hFFFF"
For i = 1 To Len(strChaine)
CRC = CRC Xor Asc(Mid(strChaine, i, 1))
For j = 1 To 8
lngTemp = CRC / 2 - CRC \ 2
CRC = CRC \ 2
If lngTemp <> 0 Then
CRC = CRC Xor 40961 ' "&hA001"
End If
Next j
Next i
chk1 = CRC Mod 256
chk2 = CRC \ 256
strChaine = strChaine & Chr(chk2) & Chr(chk1)
End Sub
'----------------------------------------------------------
Bon developpement
- Messages postés
-
341
- Date d'inscription
- samedi 8 novembre 2003
- Statut
- Membre
- Dernière intervention
- 29 juin 2011
1Vous 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.