... usando es el siguiente: FUNCTION TestBascula() LOCAL nComm, nError, i, cDato, nContador := 0, cPaso := "", cDcb := "" nComm := OpenComm("COM3:9600,N,8,1",2048,512) cDato := Space(80) If !BuildCommDcb( "COM3:9600,e,8,1", @cDcb ) nError := GetCommError( nComm ...