- Код: Выделить всё
Private Sub btnSend_Click()
Dim DialString$
DialString$ = "AT*EOBEX" + vbCr
MSComm1.Output = DialString$
End Sub
Все нормально приходит - CONNECT, пока все понятно.
Далее необходимо послать строку - 80 00 13 10 00 40 00 46 00 0C 49 52 4D 43 2D 53 59 4E 43(в шестнадцатиричной системе).
Как это делает, каждый байт отправляется отдельно или они как-то разделяются и отправляются пакетом
