Mình quên về cách code chân RTS. Đây là đoạn code trên Delphi bạn có thể thực hiện tương tự trên VB hay VC
mcComm.FlushInBuffer();
mcComm.RTS := False;
mcComm.RS485Mode := False;
mcComm.PutString(sRequest);
mcComm.RS485Mode := True;
mcComm.RTS := True;
Mình vừa mò lại bằng VB, có vẻ code như thế này
mcComm.RTSEnable = True
mcComm.Output = sRequest
mcComm.RTSEnable = False
|