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