WinSock的的连接问题，缓冲区溢出。

Question

估计你的用vc写了，我就是用vc谢了个dll

Answer 1

for l=0 to 300
    winsock.connect cstr(l)
    winsock.senddata "a"
    doevents'注意必须要有Doevents,这可能是Winsock的一个BUG
    winsock.close
next l

Answer 2

    For l = 0 To lstComputer.ListCount - 1
        If lstComputer.Selected(l) Then
            lngCount = lngCount - 1
            sckClose.Connect lstComputer.List(l)
            sckClose.SendData "c"
            sckClose.Close
            DoEvents
            lstComputer.Selected(l) = False
            If lngCount Mod 5 = 0 Then
                For ll = 0 To 70000
                    DoEvents
                Next
            End If
        End If
    Next l
'我本来是这么写的都告诉缓冲区溢出。