Cita:
Iniciado por popopo cunado cierro el socket con el codigo que me pasaste
Private Sub ws_Close(Index As Integer)
On Error Resume Next
If Index <> 0 Then
'Pero cuando lo borras borras el index que le mandaste cuando en realidad 'tenes que borrar el index + 1.
ws(Index+1).Close
Unload ws(Index+1)
iSockets = iSockets - 1
End If
me tira el error que le objeto todavia no esta creado
No, no, está correcto que borres el Index, pero el verdadero problema sí es el:
por una razón demasiado obvia, o sea, que mira, for sample:
Si tienes 3 Sockets, 0,1,2 y supongamos que se descarga el Index 1, bueno, al restar los Sockets te quedan 2: 0,1 ¿no?, pero nuestros sockets quedan así 0,2 porque el 1 fue descargado, el 2 no, entonces al tratar de crear Load(iSockets) intentas volver a cargar el 2, ahí te tira el error...