當前位置:首頁 » 編程軟體 » vb網路編程

vb網路編程

發布時間: 2022-08-25 03:43:19

㈠ 關於VB的網路編程

頁面上放6個winsock控制項,1個負責LISTEN埠(假定為A),5個負責接收並處理對方的數據.

當LISTEN的winsock控制項A接收到連接請求後,檢查其他5個的狀態(XXX.State),有空閑的就用那個空閑的來同意連接請求(XXX.Accept)並處理後續數據,A繼續LISTEN埠.
如果5個的狀態都是使用中,那麼A直接斷開連接請求並繼續LISTEN埠.

Private Sub Form_Load()

Winsock1.LocalPort = 12345

End Sub

Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)

'當Winsock1收到連接請求的時候檢查其他Winsock的狀態,如果有狀態是空閑的則由空閑的Winsock去接受連接請求

'我不記得空閑的狀態是不是0了,你需要上網自己查查

If Winsock2.State = 0 Then

Winsock2.Accept requestID

ElseIf Winsock3.State = 0 Then

Winsock3.Accept requestID

ElseIf Winsock4.State = 0 Then

Winsock4.Accept requestID

ElseIf Winsock5.State = 0 Then

Winsock5.Accept requestID

ElseIf Winsock6.State = 0 Then

Winsock6.Accept requestID

Else

Winsock1.Close
Winsock1.Listen

End If

End Sub

Private Sub Winsock2_DataArrival(ByVal bytesTotal As Long)

msg = Winsock2.GetData

'當Winsock2收到數據的時候進行處理數據
'......

'當Winsock2收到可以斷開連接的信號的時候斷開連接(或者由客戶端主動斷開)
If msg = "可以關閉" Then
Winsock2.Close
End If

End Sub

Private Sub Winsock3_DataArrival(ByVal bytesTotal As Long)

msg = Winsock3.GetData

'當Winsock3收到數據的時候進行處理數據
'......

'當Winsock3收到可以斷開連接的信號的時候斷開連接(或者由客戶端主動斷開)
If msg = "可以關閉" Then
Winsock3.Close
End If

End Sub

Private Sub Winsock4_DataArrival(ByVal bytesTotal As Long)

msg = Winsock4.GetData

'當Winsock4收到數據的時候進行處理數據
'......

'當Winsock4收到可以斷開連接的信號的時候斷開連接(或者由客戶端主動斷開)
If msg = "可以關閉" Then
Winsock4.Close
End If

End Sub

Private Sub Winsock5_DataArrival(ByVal bytesTotal As Long)

msg = Winsock5.GetData

'當Winsock5收到數據的時候進行處理數據
'......

'當Winsock5收到可以斷開連接的信號的時候斷開連接(或者由客戶端主動斷開)
If msg = "可以關閉" Then
Winsock5.Close
End If

End Sub

Private Sub Winsock6_DataArrival(ByVal bytesTotal As Long)

msg = Winsock6.GetData

'當Winsock6收到數據的時候進行處理數據
'......

'當Winsock6收到可以斷開連接的信號的時候斷開連接(或者由客戶端主動斷開)
If msg = "可以關閉" Then
Winsock6.Close
End If

End Sub

以上只是大概思路,許多細節需要自己在調試中處理

VB分配范圍內隨機整數的代碼網上自己找,有的是.

㈡ 求VB中比較重要的語句和經典的網路編程實例。

如果涉及系統級的編程或者進程間通信,那麼API是不可不了解的。也不用都記得啊,只要知道碰到問題了如何取查找到相應的API函數就行了。

至於網路編程實例,差不多哪本教材上都有例子,自己動動手做做就基本了解了。

㈢ 怎樣用VB.NET進行網路編程

都可以,可以用winsock,也可以自己重寫SOCKET套接字.建議你如果工期緊,可以先用WINSOCK.當然最好是自己學用SOCKET套接字.這對未來開發網路通訊是很有幫助的.因為用WINSOCK有個毛病就是殺毒軟體總會阻止

熱點內容
心跳包源碼 發布:2025-03-17 11:03:29 瀏覽:795
安卓蘋果通訊錄怎麼同步 發布:2025-03-17 09:58:12 瀏覽:173
ai緩存 發布:2025-03-17 09:48:27 瀏覽:921
翹嘴水滴輪什麼配置 發布:2025-03-17 09:47:34 瀏覽:582
小蟻攝像機如何雲存儲 發布:2025-03-17 09:42:42 瀏覽:817
如何修改自己的名字和密碼 發布:2025-03-17 09:32:20 瀏覽:788
寶馬3系槍灰色輪轂是哪個配置 發布:2025-03-17 09:28:17 瀏覽:514
鴻蒙系統退回安卓系統怎麼備份 發布:2025-03-17 09:14:33 瀏覽:615
資料庫服務公司 發布:2025-03-17 08:56:43 瀏覽:496
我的世界伺服器載入不了區塊 發布:2025-03-17 08:56:39 瀏覽:818