Gracias por la ayuda! jajajaja Resolví mi problema por ahí revisando códigos...
Dejo la solución para los demás... Encontré 2 formas:
#1
' Poner la propiedad Index del objeto a 0 lo que
' hace es crear un Array() del objeto
' Setearlo en la edicion de la App pues en ejecucion
' el valor Index es de solo lectura.
Objeto WSock.Index = 0
' para crear otro WSock solo hay que ampliar la matriz
Load WSock(0) ' iniciar la matriz!!
' crear un nuevo objeto
Load WSock(WSock.Ubound + 1)
' Cuidado!
' para recibir los eventos de los Objetos en una matriz
' se reciben en la misma funcion. EJ:
Private Sub WSock_Connect(Index As Integer)
' Noten el argumento Index, éste hace mencion al indice en
' nuestra matriz del Objecto que hemos creado.
if WSock(Index).status = sckConected then MsgBox "Conectado!"
' para quitar un Objeto de la matriz
Unload WSock(Index)
'// CODE...
End Sub
#2
' Crear un modulo de objeto y agregar el objeto WSock a las
' librerias de la aplicacion y poner en en modulo:
Private With Events WSock As Winsock
' y cada vez que se quiera crear un nuevo objeto, en el formulario
' o en en algun modulo solo:
dim varObj() As New nombreDelModuloDeObjeto
redim varObj(0)
' .... // CODIGO:
Ahora tengo otro problema, mi Proxy funciona con el comando GET pero no con los demás comandos tales como el POST, CONECT y con el protocolo HTTPS he buscado info pero no me dicen mucho, RUEGO por ayuda 
Necesito a algun programador experimentado en Visual Basic 6.0 que me ayude please, dejo mi Skype: ABRAHAMARAON
Autor
En línea
