作者neverfar (VenusDoom)
看板Visual_Basic
標題[.NET] socket傳接受值問題
時間Thu May 24 23:44:02 2012
我在寫個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)
1F：推 fumizuki:監聽後應要等候連線要求並接受連線才開始收發資料 05/26 13:02
2F：→ fumizuki:不是監聽後就直接接收資料 05/26 13:03
4F：→ neverfar:我研究一下 ~ 謝謝 05/26 15:34
5F：→ neverfar:我是要同步接收跟非同步不知道有沒有一樣 05/26 15:38
6F：→ neverfar:成功了....我寫完還是不知道為什麼要這樣用 = = 05/26 16:49
=======================================================
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)