Salut,
En fait avant d'écrire il faut configurer ton port Com (ce que tu fait en dos dans ton .BAT)
Essaie le code Pcsoft ci-dessous pour voir si tu arrive à ouvrir le port Com2 (il faut peut-être changer les paramètres selon ton afficheur)
Voir la doc :Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!
NumPort = sOuvre("COM2", 2000, 2000) // Ouverture de COM1
SI NumPort <> 0 ALORS
// Paramétrage Com2 : Taux 2400, Parité paire,
// 8 bits de données, 1 bit de stop
SI sFixeParamètre(NumPort, 2400, 1, 8, 0) ALORS // Paramétrage de COM2
// Suite traitement...
// Tu colle tes Secrit ....
SINON
Erreur("Erreur de configuration de COM2", ErreurInfo(errComplet))
FIN
sFerme(NumPort) // Fermeture de COM2
SINON
Erreur("Erreur d'ouverture de COM2", ErreurInfo(errComplet))
FIN
-
Bonjour tout le monde ! Veillez consulter la Politique de forum pour comprendre nos règles, Merci a vous !Rejeter la notice
Communication avec le port COM (Afficheur Client)
Discussion dans 'Windev' créé par Abdallah HASSINI, Fev 19, 2024.
Page 2 sur 2
Si tu n'as pas de message d'erreur tu doit faire comme ci-dessous
Exemple :
// Le port COM2 est ouvert
NumPort = sOuvre("COM2", 2000, 2000) // Ouverture de COM2
SI NumPort <> 0 ALORS
sMessage est une chaîne = Caract(27)+Caract(115)+Caract(50)
// Envoi d'un message au buffer de sortie de COM2
sEcrit(NumPort, sMessage)
sMessage = Caract(12)
// Envoi d'un message au buffer de sortie de COM2
sEcrit(NumPort, sMessage)
sMessage = Caract(12)
// Envoi d'un message au buffer de sortie de COM2
sEcrit(NumPort, sMessage)
sMessage = Caract(27)+Caract(115)+Caract(50)+Caract(27)+Caract(81)+Caract(65)+(MNT*1000)+Caract(1)
// Envoi d'un message au buffer de sortie de COM2
sEcrit(NumPort, sMessage)
// Attendre la fin de l'écriture
BOUCLE
SI sDansFileSortie(2) = 0 ALORS SORTIR
FIN
Info("Fin de l'écriture")
FIN
WX1331 et Abdallah HASSINI aiment ça.
Si tu n'as pas de message d'erreur tu doit faire comme ci-dessous
Exemple :
// Le port COM2 est ouvert
NumPort = sOuvre("COM2", 2000, 2000) // Ouverture de COM2
SI NumPort <> 0 ALORS
sMessage est une chaîne = Caract(27)+Caract(115)+Caract(50)
// Envoi d'un message au buffer de sortie de COM2
sEcrit(NumPort, sMessage)
sMessage = Caract(12)
// Envoi d'un message au buffer de sortie de COM2
sEcrit(NumPort, sMessage)
sMessage = Caract(12)
// Envoi d'un message au buffer de sortie de COM2
sEcrit(NumPort, sMessage)
sMessage = Caract(27)+Caract(115)+Caract(50)+Caract(27)+Caract(81)+Caract(65)+(MNT*1000)+Caract(1)
// Envoi d'un message au buffer de sortie de COM2
sEcrit(NumPort, sMessage)
// Attendre la fin de l'écriture
BOUCLE
SI sDansFileSortie(2) = 0 ALORS SORTIR
FIN
Info("Fin de l'écriture")
FINCliquez pour agrandir...
C'est propre
Merci beaucoup
Bonjour,
J'essais d'ecrire sur mon afficheur externe connecte au port COM3 selon le code suivant:
nPort est un entier
// Ouverture du Port série
nPort = sOuvre("COM3", 4096, 4096)
SI ErreurDétectée ALORS
Erreur()
SINON
// Paramétrage d'E/S
sFixeParamètre(nPort, 9600, 1, 8, 0)
// Insérez votre code ici
sEcrit(nPort," Bonjour")
FIN
la fonction sOuvre("COM3", 4096, 4096) renvoit l’erreur dessous
Le mécanisme de sécurité du WLangage a détecté une erreur sur le port.
Détail de l'erreur système : Un périphérique qui n’existe pas a été spécifié.
Pourriez vous m'aider Merci
Bonjour,
J'essais d'ecrire sur mon afficheur externe connecte au port COM3 selon le code suivant:
nPort est un entier
// Ouverture du Port série
nPort = sOuvre("COM3", 4096, 4096)
SI ErreurDétectée ALORS
Erreur()
SINON
// Paramétrage d'E/S
sFixeParamètre(nPort, 9600, 1, 8, 0)
// Insérez votre code ici
sEcrit(nPort," Bonjour")
FIN
la fonction sOuvre("COM3", 4096, 4096) renvoit l’erreur dessous
Le mécanisme de sécurité du WLangage a détecté une erreur sur le port.
Détail de l'erreur système : Un périphérique qui n’existe pas a été spécifié.
Pourriez vous m'aider MerciCliquez pour agrandir...
combien de lignes votre afficheur supporte?
Bonjour Abdellah merci pour votre reponse le probleme c'est que cet afficheur je l'ai recupere directement de mon client aucune documentation ne va avec , ñais sur internet j'ai trouve ceci
VFD2205
Affichage fluorescent sous vide à haute luminosité pour une excellente visibilité sur un grand angle de vision; Disponible en caractères de 9 mm de haut; 40 caractères sur 20 colonnes par format de 2 lignes
Merci d'avance
Bonjour Abdellah merci pour votre reponse le probleme c'est que cet afficheur je l'ai recupere directement de mon client aucune documentation ne va avec , ñais sur internet j'ai trouve ceci
VFD2205
Affichage fluorescent sous vide à haute luminosité pour une excellente visibilité sur un grand angle de vision; Disponible en caractères de 9 mm de haut; 40 caractères sur 20 colonnes par format de 2 lignes
Merci d'avanceCliquez pour agrandir...
sinon, changer le nom du port com