用1个WinSock循环连接列表框里面的IP,怎么只能连接一个,下一个的时候提示实时错误28: 溢出堆栈空间,请问怎么办?
Private Sub Try_Next_IP()
Me.wskSocket.Close
DoEvents
If intIP < lstTempIP.ListCount - 1 Then
Me.wskSocket.Connect Me.lstTempIP.List(intIP), 2425
intIP = intIP + 1
Try_Next_IP
Else
Me.wskSocket.Close
cmdScan.Enabled = True
cmdStop.Enabled = False
lblScanProg.Caption = "扫 描 完 成"
End If
End Sub
Connect 需要时间,不能写在循环中