Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Serial Port Communication is not working as intended
Message
De
11/04/2007 16:12:55
 
 
À
11/04/2007 15:56:12
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 6
OS:
Windows NT
Divers
Thread ID:
01214675
Message ID:
01214687
Vues:
19
Do you have any use for the incoming data, other than to test for the CR? If not, just test for the CR like below:
DO WHILE !FEOF(dHex)
IF ComForm.Testcom.CommEvent = 2  &&This is triggered if the RThreshold is reached, which is 1 character
   StringBuffer = ComForm.Testcom.Input
   IF vbCrLf $ StringBuffer  &&If a Carriage return is received
      ComForm.Testcom.Output = ">[1]" + firstLine + vbCrLf &&sends a line from the Hexfile
      WAIT WINDOW firstLine NOWAIT
   ENDIF
ENDIF
ENDDO
fclose(dHex)
WAIT WINDOW "DONE SENDING ALL LINES FROM DOWNLOADERHEX.TXT"
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform