|
| Started by Fabrice, May, 29 2004 8:46 PM - 1 reply |
| |
| | | |
|
| |
Posted on May, 29 2004 - 8:46 PM |
Débutant, novice,....
J'essaie de débuter en programmation WINDEV avec une gestion des ports COM.
Mais, voilà, je sais émettre une chaîne vers le port, mais impossible de
réceptionner.
Ma liaison fonctionne, je l'ai tester avec HYPER TERMINAL.
HELP,HELP,.... j'en perd mon latin
Merci pour votre aide
Prg:
NumCaractèresRecu est un entier
Messagelu est une chaîne
CaractèreEntête,CaractèreFin1,CaractèreFin2 sont des chaînes
// Ouverture du port spécifié
SI PAS sOuvre(1 20000, 20000) ALORS
Erreur("Impossible d'ouvrir le port COM1,ErreurInfo())
SINON
//Lecture du port
NumCaractèresRecu = sDansFileEntrée(1
SI NumCaractèresRecu > 0 ALORS
Messagelu=sLit(NumPort,NumCaractèresRecu)
FIN
FIN
Sfermer(1) |
| |
| |
| | | |
|
| | |
| |
Posted on June, 01 2004 - 7:05 PM |
Bonjour,
C'est normal que ton code ne fonctionne pas. Si il n'y a rien de recu au
moment de l'execution de NumCaractèresRecu = sDansFileEntrée(1)
NumCaractèresRecu = 0 donc....je te laisse conclure.
L'idéal c'est de faire une boucle ( avec gestion d'un timeout ) qui attend
et qui ne lit que si il y a quelque chose
en WD8.0 c'est encore +facile ont declenche en evenement sur caractére reçu
"Fabrice" <fcoutanceau@aol.com> a écrit dans le message de
news:40bc24a7$1@news.pcsoft.fr...
Débutant, novice,....
J'essaie de débuter en programmation WINDEV avec une gestion des ports
COM.
Mais, voilà, je sais émettre une chaîne vers le port, mais impossible de
réceptionner.
Ma liaison fonctionne, je l'ai tester avec HYPER TERMINAL.
HELP,HELP,.... j'en perd mon latin
Merci pour votre aide
Prg:
NumCaractèresRecu est un entier
Messagelu est une chaîne
CaractèreEntête,CaractèreFin1,CaractèreFin2 sont des chaînes
// Ouverture du port spécifié
SI PAS sOuvre(1 20000, 20000) ALORS
Erreur("Impossible d'ouvrir le port COM1,ErreurInfo())
SINON
//Lecture du port
NumCaractèresRecu = sDansFileEntrée(1
SI NumCaractèresRecu > 0 ALORS
Messagelu=sLit(NumPort,NumCaractèresRecu)
FIN
FIN
Sfermer(1)
|
| |
| |
| | | |
|
| | | | |
| | |
|