Developing.ru

Возникла такая задачка надо отправить в ком порт 4 байта - E1 47 7F 59 используя MSCOMM32.OCX
код :
MSComm1.CommPort = 1 ' Set the port number
MSComm1.Settings = "9600,N,8,1" ' Set UART parameters
MSComm1.PortOpen = True ' Required, might lock port
' Send data E1477F59
s = ""
s = s + Chr(225) + Chr(71) + Chr(127) + Chr(89)
MSComm1.Output = s

чтото отправляет но не то что нужно
Подскажите пожалуйста где ошибка или как правильно это сделать

Для посылки бинарных данных нужно использовать со свойством .Output не строку а переменную Variant содержащую байтовый массив
http://www.yes-tele.com/mscomm.html
http://support.microsoft.com/kb/154741

Спасибо за ответ
как оказалось проблема была не в коде (в устройство зашили фиксированную скорость для обмена)