[.NET] socket傳接受值問題
我在寫個Server跟Client關係的程式
想從Client傳東西過去給Server
Server
Dim ServerSocket As New Socket(AddressFamily.InterNetwork, SocketType.Stream,
ProtocolType.Tcp) '建立socket
Dim ep As New IPEndPoint(IPAddress.Parse("140.117.128.70"), 3027) 'ip,port
ServerSocket.Bind(ep)
ServerSocket.Listen(3)
Dim buffer(255) As Byte
Dim bytesReceived As String = ServerSocket.Receive(buffer)
Dim result As String = Encoding.UTF8.GetString(buffer, 0, bytesReceived)
'我是這樣寫 不知道為什麼接不到
'我懷疑是我receive引數用錯 可是我不知道該怎麼使用 微軟教學只說那邊要bytes
================================================
Client
Dim ClientSocket As New Socket(AddressFamily.InterNetwork, SocketType.Stream,
ProtocolType.Tcp) '建立socket
Dim ep As New IPEndPoint(IPAddress.Parse("140.117.128.70"), 3027) 'ip,port
ClientSocket.Connect(ep)
ClientSocket.Send(Encoding.UTF8.GetBytes("aaa")) '傳aaa字串過去server
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.117.199.49
※ 編輯: neverfar 來自: 140.117.199.49 (05/25 00:05)
※ 編輯: neverfar 來自: 140.117.199.49 (05/25 00:14)
※ 編輯: neverfar 來自: 140.117.199.49 (05/25 00:21)
推
05/26 13:02, , 1F
05/26 13:02, 1F
→
05/26 13:03, , 2F
05/26 13:03, 2F
→
05/26 13:03, , 3F
05/26 13:03, 3F
→
05/26 15:34, , 4F
05/26 15:34, 4F
→
05/26 15:38, , 5F
05/26 15:38, 5F
→
05/26 16:49, , 6F
05/26 16:49, 6F
=======================================================
Dim ServerSocket As New Socket(AddressFamily.InterNetwork, SocketType.Stream,
ProtocolType.Tcp) '建立socket
Dim ep As New IPEndPoint(IPAddress.Parse("140.117.129.231"), 3027)
'ip,port
ServerSocket.Bind(ep)
ServerSocket.Listen(3)
Dim receiveBytes(99999999) As Byte
Dim hostsocket As Socket = ServerSocket.Accept()
hostsocket.Receive(receiveBytes)
Dim strReturnData As String = Encoding.UTF8.GetString(receiveBytes)
※ 編輯: neverfar 來自: 140.117.129.231 (05/26 17:01)