hComPort =  FOPEN("\\.\\COM1")  && Это для NT,ХР,  2000 ,  2003 
 hComPort =  FOPEN("COM1")  && для Win  95 , 98  до потра  9 
 && с  10  порта так же как и для NT, ХР,  2000 ,  2003 
 А дальше работаешь с ним как с обыкновенным файлом:

 if hComPort < 0  
? "  Порт не существует или занят(уже открыт)"
endif

 Порт открыт, теперь как его юзать :

Пишем:
string_write   = "тут то, что хочешь в него записать"
n_len_w =  LEN(string_write)  && А тут длинна , т.е. сколько "весит строка"
? FWRITE( hComPort,string_write,n_len_w) && тут записал, тебе вернется количество реальных байт ушедших в порт (не факт что в устройство на нем)
Читаем:
 str_read =  FREAD( hComPort,Count_Read_Byte)
где Count_Read_Byte количество байт которые тебе необходимо прочитать из порта.
 str_read <-- тут ,то что прочитал

 Закрыть порт:
=FCLOSE( hComPort)