winsockでバイナリデータ送信

解決

みんみ 2003-02-26 22:26:18 No: 77243

機器の制御のためwinsockにてバイナリデータを送信しています。

With Winsock1
.SendData Chr(&H3) & Chr(&H6) & Chr(&H1) & Chr(&H0) & Chr(&H81)
End With

最後のChr(&H81)がどうしても送信できません。
書き込みにあったバイト配列等でのやりかたを試したのですがおばかな私にはどうしてもうまくいきません。
２週間もこの件で行き詰っています。
どうかよろしくお願いします。

batchman 2003-02-27 01:45:40 No: 77244

VBのヘルプには、
"バイナリデータの場合は、バイト配列を使用してください。"
となっています。

Dim bytArray(4) as Byte

bytArray(0) = &H3
bytArray(1) = &H6
bytArray(2) = &H1
bytArray(3) = &H0
bytArray(4) = &H81

Winsock1.SendData bytArray

でこうなるかな．．．．

みんみ 2003-02-27 07:48:52 No: 77245

レスありがとうございます。
batchmanさんの言った通りにしたら見事に動作しました。
感謝感激です。
本当にどうもありがとうございました！