| ■No70064 (にこにこ さん) に返信 > objSck.Connect("192.168.1.100", 60000)
ここで相手先IPアドレスをしていすのでは無く・・・
> Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click > ' ソケット送信 > Dim dat As Byte() = _ > System.Text.Encoding.GetEncoding("SHIFT-JIS").GetBytes("abc123") > objSck.Send(dat, dat.GetLength(0)) > > End Sub
送信するときにSendtoメソッドを使って、相手先IPアドレスを指定します。
またUDPの場合は、通信相手が2台以上でも同じソケットを使用します。 *1の部分は不要です。 |