utiliser le port série pour ...

Question

Je veux savoir je peux allumer une lampe à partir de port série 
de mon ordinateur ?

cs_Jack · Answer

Salut
Amusant comme idée.
Fais attention à ne pas trop charger, ça pourrait endommager le circuit de pilotage.
Si tu mets une LED entre 7 (-) et 2 ou 3(+) je ne sais plus
ET que tu fabriques un programme qui émet Chr(255) en permanence sur ton port série, ça devrait fonctionner.

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Champion du monde de boule de cristal - 2005
Le savoir est la seule matière qui s'accro

cs_Jack · Answer

Avec le composant MSComm

cs_casy · Answer

"entre 7 (-) et ...."

La masse sur un port série avec connecteur SubD 9 points est en 5 et non pas en 7.

Attention le port série délivre une tension entre -3 et -18V pour un état 1 (généralement -10/-12V) et entre +3 et +18V pour un etat 0 (généralement +10/+12V).
Attention donc à ne rien connecter directement, mais plutot à travers d'une résistance.

<hr /># Le partage est notre force #

cs_Jack · Answer

... je suis trop vieux, je pensais en DB25 ...

Mikaels35 · Answer

En utilisant MSComm et en mettant  MSComm1.DTREnable à FALSE ou TRUE on peut commander un transistor avec la sortie DTR, qui va allumer ou éteindre une LED ou une lampe de faible puissance !

Pour une lampe plus puissante on utilisera un relais commandé par le transistor !

@+

mongol77 · Answer

oubliez pas la diode de roue libre pour le relais ;)

philippe laschweng 1 · Answer

Je viens justement de le faire avec l'objet MscOm (Mscomm32.ocx je crois) :

Private Sub Form_Load()
     MSComm.InputLen = 0         'Vide le buffer du port COM (Initialisation)
     MSComm.Handshaking = comNone    'Pas de protocole de communicationparticulier
End Sub

'Fonction permettant de COMMANDER le relais via le port Série RS232 COM1.
'Commande pour claquer le relais: Commande_RELAIS(True)
'Commande pour ouvrir le relais: Commande_RELAIS(False)
Public Function Commande_RELAIS(Etat As Boolean)  If (Etat True) Then       'Active le relais> FERMETURE des contacts (NO)
        If (MSComm.PortOpen = False) Then
            MSComm.PortOpen = True 'Ouverture port RS232
        End If  ElseIf (Etat False) Then  'Désactive le relais> OUVERTURE des contacts(NO)
        If (MSComm.PortOpen = True) Then
            MSComm.PortOpen = False  'Fermeture port RS232
        End If
 End If
End Function

Le seul hic pour commander le relais, est que tu dois utiliser une alimentation DC externe pour le relais car le signal issue de l'RS232 est un signal de commande (peut pas tirer de jus). Il suffit simplement d'utiliser un transistor (type 2N2219A) pour la commutation + la diode de roue libre.
Pour choisir quel port utiliser (COM1, COM2...) tu le fais dans les propriétés de l'objet Mscomm.
Moi j'utilise donc pour le brochage RS232 :
Broche 5 = masse
broche 4 = DTR

Si tu veux un schéma ou des infos pour le calcul de la résistance de base du transistor fais moi signe, je ne connais pas ton niveau en électronique !!

Bye Phil

Xman_fr · Answer

Oui je le veux 
et Merci ...

philippe laschweng 1 · Answer

J'essaye de te faire ça insésament sous peu !
Qu'as tu comme relais? tension bobine + impédance de la bobine? As tu un transfo externe? quelle tension + DC ou AC?

Je te propose de continuer à discuter mais avec mon mail privé que je t'ai donné !

Bye
Donne moi déjà les infos ci-dessus?

Xman_fr · Answer

est ce que je peux obtenir un viltage de 0 apprtir de la masse et DTR ??

philippe laschweng 1 · Answer

C'est quoi un viltage??? 
Il faut attaquer la base d'un transistor (via une résistance à calculer selon la valeur ohmique de ta bobine de relais) avec le signal DTR.

Tu voulais dire filtrage? filtrage de quoi et pourquoi???

Je t'ai donné mon mail privé il me semble non??

Bye bye
Donne moi les caractèristiques de ton relais pour commencer !

Xman_fr · Answer

j'ai pas ton adresse email
est ce que tu peux m'envoie mano svp !!!!

philippe laschweng 1 · Answer

phil.lasch@free.fr

Utiliser le port série pour ...

13 réponses

Votre réponse

Discussions similaires