VB   发布时间:2022-04-03  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了[VB.NET]询异步socket通信完善的例子.大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
@L_618_0@ 询异步socket通信完善的例子. 我最近试着用异步写,但是发现收到的开头丢掉了一些,不知道我代码哪点的原因. 我基本上是如下思路. server是java写的,我主要用vb.net写client端. 先是form_load的时候,socket.connect,并且启动receive的一个线程和处理数据的线城.窗体出来后,点按钮,向server发送用户名,登陆服务器,然后服务器返回信息. receive的线程中代码主要如下: While True Try mySocket.beginReceive(ss.myBuffer,ss.myBuffer.Length,socketFlags.None,New AsyncCallBACk(AddressOf putSockBuffer),ss) receiveThread.Sleep(50) Catch ex As Exception System.Console.WriteLine(ex.messagE) End Try End While 回调函数主要代码如下 Try If ar.IsCompleted Then ss = CType(ar.AsyncState,SocketStatE) 收到的bytes内容 System.Console.WriteLine(Encoding.GetEncoding( GB2312 ).GetString(ss.myBuffer)) Try bufferUbound = sockeT_Buffer.GetUpperBound(0) Catch ex As Exception bufferUbound = -1 End Try bytesRec = ss.myBuffer.Length If bufferUbound < 0 Then ReDim sockeT_Buffer(bytesRec - 1) System.Array.Copy(ss.myBuffer,sockeT_Buffer,bytesReC) Else ReDim Preserve sockeT_Buffer(bytesRec + bufferUbound) System.Array.Copy(ss.myBuffer,bufferUbound + 1,bytesReC) End If System.Console.WriteLine(Encoding.GetEncoding( GB2312 ).GetString(sockeT_Buffer)) End If Catch ex As Exception System.Console.WriteLine(ex.messagE) End Try 谢谢 __________________________________________________________________________ http://www.codeproject.com/useritems/winsock2005.asp 参这个,我觉得这个做的很好,完全的事件驱动 __________________________________________________________________________ 我看了些别人的代码,发现我不应该把beginReceive写在一个循环里,而是在一次beginReceive中触发的回调函数中再beginReceive一下,如此反复,做到持续接收数据。 大家说是这样么? __________________________________________________________________________ mark __________________________________________________________________________ 我发现,我这样做后,就是 在一次beginReceive中触发的回调函数中再beginReceive一下,如此反复,做到持续接收数据,但我一直设的buffer是1024,所以第一次触发的时候,buffer全是0,没办法,我现在设buffer为1,就是一次接收一个字节,目前试了几次,发现接收数据还行. __________________________________________________________________________ 我上面给了个例子给你,怎么就不去看看别人怎么写的呢? __________________________________________________________________________

大佬总结

以上是大佬教程为你收集整理的[VB.NET]询异步socket通信完善的例子.全部内容,希望文章能够帮你解决[VB.NET]询异步socket通信完善的例子.所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。