
How to loop comm port control to read text files through serial port in VB3
Quote:
>The problem
>I seem to be having is looping this line to continue printing
>the receive buffer to the output file #1.
If you use Chr$(13) as the End Of Line marker, this code will semi-work:
t$ = frm!com.Input
Do
Print #1, t$
t$ = frm!com.Input
DoEvents
Loop While Instr(t$, Chr$(13)) = 0
--
Real programmers never work 9 to 5. If any Real Programmers are
around at 9:30 AM, it's because they were up all night.
http://www.sn.no/~balchen/
ftp://ftp.sn.no/user/balchen/