Добрый день!
======================================================
hComPort = FOPEN("\\.\\COM2")
str_read = ""
DO WHILE LEN(str_read) == 0
DoEvents
str_read = FREAD( hComPort,10)
IF LEN(str_read) > 0
? str_read
=FCLOSE( hComPort)
ENDIF
ENDDO
=======================================================
Проблема в следующем.
Зависает полностью программа на "str_read = FREAD( hComPort,10)".

Сначала открываю порт через HyperTrminal, закрываю, и только потом, моя программа начинает считывать данные со сканера и работает нормально.
Windows 2000

В чем причина?
Заранее благодарен.

Может проблема в скорости порта.
Как выставить скорость = 9600?
Заранее благодарен.