What do you have on fwsock form besides mswinsock control? Any code?

>the class i'm using is the one you can find at
>
>http://www.berezniker.com/content/pages/visual-foxpro/read-pop3-mail-using-winsock
>
>i changed a couple of lines to use the object containing the activex class :
>
>

>    PROCEDURE INIT  
>*    THIS.oSocket = CREATEOBJECT('mswinsock.winsock')   
>	If type('ofwsock')   = 'O'
>	    THIS.oSocket = oFwsock.sock.object 
>	else    
>		THIS.oSocket = CREATEOBJECT('mswinsock.winsock')   
>	EndIf 	
>    ENDPROC  
>

>
>and in the main procedure I put
>

>ofwsock = CreateObject('fwsock')
>

>fwsock is a form which contains an olecontrol named sock where i load the winsock activex
>
>>Hi don't get a real error but if I use the original code i can connect to the email server , on the other hand if i use the modified code
>>i get a timeout connection message and the connection is not possible
>>
>>