Lecture port com sous windows XP
cs_krevette
Messages postés
137
Date d'inscription
lundi 14 octobre 2002
Statut
Membre
Dernière intervention
21 janvier 2009
-
7 janv. 2003 à 21:10
cs_krevette Messages postés 137 Date d'inscription lundi 14 octobre 2002 Statut Membre Dernière intervention 21 janvier 2009 - 8 janv. 2003 à 23:44
cs_krevette Messages postés 137 Date d'inscription lundi 14 octobre 2002 Statut Membre Dernière intervention 21 janvier 2009 - 8 janv. 2003 à 23:44
A voir également:
- Lecture port com sous windows XP
- Les pompeurs .com ✓ - Forum C# / .NET
- Les pompeurs. com - Forum Visual Basic
- Port 3306 ✓ - Forum PHP
- Les pompeurs com ✓ - Forum C# / .NET
- Mettre fin a un composant .COM ✓ - Forum VB.NET
4 réponses
TheSaib
Messages postés
2367
Date d'inscription
mardi 17 avril 2001
Statut
Membre
Dernière intervention
26 décembre 2007
23
7 janv. 2003 à 22:29
7 janv. 2003 à 22:29
il faut utiliser le control : MSComm Control
::|The S@ib|::
::|The S@ib|::
TheSaib
Messages postés
2367
Date d'inscription
mardi 17 avril 2001
Statut
Membre
Dernière intervention
26 décembre 2007
23
7 janv. 2003 à 22:33
7 janv. 2003 à 22:33
Dim Instring As String
' COM1.
MSComm1.CommPort = 1
' 9600 baud, parité nulle, 8 bit, et 1 bit de stop MSComm1.Settings = "9600,N,8,1"
' dis au control de lire le buffer entier
MSComm1.InputLen = 0
' Ouvre le port
MSComm1.PortOpen = True
' exemple d'envoit au modem
MSComm1.Output = "AT" + Chr$(13)
' attend un retour.
Do
DoEvents
Loop Until MSComm1.InBufferCount >= 2
' recupere la reponse ok du modem
Instring = MSComm1.Input
' fermeture du port
MSComm1.PortOpen = False
::|The S@ib|::
' COM1.
MSComm1.CommPort = 1
' 9600 baud, parité nulle, 8 bit, et 1 bit de stop MSComm1.Settings = "9600,N,8,1"
' dis au control de lire le buffer entier
MSComm1.InputLen = 0
' Ouvre le port
MSComm1.PortOpen = True
' exemple d'envoit au modem
MSComm1.Output = "AT" + Chr$(13)
' attend un retour.
Do
DoEvents
Loop Until MSComm1.InBufferCount >= 2
' recupere la reponse ok du modem
Instring = MSComm1.Input
' fermeture du port
MSComm1.PortOpen = False
::|The S@ib|::
cs_jackky
Messages postés
50
Date d'inscription
mardi 8 janvier 2002
Statut
Membre
Dernière intervention
6 juillet 2003
8 janv. 2003 à 21:48
8 janv. 2003 à 21:48
tu peux aussi utiliser port.dll
tres simple
tres simple
cs_krevette
Messages postés
137
Date d'inscription
lundi 14 octobre 2002
Statut
Membre
Dernière intervention
21 janvier 2009
8 janv. 2003 à 23:44
8 janv. 2003 à 23:44
Merci pour vos reponse
krevette ;-)
krevette ;-)
