Problema con Winsock1_Connect

[danielcanijo]

Hola amigos,

Keria ver si me podiais ayudar con esto

Tengo que hacer que con cada nueva conexion del Winsock1 Agregue una ip a una lista

Private Sub Winsock1_Connect()
MsgBox "Funciono"
End Sub

El problema es que me sale este error al intentar iniciarlo



Si Alguien sabe pork puede pasar o como solucionarlo se lo agradeceria

un saludo

[DJ_MAQUINA]

Hola: Si estas usando un array de winsock el procedimiento no es el correcto. Debería ser:

Código (vb) [Seleccionar] Expandir

Private Sub Winsock1_Connect(Index As Integer)
MsgBox "Funciono"
End Sub

Saludos