There where you putted your original code.
BUT better make a Visual Class for MSWinsock. That way VFP will store license in VCX and you will not have problems with licensing after you deploy your application.
Why not use WinSock in some form?
If I remember well Craig Boyd have a very good example in his BLOG how to use WinSock.
(If I find the link I'll send it to you).



>Where am I putting those three lines? In my calling program?
>
>>Try:
>>

>>oWinSock      = CREATEOBJECT([MSWinsock.Winsock.1])
>>oEventHandler = CREATEOBJECT([EMPS_Class])
>>EVENTHANDLER(oWinSock, oEventHandler)
>>
>>
>>
>>
>>
>>
>>DEFINE CLASS EMPS_Class AS Session &&OLEPUBLIC
>>
>>    * Using the MSWinsck control for basic port communications
>>    IMPLEMENTS DMSWinsockControlEvents IN "MSWinsock.Winsock"
>>
>>    PROCEDURE DMSWinsockControlEvents_Error(Number AS INTEGER, Description AS STRING, Scode AS Number, Source AS STRING, HelpFile AS STRING, HelpContext AS Number, CancelDisplay AS LOGICAL) AS VOID;
>>                HELPSTRING "Error occurred"
>>        * add user code here
>>    ENDPROC
>>
>>    PROCEDURE DMSWinsockControlEvents_DataArrival(bytesTotal AS Number) AS VOID;
>>                HELPSTRING "Occurs when data has been received from the remote computer"
>>        * add user code here
>>    ENDPROC
>>
>>    PROCEDURE DMSWinsockControlEvents_Connect() AS VOID;
>>                HELPSTRING "Occurs connect operation is completed"
>>        * add user code here
>>    ENDPROC
>>
>>    PROCEDURE DMSWinsockControlEvents_ConnectionRequest(requestID AS Number) AS VOID;
>>                HELPSTRING "Occurs when a remote client is attempting to connect"
>>        * add user code here
>>    ENDPROC
>>
>>    PROCEDURE DMSWinsockControlEvents_Close() AS VOID;
>>                HELPSTRING "Occurs when the connection has been closed"
>>        * add user code here
>>    ENDPROC
>>
>>    PROCEDURE DMSWinsockControlEvents_SendProgress(bytesSent AS Number, bytesRemaining AS Number) AS VOID;
>>                HELPSTRING "Occurs during process of sending data"
>>        * add user code here
>>    ENDPROC
>>
>>    PROCEDURE DMSWinsockControlEvents_SendComplete() AS VOID;
>>                HELPSTRING "Occurs after a send operation has completed"
>>        * add user code here
>>    ENDPROC
>>
>>
>>ENDDEFINE
>>

>>(not tested)