i don't have anything on it just the olecontrol attaching the winsock activex.
here is the class code I got from the class browser
DEFINE CLASS fwsock AS form OLEPUBLIC
Top = 0
Left = 0
Height = 69
Width = 104
DoCreate = .T.
Caption = "Form"
Name = "fwsock"
ADD OBJECT sock AS olecontrol WITH ;
Top = 24, ;
Left = 24, ;
Height = 100, ;
Width = 100, ;
Name = "sock"
ENDDEFINE
I put it olepublic right now...before it was simple
>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
>>>
>>>