winsock控件使用例子(編輯修改稿)
2025-10-10 12:54 本頁面
【文章內容簡介】 ckIndex amp。 Exit Sub End If 查找空閑的 sock SockIndex = FindFreeSocket() ’如果已有的 sock 都忙，而且 sock 數(shù)不超過 15 個，動態(tài)添加 sock If SockIndex SockNum Then Load Sock(SockIndex) End If ConnectState(SockIndex) = BUSY Sock(SockIndex).Tag = SockIndex 接受請求 Sock(SockIndex).Accept (requestID) SockIndex amp。 接受請求 End Sub 客戶斷開，關閉相應的 sock Private Sub Sock_Close(Index As Integer) If Sock(Index).State sckClosed Then Sock(Index).Close End If ConnectState(Index) = FREE Index am
公司管理相關推薦
鄂ICP備17016276號-1