Problema al enviar datos con winsock [SOLUCIONADO]

[BlackZeroX]

.
ok lo que puedeshacer es en cuando ya registres la conexion en el listview GUARDA el Index del winsock en la propidad tag del elemento ( como en el ejemplo de arriba ). y cuando des doble click (Evento DblClick del Listview) pones algo asi:

Código (Vb) [Seleccionar] Expandir



On Error GoTo errReport
Dim iwsIndex        As Integer
    With ListView1                              '   //  Trabajamos sobre el ListView.
        If Not (.SelectedItem Is Nothing And ws Is Nothing) Then    '   //  Fila seleccionada?, Objeto (ws) Vacio?.
            iwsIndex = Val(.SelectedItem.Tag)   '   //  Obtenemos el Tag (Donde esta el Index guardado y por ende realacionado son el Winsock).
                                                '   //  Comprobamos que el numero este dentro del rango.
            If ws.lbound >= iwsIndex And iwsIndex <= ws.ubound Then
                With ws(iwsIndex)               '   //  Trabajamos sobre el Socket
                    If .state = 7 Then          '   //  Esta conectado este WSocket?.
                        .SendData Datos         '   //  Enviamos los datos.
                    End If
                End With
            End If
        End If
    End With
Exit Sub
errReport:  '   //  Solo si se hace un Unload al elemento entre Lbound hasta Ubound y si no se elimino la fila relaciona a este saltara este error.
    Debug.Print Err.Description



Temibles Lunas!¡.
.

[ŞCØRPIØN-X3]

BlackZero perdon por mi ignorancia xD pero no logro asignarle al tag del listview el index del winsock :S, simpre me devuelve valor 0., probe varias formas. 

[BlackZeroX]

como lo pones?

Como lo consultas?.

En todo caso analisa este pequeño codigo...

http://foro.elhacker.net/programacion_visual_basic/problema_al_enviar_datos_con_winsock-t323595.0.html;msg1598569#msg1598569

Dulces Lunas!¡.
.

[ŞCØRPIØN-X3]

Wenas, ya logre solucionarlo lo que hice fue como decian le asigne el index del winsock al tag y luego utilice el tag para enviar los datos al mismo muchas gracias es sencillo pero cuando lo queria aplicar me dejaba de funcionar correctamente pero ya lo logre corrigiendo varias partes del codigo y simplificandolo un poco.   .
Me sirvio mucho tus ejemplos BlackZero muchas graicas  

TEMA SOLUCIONADO